其实这样简单啦.你小了一个语句呀.你在
<%
next
%>
<%
next
%>
上面,的next的上面加上一句 rs.movenext
就可以了.
如果还是不行的话: http://www.gzpanyu.cn/liu.htm
给你个思路:
dim a,b,c
c=a&b
然后定义一个函数
getdatabasevalue(c)
sql="select * from student where NUM ="&c
return
然后将 getdatabasevalue(c)插入到双重循环中之间
直接给你我简单做的代码,没时间做完整,主要是数据为空时候的判断代码没写。连接代码conn.asp:
<%
dim DB, ConnStr
DB = "db1.mdb"
ConnStr = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath(DB)
Set conn = Server.CreateObject("ADODB.Connection")
conn.open ConnStr
%>
列表文件(文件名自己起) 代码:
<%dim a,b,c c=a&b set rs = server.CreateObject("adodb.recordset") strSql = "select * from student where num="&c rs.Open strSql, Conn %>
|