删除功能不知道怎么用?
<%
on error resume next
set rst=server.CreateObject("ADODB.recordset")
if request.querystring("act")="del" then
id=rst("u_id")
conn.begintrans
rst1.open "select * from users where u_id="&id,conn,1,3
rst.delete
rst.close
if err.number<>0 then
connrollbacktrans
response.write "删除失败!"
response.write err.description
else
conn.committrans
response.write "删除成功!"
end if
end if
%>