?? savetouchman.asp
字號:
<%
%>
<!--#include file='../conn.asp'-->
<!--#include file='../IsUser.asp'-->
<%
T_TouchManID = request.form("T_TouchManID")
T_TouchManName = replace(request.form("T_TouchManName"),"'","''")
T_TouchManEmail =replace(request.form("T_TouchmanEmail"),"'","''")
T_TouchManClient=request.form("T_TouchManClient")
T_MainTouchMan =request.form("T_MainTouchman")
T_TouchManHobby = replace(request.form("T_TouchManHobby"),"'","''")
T_TouchManSection =replace(request.form("T_TouchManSection"),"'","''")
T_TouchManCity =replace(request.form("T_TouchManCity"),"'","''")
T_TouchManDuty =replace(request.form("T_TouchManDuty"),"'","''")
T_TouchManMPhone =replace(request.form("T_TouchManMPhone"),"'","''")
T_TouchManOPhone =request.form("T_TouchManOPhone")
T_TouchManHPhone=request.form("T_TouchManHPhone")
T_TouchManFax =replace(request.form("T_TouchManFax"),"'","''")
T_TouchManAddress =replace(request.form("T_TouchManAddress"),"'","''")
T_TouchManEspDay=replace(request.form("T_TouchManEspDay"),"'","''")
T_TouchManOthers =replace(request.form("T_TouchManOthers"),"'","''")
T_TouchManCreatorID=request.form("T_TouchManCreatorID")
T_CreatorSectionID=request.form("T_CreatorSectionID")
Check_Open =request.form("Check_Open")
if Check_Open="Open" then '判斷是否公開
OpenFlag = 1
else
OpenFlag = 0
end if
if T_MainTouchMan = "1" then
TouchManMain = 1
else
TouchManMain = 0
end if
T_TouchManOperatorID=request.form("T_TouchManOperatorID")
T_TouchManCreateDate=request.form("T_TouchManCreateDate")
T_TouchManUpdateDate=Date
%>
<%
if T_TouchManID<>0 then
sql= "update TouchMan set TouchManName='"&T_TouchManName&"',TouchManClientID="&T_TouchManClient&",TouchManSection='"&T_TouchManSection&"',TouchManDuty='"&T_TouchManDuty&"',TouchManMPhone='"&T_TouchManMPhone&"',TouchManOPhone='"&T_TouchManOPhone&"',TouchManHPhone='"&T_TouchManHPhone&"',TouchManFax='"&T_TouchManFax&"',TouchManEmail='"&T_TouchManEmail&"',TouchManHobby='"&T_TouchManHobby&"',TouchManEspDay='"&T_TouchManEspDay&"',TouchManAddress='"&T_TouchManAddress&"',TouchManOthers='"&T_TouchManOthers&"',TouchManCreatorID="&T_TouchManCreatorID&",TouchManCreateDate='"&T_TouchManCreateDate&"',TouchManOpenFlag="&OpenFlag&",TouchManRevisorID="&T_TouchManOperatorID&",TouchManReviseDate='"&T_TouchManUpdateDate&"',TouchManMain="&TouchManMain&" where TouchManID= '" & T_TouchManID & "'"
else
sql="insert into TouchMan (TouchManName,TouchManClientID,TouchManSection,TouchManDuty,TouchManMPhone,TouchManOPhone,TouchManHPhone,TouchManFax,TouchManEmail,TouchManHobby,TouchManEspDay,TouchManAddress,TouchManOthers,TouchManCreatorID,TouchManCreateDate,TouchManOpenFlag,TouchManRevisorID,TouchManReviseDate,TouchManMain) values ('"&T_TouchManName&"',"&T_TouchManClient&",'"&T_TouchManSection&"','"&T_TouchManDuty&"','"&T_TouchManMPhone&"','"&T_TouchManOPhone&"','"&T_TouchManHPhone&"','"&T_TouchManFax&"','"&T_TouchManEmail&"','"&T_TouchManHobby&"','"&T_TouchManEspDay&"','"&T_TouchManAddress&"','"&T_TouchManOthers&"',"&T_TouchManCreatorID&",'"&T_TouchManCreateDate&"',"&OpenFlag&","&T_TouchManOperatorID&",'"&T_TouchManUpdateDate&"',"&TouchManMain&")"
end if
conn.execute( sql ) '執(zhí)行數(shù)據(jù)庫更新
if T_TouchManID = 0 then
set rs=conn.execute("select top 1 TouchManID from TouchMan where TouchManCreatorID="&User_ID&" order by TouchmanID desc")
T_TouchManID = rs("TouchManID")
rs.close
end if
%>
<html>
<head>
<title>保存聯(lián)系人信息</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">
<a href="TouchMan.asp?TouchManid=<%=T_TouchManID%>" class=linkblue2>保存聯(lián)系人信息成功！！單擊返回</a>
<%
response.write "<script>"
response.write "setTimeout("&Chr(34)&"location.replace('TouchMan.asp?TouchManID="&T_TouchManID&"')"&Chr(34)&",2000)"
response.write "</script>"
%>
</td>
</tr>
</table>
</td>
</tr>
</table>
<p>
</body>
</html>
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -