|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
强大的可扩展性。ASP具有强大的扩展性,可以实现与多种网络、硬件设备的连接:通过专用的通讯线路远程接入企业;通过远程拨号服务器为远程拨号客户提供服务;通过WAP为移动电话互联网客户服务。人人常常切磋利用asp,而不利用其他组建可否完成文件的上传,从而开辟出撑持邮件附件的邮件体系,谜底是能够的。请看:
以下是发送邮件的页面,邮件的帐号是员工号,假定是5位的数字,sendmail.asp固然是在正当上岸后才干够看到的
<html>
<head>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
<linkrel="stylesheet"type="text/CSS"href="/css/FORUM.CSS">
<styletype=text/css>
<!--
input{font-size:9pt;color:#0011dd;background-color:#e9e9f9;padding-top:0px}
select{font-size:9pt;color:#0011dd;background-color:#e9e9f9;padding-top:0px}
textarea{font-size:9pt;color:#0011dd;background-color:#e9e9f9;padding-top:0px}
-->
</style>
<title>邮件体系</title></head>
<bodybgcolor="#FEF7ED">
<scriptlanguage="javascript">
<%
ifsession("myid")=""orlen(session("myid"))5then
response.write"window.open(nolog.asp,target=_top);"
endif
%>
functioncheck(theform)
{
if(theform.geterempl.value==)
{
alert(请输出收件人!);
theform.geterempl.focus();
returnfalse;
}
if(theform.emailtitle.value==)
{
alert(请输出主题!);
theform.emailtitle.focus();
returnfalse;
}
if(theform.emailtitle.value.length>200)
{
alert(主题请少于200字节);
theform.emailtitle.focus();
returnfalse;
}
if(theform.body.value.length>15*1024)
{
alert(注释请少于16K);
theform.body.focus();
returnfalse;
}
if(theform.emailshowname.value.length>1024)
{
alert(署名请少于1K);
theform.emailshowname.focus();
returnfalse;
}
}
</script>
<%
meth=request.querystring("meth")
ifmeth=1then
geterempl=trim(request.querystring("geterempl"))
emailtitle=trim(request.querystring("emailtitle"))
elseifmeth=2then
mailid=trim(request.querystring("mailid"))
setconn=server.createobject("adodb.connection")
conn.open"DSN=;UID=;PWD="
dsnpath="DSN=;UID=;PWD="
setrs=server.createobject("adodb.recordset")
selectnew="select*fromt_mailwhere((geterempllike%"&session("myid")&"%ordeleempllike%"&session("myid")&"%orreceempllike%"&session("myid")&"%)and(notdeleverempllike%"&session("myid")&"%))andmailid="&mailid&""
rs.openselectnew,dsnpath,3,3
ifrs.boforrs.eofthen
%>
<scriptlanguage="javascript">
alert("您没有检察这封邮件的权限!");
window.history.back();
</script>
<%
response.end
else
body=rs("body")
emailtitle=rs("emailtitle")
rs.close
setrs=nothing
conn.close
setconn=nothing
endif
endif
%>
<Formname="upload_file"onSubmit="returncheck(this)"action="loadmail.asp"method=postenctype="multipart/form-data">
<tablewidth="100%"border="0"cellspacing="2"cellpadding="2">
<tr>
<tdwidth="11%">
<divalign="right">发件人:</div>
</td>
<tdwidth="89%">
<inputtype="hidden"name="senderempl"value="<%=session("myid")%>">
<%=session("myid")%></td>
</tr>
<tr>
<tdwidth="11%">
<divalign="right">收件人:</div>
</td>
<tdwidth="89%">
<inputtype="text"name="geterempl"size="40"value="<%=geterempl%>">
<inputtype="checkbox"name="emaillevel"value="1"style="background-color:#FEF7ED">
告急函件</td>
</tr>
<tr>
<tdwidth="11%"valign="top"></td>
<tdwidth="89%">发送多团体的时分可使用"<fontcolor="#9999FF">|</font>"离隔,比方:<fontcolor="#3399FF">01234|01235|01236</font>,第一名和最初一名不必要"<fontcolor="#9999FF">|</font>"<br>
<fontcolor="#FF0000">新功效</font>:您能够把信信间接发送给您设定的<ahref=&quo</p>源代码保护方面其实现在考虑得没那么多了..NET也可以反编译.ASP写得复杂的话别人能看得懂的话.他也有能力自己写了.这方面担心的倒不太多.纵观现在网上可以下载的那些所谓BBS还有什么网站等等的源代码 |
|