📄 ads_pubedit.asp
字号:
<!--#include file="passinc.asp" -->
<%
dim ismanager
ismanager = false
if isadmin() = true then
ismanager = true
end if
%>
<%
dim id
id = trim(request("id"))
sc = trim(Request("sc"))
dim issave
issave = trim(request("issave"))
dim ads
set ads = server.createobject("easymail.Pub_Addresses")
ads.Load
if issave = "1" and Request.ServerVariables("REQUEST_METHOD") = "POST" then
ads.CreateNewEmail
ads.nickname = trim(request("CName"))
ads.email = trim(request("Email"))
ads.first_name = trim(request("First_Name"))
ads.last_name = trim(request("Last_Name"))
ads.company = trim(request("Company"))
ads.pm_home = trim(request("PM_Home"))
ads.pm_work = trim(request("PM_Work"))
ads.mobile = trim(request("PM_Mobile"))
if IsNumeric(id) = true then
ads.ModifyEmail CInt(id)
ads.Save
end if
set ads = nothing
response.redirect "ads_pubbrow.asp?sc=" & sc & "&" & getGRSN()
end if
if IsNumeric(id) = true then
ads.MoveTo CInt(id)
end if
%>
<html>
<head>
<title>Corp.Email</title>
<LINK href="images\hwem.css" rel=stylesheet>
</head>
<script language="JavaScript">
<!--
function gosub() {
if (f1.CName.value == "")
{
alert("Please enter Quickname.");
f1.CName.focus();
}
else if (f1.Email.value == "")
{
alert("Please enter Email.");
f1.Email.focus();
}
else
f1.submit();
}
// -->
</script>
<body>
<form name="f1" method=post action="ads_pubedit.asp">
<input type="hidden" name="sc" value="<%=sc %>">
<input type="hidden" name="issave" value="1">
<input type="hidden" name="id" value="<%=trim(request("id")) %>">
<br>
<br>
<div align="center">
<table width="90%" border="0" align="center" cellspacing="0" bgcolor="#EFF7FF" style='border-top:1px #8CA5B5 solid;'>
<tr bgcolor="#EFF7FF" style='border:1px #8CA5B5 solid;font-size: 9pt;'>
<td align="right" height="30" style="border-bottom:1px #8CA5B5 solid;">
<% if ismanager = true then %>
<input type=button value=" Save " LANGUAGE=javascript onclick="gosub()" class="Bsbttn">
<% end if %>
<input type=button value="Cancel" LANGUAGE=javascript onclick="javascript:history.back();" class="Bsbttn">
</td>
</tr>
</table>
</div>
<br>
<div align="center">
<table width="90%" border="0" align="center" cellspacing="0" bgcolor="#EFF7FF" style="border-left:1px #8CA5B5 solid; border-top:1px #8CA5B5 solid; border-right:1px #8CA5B5 solid; border-bottom:1px #8CA5B5 solid;">
<tr bgcolor="#EFF7FF" style='border:1px #8CA5B5 solid;font-size: 9pt;'>
<td>
<table cellpadding=3 cellspacing=1 border=0 width="100%">
<tr>
<td bgcolor="#EFF7FF">
<table border=0 cellspacing=0 cellpadding=4 width="100%">
<tr>
<td>Quickname</td>
<td>
<input type=text size="20" name="CName" value="<%=ads.nickname %>" class="textbox" maxlength="64"> *
</td>
<td>Email</td>
<td>
<input type=text size="20" name="Email" value="<%=ads.email %>" class="textbox" maxlength="128"> *
</td>
</tr>
<tr>
<td>First Name</td>
<td>
<input type=text size="20" name="First_Name" value="<%=ads.first_name %>" class="textbox" maxlength="32">
</td>
<td>Last Name</td>
<td>
<input type=text size="20" name="Last_Name" value="<%=ads.last_name %>" class="textbox" maxlength="32">
</td>
</tr>
<tr>
<td>Company</td>
<td>
<input type=text size="20" name="Company" value="<%=ads.company %>" class="textbox" maxlength="64">
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
<p align="center"> </p>
<p align="center">
<div align="center">
<table cellpadding=0 cellspacing=0 border=0 width="90%">
<tr bgcolor=999999>
<td>
<table cellpadding=3 cellspacing=1 border=0 width="100%">
<tr bgcolor="#336699">
<td align=left> <font face="Arial,Helvetica" color="#ffffff"><b>Communication Information</b></font></td>
</tr>
<tr>
<td bgcolor="#EFF7FF">
<table border=0 cellspacing=0 cellpadding=4 width="100%">
<tr>
<td>Home phone</td>
<td>
<input type=text size="20" name="PM_Home" value="<%=ads.pm_home %>" class="textbox" maxlength="32">
</td>
<td>Work phone</td>
<td>
<input type=text size="20" name="PM_Work" value="<%=ads.pm_work %>" class="textbox" maxlength="32">
</td>
</tr>
<tr>
<td>Mobile</td>
<td>
<input type=text size="20" name="PM_Mobile" value="<%=ads.mobile %>" class="textbox" maxlength="16">
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
<br>
<div align="center">
<table width="90%" border="0" align="center" cellspacing="0" bgcolor="#EFF7FF" style='border-top:1px #8CA5B5 solid;'>
<tr bgcolor="#EFF7FF" style='border:1px #8CA5B5 solid;font-size: 9pt;'>
<td align="right" height="30" style="border-bottom:1px #8CA5B5 solid;">
<% if ismanager = true then %>
<input type=button value=" Save " LANGUAGE=javascript onclick="gosub()" class="Bsbttn">
<% end if %>
<input type=button value="Cancel" LANGUAGE=javascript onclick="javascript:history.back();" class="Bsbttn">
</td>
</tr>
</table>
</div>
</form>
<br>
</body>
</html>
<%
set ads = nothing
%>
<%
function mReplace(tempstr)
dim cstr
cstr = replace(tempstr , """", "'")
mReplace = replace(cstr , "'", "''")
end function
function mmReplace(tempstr)
mmReplace = replace(tempstr , "'","''")
end function
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -