#12005/1/16 17:10:33
这是个删出的但if rs.("name")=t1 then总现出
<%
dim t1
t1= request.Form("txtname")
response.Write(""&t1&"")
set rs=server.CreateObject("adodb.recordset")
sql="select *from student"
rs.open sql,conn,3,3
while not rs.eof
if rs.("name")=t1 then
rs.delete
rs.update
else
rs.movenext
end if
wend
rs.close
conn.close
set rs=nothing
set conn=nothing
response.write("ok")
%>
