sql="xxxxxxx" rs.open sql conn,1,1 Do while not rs.eof ID=读取的id 下面再根据读取的这个ID.调用别的个表内容的时候，就严重影响了读取速度 Response.write aaaaa(ID) rs.movenext Loop
Function aaaaa(str) set rss=Server.CreateObject("adodb.recordset") sql = "Select 列表 from 表 where ID="&str&" order by idd asc" rss.Open sql, Conn, 1, 1 If Not(rss.bof And rss.eof) Then cc="dddddddddddddddddddddd" End if:rss=nothing aaaaa=cc End Function
