UC知道ASP验证用户名重名
来源：百度知道 编辑：UC知道 时间：2024/05/23 01:17:37
我是用DW生成的代码,我想让它在用户名重复的时候弹出对话框,而不是跳转页面,一下是DW的代码:
<%
' *** Redirect if username exists
MM_flag="MM_insert"
If (CStr(Request(MM_flag)) <> "") Then
MM_dupKeyRedirect="/2.asp"
MM_rsKeyConnection=MM_state_STRING
MM_dupKeyUsernameValue = CStr(Request.Form("用户名"))
MM_dupKeySQL="SELECT admin FROM admin WHERE admin='" & Replace(MM_dupKeyUsernameValue,"'","''") & "'"
MM_adodbRecordset="ADODB.Recordset"
set MM_rsKey=Server.CreateObject(MM_adodbRecordset)
MM_rsKey.ActiveConnection=MM_rsKeyConnection
MM_rsKey.Source=MM_dupKeySQL
MM_rsKey.CursorType=0
MM_rsKey.CursorLocation=2
MM_rsKey.LockType=3
MM_rsKey.Open
If Not MM_rsKey.EOF Or Not MM_rsKey.BOF Then
' the username was found - can not add the requested username
MM_qsChar = "?"
<%
' *** Redirect if username exists
MM_flag="MM_insert"
If (CStr(Request(MM_flag)) <> "") Then
MM_dupKeyRedirect="/2.asp"
MM_rsKeyConnection=MM_state_STRING
MM_dupKeyUsernameValue = CStr(Request.Form("用户名"))
MM_dupKeySQL="SELECT admin FROM admin WHERE admin='" & Replace(MM_dupKeyUsernameValue,"'","''") & "'"
MM_adodbRecordset="ADODB.Recordset"
set MM_rsKey=Server.CreateObject(MM_adodbRecordset)
MM_rsKey.ActiveConnection=MM_rsKeyConnection
MM_rsKey.Source=MM_dupKeySQL
MM_rsKey.CursorType=0
MM_rsKey.CursorLocation=2
MM_rsKey.LockType=3
MM_rsKey.Open
If Not MM_rsKey.EOF Or Not MM_rsKey.BOF Then
' the username was found - can not add the requested username
MM_qsChar = "?"
换成:
Response.write(\"<script language=javascript>\")
Response.write(\"alert(\'对不起，用户名已存在\');\")
Response.write(\"history.go(-1);\")
Response.write(\"</script>\")
以上程序代码，把“\”去掉
换成response.write("<script>window.alert('对不起，用户名存在');history.back(-1);</script>")如果不行，加我qq：9799004
用response.write("<script>window.alert('对不起，用户名存在');history.back(-1);</script>") 弹出对话框,确定后返回。
还可以用response.write("<script>window.alert('对不起，用户名存在');location.href="某个页面";</script>") 弹出对话框,确定后跳到你想去的页面