页面邮件发送代码 HTML 页面。 求源代码。详细点。 要可以行的。_百度...
发布网友
发布时间：2022-04-24 14:56
共1个回答
热心网友
时间：2022-04-15 09:20
这是一个Email订阅站会刊的html代码，你就参考着来吧，希望能给你帮助。
需要说明的是：
1、您需要dysend.asp和GetMailok.asp程序的配合。
2、相关邮件系统的支持。
祝福你！
附html代码：
<table width="100%" border="0" align="right" cellpadding="0" cellspacing="0">
<tr>
<form name="youjian" method="post" action="dysend.asp">
<td width=""100% style='padding-left:1px'>
<input name="useremail" type="text" id=ymail name=ymail style="ime-mode:disabled"onfocus="this.value=''" value="填写Email订阅本站会刊" size="19">
<INPUT class=go-wenbenkuang name=Submit2 onclick="DoMail('1',this.form.ymail.value);" type=button value=订阅>
<INPUT class=go-wenbenkuang name=Submit4 onclick="DoMail('0',this.form.ymail.value);" type=button value=退定>
</td> <SCRIPT>
function checkEmail(str)
{
//如果为空，则通过校验
if(str == "")
return false;
if (str.charAt(0) == "." || str.charAt(0) == "@" || str.indexOf('@', 0) == -1
|| str.indexOf('.', 0) == -1 || str.lastIndexOf("@") == str.length-1 || str.lastIndexOf(".") == str.length-1)
return false;
else
return true;
}//~~~
function DoMail(ntype,mail)
{
//检查mail
if(!checkEmail(mail))
{
alert("请检查Email是否正确");
return;
}
window.open("/GetMailok.asp?Do="+ntype+"&mail="+mail,"","width=200px,height=100");
}
</SCRIPT>
</form>
</tr>
</table>
