这段代码如何改啊 答对再追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
<!--#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