28,390
社区成员
发帖
与我相关
我的任务
分享
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from a",conn,1,1
if not rs.eof then
set ck=server.CreateObject("adodb.recordset")
ck.open "select * from b",conn,1,1
do while not ck.eof
aFieldname = ck("bianlian")
response.write rs(aFieldname)&"<br>"
ck.movenext
loop
ck.close
set ck=nothing
end if
rs.close
set rs=nothing