<%
dim conn,connstr
db="bbs/Data/@#%flwork%#@.asa"
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
set conn=server.createobject("adodb.connection")
conn.open connstr
dim sql,rs
set rs=server.createobject("adodb.recordset")
sql="select * from gongqiu"
rs.open sql,conn,1,1
response.write "共"&rs.recordcount&"条信息"
'下面就是,改个名就可以
set rs2=server.createobject("adodb.recordset")
sql2="select * from gongqiu2222"
rs2.open sql2,conn,1,1
response.write "共"&rs2.recordcount&"条信息"
%>
不过你这样用的话浪费系统资源!我一般这样用
<%
dim conn,connstr
db="bbs/Data/@#%flwork%#@.asa"
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
set conn=server.createobject("adodb.connection")
conn.open connstr
dim sql1,sql2,zhongshu1,zhongshu2
sql1="select count(*) from tableName1"
sql2="select coung(*) from tableName2"
zhongsu1=conn.Execute(sql1)
zhongsu2=conn.Execute(sql2)
'zhongsu1 和zhongsu2 就随你用了
%>
这个要看你数据库的设计,一般用sql做查询,然后写出.
select count(*) from gongqiu