?? responsedelt.asp
字號:
<!--#include file="../conndb.asp"-->
<!--#include file="isUser.asp"-->
<html>
<head>
<title>刪除招聘信息</title>
</head>
<body>
<%
Dim aid
aid = Request.QueryString("aid")
'判斷是否存在此申請信息，而且為此信息作者
sql = "SELECT * FROM Application Where AppId=" & aid & " And UserName='" & Session("user_id") & "'"
Set rs = Conn.Execute(sql)
If Not rs.EOF Then
sql = "DELETE FROM Application WHERE AppId=" & aid & " And UserName='" & Session("user_id") &"'"
Set rs = Conn.Execute(sql)
Response.Write "<h3>申請信息成功刪除</h3>"
Else
Response.Write "<h3>不存在此申請信息或者您不是它的作者！</h3>"
End If
Set rs = Nothing
%>
</body>
<script language="javascript">
// 刷新父級窗口，延遲此關閉
opener.location.reload();
setTimeout("window.close()",600);
</script>
</html>?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -