check03.asp

一个很COOL的按钮FLASH,满不错的!

<!--#include file=conn.asp-->
<%
sql="select * from adminuser where id="&request("id")
set rs=conn.execute(sql)
if session("name")<>rs("uid") or session("name")="" then
Response.Redirect("login.asp")
end if
%>
<%
if request("pwd")="" or request("uid")="" then    
response.write "<script language='javascript'>" & VbCRlf
response.write "alert('修改资料失败，请正确输入带＊号的选项！');" & VbCrlf
response.write "history.go(-1);" & vbCrlf
response.write "</script>" & VbCRLF
response.end
else
sql="update adminuser set uid='"&request("uid")&"',pwd='"&request("pwd")&"' where id="&request("id")&""
conn.execute(sql)
response.redirect("login.asp") 
end if    
session("name")=""
rs.close
set rs=nothing
%>