del.asp

来自「网佳网络办公系统（以下简称OA）是一套基于B/S模式的无纸化办公系统。[显著特点」· ASP 代码 · 共 22 行

<!--#include file="bkconn.asp"-->
<%
if request.querystring("id")="" then
response.write "没有正确的ID号"
else
uid=clng(request.querystring("id"))
end if
	    Set rs=server.createobject("adodb.recordset")
        SQL="select * from zhanghao where id=" &uid
        rs.open sql,conn,1,3
       do while not rs.eof
       conn.Execute(SQL)
	   rs.delete
	rs.update
    rs.movenext
   loop
    set rs=nothing
    conn.close
    set conn=nothing
response.write "记录已经删除!"
response.end
%>