set rs1 = server.createobject("adodb.recordset")sql1 = "select * from ArcFile where num='0001' and t='h'"rs1.open sql1,conn,1,1dim wjdo while not rs1.eofresponse.Write(rs1("wj"))set rs2 = server.createobject("adodb.recordset")sql2 = "select * from ArcWord where wjm='"& rs1("wj") & "'"rs2.open sql2,conn,1,1do while not rs2.eof response.Write(rs2("wjm"))rs2.movenextloopcall close_rs2rs1.movenextloopcall close_rs1 查看更多答案>>
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024