哪位大哥用帮小弟简化以下该程序段,在线!

wslmwslm 2002-05-12 09:28:21
tunit=Request.QueryString("单位")

Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db\lwpost.mdb")

Set rs = Server.CreateObject("ADODB.Recordset")
sql="select count(*) as sum_device from device where (所在单位名称='"&tunit&"' and 设备名称='微机') "
rs.open sql,conn,3,3
t1=rs("sum_device")

rs.close
sql="select count(*) as sum_device from device where (所在单位名称='"&tunit&"' and 设备名称='打印机') "
rs.open sql,conn,3,3
t2=rs("sum_device")

Set rs = Server.CreateObject("ADODB.Recordset")
sql="select count(*) as sum_device from device where (所在单位名称='"&tunit&"' and 设备名称='路由器') "
rs.open sql,conn,3,3
t3=rs("sum_device")

............‘还有很多

<%=t1%>
<%=t2%>
<%=t3%>
<%=t1+t2+t3%>
...全文
11 点赞 收藏 9
写回复
9 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
wslmwslm 2002-05-12
这次调用select次数更多了!
回复
sdtashenjie 2002-05-12
function getCount(temp)
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select count(*) as sum_device from device where (所在单位名称='"&tunit&"' and 设备名称='" & temp & "') "
rs.open sql,conn,3,3
rs.close
return rs("sum_device")
end function

用一个函数把设备作为参数,这只是个思路。

回复
wslmwslm 2002-05-12
靠!就这么简单!!
不过,就必须调用两次select了,能只调用一次么?
回复
saucer 2002-05-12
自己用个变量在循环纪录时累计
回复
ChinaOk 2002-05-12
去掉后面的约束条件不就可以了
回复
wslmwslm 2002-05-12
to saucer(思归) :
太感谢了!不过如何统计所有的'设备名称'呢?
回复
saucer 2002-05-12
sql="select count(*) as sum_device from device where 所在单位名称='"&tunit&"' group by 设备名称"
回复
wuya0531 2002-05-12
利用select case不知道可不可以
回复
ChinaOk 2002-05-12
关注;不知道用group 结合count能不能实现。
回复
相关推荐
发帖
ASP
创建于2007-09-28

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
帖子事件
创建了帖子
2002-05-12 09:28
社区公告
暂无公告