asp这段代码是什么意思?

来源:百度知道 编辑:UC知道 时间:2024/05/26 07:20:29
<%
dim id,rs,titles
id=request.querystring("id")
if cint(id)<>"" then
set rs=server.createobject("adodb.recordset") rs.open "select * from V_vote where lid=cint('"&id&"')",conn,1,1
if not rs.eof then
do while not rs.eof
i=i+1
%>

<%
dim id,rs,titles '定义变量
id=request.querystring("id")'将提交饿id代入变量id
if cint(id)<>"" then '将id转成整型 并且不为空时
set rs=server.createobject("adodb.recordset") '设置rs记录集ado
rs.open "select * from V_vote where lid=cint('"&id&"')",conn,1,1 '打开数据库中的表 lid字段与id要相匹配的数据
if not rs.eof then'如果记录指针没有到结尾 说明有数据记录
do while not rs.eof '开始循环 直到记录结尾
i=i+1 'i加1代入i
%>