?? addadmin.asp
字號:
<!--#include file="Conn.Asp"-->
<!--#include file="md5.Asp"-->
<%
dim rs,sql,admin,pass
admin=request("admin")
pass=md5(request("pass"))
if admin="" or pass="" then
response.write"<script languange=javascript>alert('管理員或密碼不能為空!');"
response.write"javascript:history.go(-1)</script>"
else
Set Rs = Server.CreateObject("ADODB.RecordSet")
Rs.Open "Select * From adminxx Where Admin_MName = '"&admin&"'" ,Conn,1,3
If Not Rs.Eof Then
Call Msgs("用戶名已經被注冊,請重選一個注冊!","adminxx.asp")
Else
rs.addnew
rs("Admin_MName")=admin
rs("Admin_MPass")=pass
rs.update
rs.close
Call Msgs("添加用戶成功!!","adminxx.asp")
end if
end if
%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -