saveuseradd.asp
来自「人民医院眼科全站」· ASP 代码 · 共 41 行
ASP
41 行
<!-- #include file="../include/bkconn.asp "-->
<!--#include file="checkUser.asp"-->
<!--#include file="test.asp"-->
<%
if Request("password1")<>Request("password2") then
response.write "密码、确认密码不同<br><a href='Javascript:window.history.go(-1)'>返回</a>"
response.End
end if
sql="select * from users where userID='"&Request("userID")&"'"
'response.write sql
'response.End
set rs=conn.execute (sql)
if not rs.eof then
response.write "该用户名已存在<br><a href='Javascript:window.history.go(-1)'>返回</a>"
response.End
end if
Set cmdTemp = Server.CreateObject("ADODB.Command")
Set InsertCursor = Server.CreateObject("ADODB.Recordset")
cmdTemp.CommandText = "SELECT * FROM users WHERE (name is null)"
cmdTemp.CommandType = 1
Set cmdTemp.ActiveConnection = conn
InsertCursor.Open cmdTemp, , 1, 3
InsertCursor.addnew
InsertCursor("userID") =Request("userID")
InsertCursor("name") =Request("name")
InsertCursor("password") =Request("password1")
InsertCursor("right") =Request("right")
InsertCursor.Update
InsertCursor.close
conn.close
set InsertCursor=nothing
set conn=nothing
%>
<script language=Javascript>
<!--
alert("添加成功!");
this.document.location="userAdd.asp";
-->
</script>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?