这段代码如何改啊 答对再追100分

来源:百度知道 编辑:UC知道 时间:2024/09/22 07:48:58
(省去)
<!--#include file="conn.asp"-->
<body>
<tr>
<td>
<% ms=Request.Form("ts") %>
<% =ms%>
</td>
<td>
<% set rs=server.CreateObject("adodb.recordset")
sqlstr="select * from nb_client where cli_tax='"&request.form("ts")&"'"
rs.open sqlstr,conn,1,3

if rs.eof and rs.bof then
Response.Write "<p align='center'>NULL</p>"
else
rs.movefirst
end if

while not rs.eof
response.write(rs("cli_name"))
response.write "<br>"
rs.movenext
Wend
rs.close
%>

</td>
<td>
<% set rs1=server.Crea

呵呵 你的rs没清空 又创建造成的

rs对象可能关闭后又使用了,或者重复关闭了。

记得rs.close后一定
set rs=nothing

可以给我百度消息~~

<!--#include file="conn.asp"-->
<body>
<tr>
<td>
<% ms=Request.Form("ts") %>
<% =ms%>
</td>
<td>
<%
set rs=server.CreateObject("adodb.recordset")
sqlstr="select * from nb_client where cli_tax='"&request.form("ts")&"'"
rs.open sqlstr,conn,1,3
if rs.eof and rs.bof then
Response.Write "<p align='center'>NULL</p>"

Else

while not rs.eof
response.write(rs("cli_name"))
response.write "<br>"
rs.movenext
Wend

end if

rs.close
%>

</td>
<td>
<%

set rs1=server.CreateObject("adodb.recordset