📄 checkusername.asp
字号:
<%@LANGUAGE="VBSCRIPT.Encode" CODEPAGE="936"%>
<!-- #include file="../Inc/config.asp" -->
<!-- #include file="../Inc/ch2utf8.asp" -->
<%
dbstr="../"
username=Trim(request("username"))
dim conn,rs,sql
set conn=getconn()
set rs=getrs()
sql="select * from users where username='"&username&"'"
rs.open sql,conn,1,1
if rs.bof and rs.eof then
errormsg="此用户名可用!"
Call chinese2unicode(errormsg)
else
errormsg="对不起,此用户名已被注册!"
Call chinese2unicode(errormsg)
end if
if errormsg<>"" then response.write("<p class='midBlue'>"&errormsg&"</p>")
rs.close
closeconn(conn)
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -