28,390
社区成员
发帖
与我相关
我的任务
分享
<%
'批量修改所有记录
dim sql,rs
Dim count
set rs=server.createobject("adodb.recordset")
sql="select * from Tsignupinfo where swqdzt=2 or swqtzt=2 or xwqdzt=2 or xwqtzt=2"
count = 0
rs.open sql,conn,1,3
if rs.eof and rs.bof then
rsponse.write("没有记录")
end If
If rs.eof Then
count =count+1
End if
%>
<p class="center">
需要修改的记录有<%=count%>条
</p>
<form action="qd_up.asp" method="post">
<p class="center">
<input type ="submit" value="提交修改记录" size="20">
</p>
</form>
<%
'批量修改所有记录
dim sql,rs
Dim count
set rs=server.createobject("adodb.recordset")
sql="select * from Tsignupinfo where swqdzt=2 or swqtzt=2 or xwqdzt=2 or xwqtzt=2"
count = 0
rs.open sql,conn,1,3
if rs.eof then
response.write("没有记录")
count =0
else
count =rs.recordcount
end if
rs.close
%>
<p class="center">
需要修改的记录有<%=count%>条
</p>
<form action="qd_up.asp" method="post">
<p class="center">
<input type ="submit" value="提交修改记录" size="20">
</p>
</form>
<%
'批量修改所有记录
dim sql,rs
Dim count
set rs=server.createobject("adodb.recordset")
sql="select * from Tsignupinfo where swqdzt=2 or swqtzt=2 or xwqdzt=2 or xwqtzt=2"
count = 0
rs.open sql,conn,1,3
if rs.eof or rs.bof then
rsponse.write("没有记录")
Else
count =rs.RecordCount
End if
%>
<p class="center">
需要修改的记录有<%=count%>条
</p>
<form action="qd_up.asp" method="post">
<p class="center">
<input type ="submit" value="提交修改记录" size="20">
</p>
</form>