📄 reg_room.asp
字号:
<!--#include file="conn.asp"-->
<%
dim ssd
ssd=Trim(Request.QueryString("ssd"))
set cmd=Server.CreateObject("ADODB.COMMAND")
cmd.ActiveConnection=conn
cmd.CommandText="select count(*) from room where room_id='"&ssd&"'"
set rs=cmd.execute
if rs(0)=0 then
resu=Server.URLEncode("对不起,该房间不存在!!!")
else
cmd.CommandText="select count(*) from userlist where room_id='"&ssd&"'"
set rs=cmd.execute
if rs(0)>0 then
resu=Server.URLEncode("对不起,该房间已经被注册!!!")
else
resu=Server.URLEncode("该房间可以使用!")
end if
end if
Response.Redirect "../register.asp?resu="&resu&"&room_id="&ssd
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -