📄 deletetouchman.asp
字号:
<%
%>
<!--#include file='../conn.asp'-->
<!--#include file='../IsUser.asp'-->
<%
TouchManID = request("TouchManID")
BackID = request("backid")
if TouchManID <> "" then
set rs=conn.execute("select * from TouchMan where TouchManID="&TouchManID)
if rs.bof or rs.eof then
response.write "<script language=javascript>"
response.write"alert('该客户联系人不存在！');"
response.write"location.href='TouchMan.asp';"
response.write "</script>"
response.end
end if
NewTouchManID = rs("TouchManID")
CreatorID =rs("TouchManCreatorID")
if CreatorID <> User_ID then
response.write "<script language=javascript>"
response.write"alert('你不能删除该联系人资料！');"
response.write"location.href='TouchMan.asp?TouchManID="& TouchManID &"';"
response.write "</script>"
response.end
end if
rs.close
set rs=nothing
conn.execute("delete from TouchMan where TouchManID="& TouchManID) '删除记录
%>
<html>
<head>
<title>删除联系人</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"><META HTTP-EQUIV="Pragma" CONTENT="no-cache">
<LINK
href="../css.css" type=text/css rel=stylesheet>
</head>
<body>
<br>
<table width="100%" border="0" cellspacing="0" cellpadding="0" align=center>
<tr>
<td width="100%" height="197" align="center">
<table border="0" cellspacing="0" cellpadding="0" height="85" bgcolor="#99ccff" width="100%">
<tr>
<td align="center">
<%if BackID<>"" then%>
<a href="TouchMan.asp?TouchManID=<%=BackID%>" class=linkblue2>已删除该联系人记录</a>
<%else%>
<a href="TouchMan.asp" class=linkblue2>已删除该联系人记录</a>
<%end if%>
<%
response.write "<script>"
if BackID<>"" then
response.write "setTimeout("&Chr(34)&"location.replace('TouchMan.asp?TouchManID="&BackID&"')"&Chr(34)&",2000)"
else
response.write "setTimeout("&Chr(34)&"location.replace('TouchMan.asp')"&Chr(34)&",2000)"
end if
response.write "</script>"
%>
</td>
</tr>
</table>
</td>
</tr>
</table>
<p>
</body>
</html>
<%
else
response.write "<script language=javascript>"
response.write"alert('访问方式错误！');"
response.write"location.href='/index.asp';"
response.write "</script>"
response.end
end if
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -