📄 del_user.asp
字号:
<%
' Del_User.asp
Set cnObj = Server.CreateObject("ADODB.Connection")
dbpath = Server.MapPath("DB.mdb")
cnObj.ConnectionString = _
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dbpath
cnObj.Open
sqlcmd = "DELETE FROM CHAT WHERE 姓名 = ‘" & _
Replace(Session("name"),"’", "’’") & "’"
cnObj.Execute sqlcmd
%>
<html>
<head>
<title>离开聊天室程序</title>
</head>
<body background="blutextb.gif">
<center>
<h1>谢谢光临</h1>
<hr>
<p>谢谢您使用本聊天室，也感谢您对本站的支持！</p>
<p>记得下次还要再来哦！<font color="green">BYE-BYE</font></p>
</center>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -