📄 ads_add.asp
字号:
<!--#include file="passinc.asp" -->
<%
issave = trim(request("issave"))
mode = trim(Request("mode"))
sc = trim(Request("sc"))
if issave = "1" and Request.ServerVariables("REQUEST_METHOD") = "POST" then
dim ads
set ads = server.createobject("easymail.Addresses")
ads.Load Session("wem")
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.other_email = trim(request("Other_Email"))
ads.pm_home = trim(request("PM_Home"))
ads.pm_work = trim(request("PM_Work"))
ads.mobile = trim(request("PM_Mobile"))
ads.wi_zip = trim(request("WI_ZIP"))
ads.wi_country = trim(request("WI_Country"))
ads.wi_state = trim(request("WI_State"))
ads.wi_city = trim(request("WI_City"))
ads.wi_address = trim(request("WI_Address"))
ads.birthday = trim(request("Birthday"))
ads.homepage = trim(request("HomePage"))
isok = ads.AddNewEmail()
ads.Save
set ads = nothing
if isok = true then
if mode = "saveadd" then
response.redirect "ads_add.asp?sc=" & sc & "&" & getGRSN()
else
response.redirect "ads_brow.asp?sc=" & sc & "&" & getGRSN()
end if
else
response.redirect "err.asp?" & getGRSN()
end if
end if
%>
<html>
<head>
<title>Corp.Email</title>
<LINK href="images\hwem.css" rel=stylesheet>
</head>
<script language="JavaScript">
<!--
function back_onclick() {
location.href = "ads_brow.asp?sc=<%=sc %>&<%=getGRSN() %>";
}
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.mode.value = "save"
f1.submit();
}
}
function saveadd_onclick() {
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.mode.value = "saveadd"
f1.submit();
}
}
// -->
</script>
<body>
<form name="f1" method=post action="ads_add.asp">
<input type="hidden" name="issave" value="1">
<input type="hidden" name="mode">
<input type="hidden" name="sc" value="<%=sc %>">
<input type="hidden" name="id" value="<%=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 height="30" style="border-bottom:1px #8CA5B5 solid;">
<table cellpadding=0 cellspacing=0 border=0 width="100%">
<tr>
<td align="right">
<input type=button value=" Save " LANGUAGE=javascript onclick="gosub()" class="Bsbttn">
<INPUT id=button1 type=button value="Append" LANGUAGE=javascript onclick="saveadd_onclick()" class="Bsbttn">
<INPUT id=button1 type=reset value=" Reset " class="Bsbttn">
<input type=button value="Cancel" LANGUAGE=javascript onclick="back_onclick()" class="Bsbttn">
</td>
</td>
</tr>
</table>
</td>
</tr>
</table>
</div><br>
<div align="center">
<table width="90%" border="0" align="center" cellspacing="0" bgcolor="#EFF7FF">
<tr bgcolor="#EFF7FF" style='border:1px #8CA5B5 solid;font-size: 9pt;'>
<td style="border-left:1px #8CA5B5 solid; border-top:1px #8CA5B5 solid; border-right:1px #8CA5B5 solid; border-bottom:1px #8CA5B5 solid;">
<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" class="textbox" maxlength="64"> *
</td>
<td>Email</td>
<td>
<input type=text size="20" name="Email" class="textbox" maxlength="128"> *
</td>
</tr>
<tr>
<td>First Name</td>
<td>
<input type=text size="20" name="First_Name" class="textbox" maxlength="32">
</td>
<td>Last Name</td>
<td>
<input type=text size="20" name="Last_Name" class="textbox" maxlength="32">
</td>
</tr>
<tr>
<td>Company</td>
<td>
<input type=text size="20" name="Company" class="textbox" maxlength="64">
</td>
<td>Other Email</td>
<td>
<input type=text size="20" name="Other_Email" class="textbox" maxlength="128">
</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" class="textbox" maxlength="32">
</td>
<td>Work phone</td>
<td>
<input type=text size="20" name="PM_Work" class="textbox" maxlength="32">
</td>
</tr>
<tr>
<td>Mobile</td>
<td>
<input type=text size="20" name="PM_Mobile" class="textbox" maxlength="16">
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
<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>
<td align=left bgcolor="#336699"> <font face="Arial,Helvetica" color="#ffffff"><b>Address Information</b></font></td>
</tr>
<tr>
<td bgcolor="#EFF7FF">
<table border=0 cellspacing=0 cellpadding=4 width="100%">
<tr>
<td>ZIP</td>
<td>
<input type=text size="20" name="WI_ZIP" class="textbox" maxlength="16">
</td>
<td>Address</td>
<td colspan=3>
<input type=text size="20" name="WI_Address" class="textbox" maxlength="64">
</td>
</tr>
<tr>
<td>City</td>
<td>
<input type=text size="20" name="WI_City" class="textbox" maxlength="64">
</td>
<td>State</td>
<td>
<input type=text size="20" name="WI_State" class="textbox" maxlength="64">
</td>
</tr>
<tr>
<td>Country</td>
<td>
<input type=text size="20" name="WI_Country" class="textbox" maxlength="64">
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
<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>
<td align=left bgcolor="#336699"> <font face="Arial,Helvetica" color="#ffffff"> <b>Other Information</b></font>
</td>
</tr>
<tr>
<td bgcolor="#EFF7FF">
<table border=0 cellspacing=0 cellpadding=4 width="100%">
<tr>
<td>Birthday</td>
<td>
<input type=text maxlength="16" name="Birthday" class="textbox">
</td>
<td>Website</td>
<td>
<input type=text size="20" name="HomePage" class="textbox" maxlength="128">
</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 height="30" style="border-bottom:1px #8CA5B5 solid;">
<table cellpadding=0 cellspacing=0 border=0 width="100%">
<tr>
<td align="right">
<input type=button value=" Save " LANGUAGE=javascript onclick="gosub()" class="Bsbttn">
<INPUT id=button1 type=button value="Append" LANGUAGE=javascript onclick="saveadd_onclick()" class="Bsbttn">
<INPUT id=button1 type=reset value=" Reset " class="Bsbttn">
<input type=button value="Cancel" LANGUAGE=javascript onclick="back_onclick()" class="Bsbttn">
</td>
</td>
</tr>
</table>
</td>
</tr>
</table>
</div></form>
<br>
</body>
</html>
<%
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 + -