⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 ads_edit.asp

📁 蓝芒3.0A最新所有功能完整破解版
💻 ASP
字号:
<!--#include file="passinc.asp" -->

<%
dim id
id = trim(request("id"))

dim issave
issave = trim(request("issave"))

sc = trim(Request("sc"))

dim ads
set ads = server.createobject("easymail.Addresses")
ads.Load Session("wem")

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.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"))


if IsNumeric(id) = true then
	ads.ModifyEmail CInt(id)
	ads.Save
end if

	set ads = nothing

	response.redirect "ads_brow.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_edit.asp">
<input type="hidden" name="sc" value="<%=sc %>">
<input type="hidden" name="issave" value="1">
<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 align="right" height="30" style="border-bottom:1px #8CA5B5 solid;">
		<input type=button value=" Save " LANGUAGE=javascript onclick="gosub()" class="Bsbttn">&nbsp;
		<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 height="30">
          <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>
                    <td>Other Email</td>
                    <td>
                      <input type=text size="20" name="Other_Email" value="<%=ads.other_email %>" class="textbox" maxlength="128">
                    </td>
                  </tr>
                </table>
              </td>
            </tr>
          </table>
        </td>
      </tr>
    </table>
  </div>
  <p align="center">&nbsp;</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>
  <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" value="<%=ads.wi_zip %>" class="textbox" maxlength="16">
                    </td>
                    <td>Address</td>
                    <td colspan=3>
                      <input type=text size="20" name="WI_Address" class="textbox" value="<%=ads.wi_address %>" maxlength="64">
                    </td>
                  </tr>
                  <tr>
                    <td>City</td>
                    <td>
                      <input type=text size="20" name="WI_City" value="<%=ads.wi_city %>" class="textbox" maxlength="64">
                    </td>
                    <td>State</td>
                    <td>
                      <input type=text size="20" name="WI_State" value="<%=ads.wi_state %>" class="textbox" maxlength="64">
                    </td>
                  </tr>
                  <tr>
                    <td>Country</td>
                    <td>
                      <input type=text size="20" name="WI_Country" value="<%=ads.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" value="<%=ads.birthday %>" class="textbox">
					</td>
                    <td>Website</td>
                    <td>
                      <input type=text size="20" name="HomePage" value="<%=ads.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 align="right" height="30" style="border-bottom:1px #8CA5B5 solid;">
		<input type=button value=" Save " LANGUAGE=javascript onclick="gosub()" class="Bsbttn">&nbsp;
		<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 + -