set rs = server.createobject("adodb.recordset")
sql="select * from bigclass order by id asc"
rs.open sql,conn,1,1
do while not rs.eof
response.write(rs("bigclass"))
set rs1 = server.createobject("adodb.recordset")
sql1 = "select * from leibie where bigclass="&rs("bigclass")
rs1.open sql1,conn,1,1
do while not rs1.eof
response.write(rs1("pic")&" ")
rs1.movenext
loop
rs1.close
set rs1 = nothing
rs.movenext
loop
rs.close
set rs = nothing
IP卡
狗仔卡
发表于 2010-1-16 01:49:15
收藏
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
显身卡