使用asp实现支持附件的邮件系统(一)

丶佐熙小姐

丶佐熙小姐

2016-01-29 17:42

使用asp实现支持附件的邮件系统(一),使用asp实现支持附件的邮件系统(一)
  大家经常探讨使用asp,而不使用其他组建能否实现文件的上传,从而开发出支持邮件附件的邮件系统,答案是可以的。请看:

以下是发送邮件的页面,邮件的帐号是员工号,假设是5位的数字,sendmail.asp当然是在合法登陆后才能够看到的


<html
<head
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"
<link rel="stylesheet" type="text/css" href="/css/FORUM.CSS"
<style type=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
<body bgcolor="#FEF7ED"
<script language="javascript"
<%
if session("myid")="" or len(session("myid"))<5 then
response.write "window.open('nolog.asp',target='_top');"
end if
%
function check(theform)
{

   if (theform.geterempl.value=='')
     {
        alert('请输入收件人!');
        theform.geterempl.focus();
        return false;
      }
   if (theform.emailtitle.value=='')
     {
        alert('请输入主题!');
        theform.emailtitle.focus();
        return false;
      }
   if (theform.emailtitle.value.length200)
     {
        alert('主题请少于200字节');
        theform.emailtitle.focus();
        return false;
      }
   if (theform.body.value.length15*1024)
     {
        alert('正文请少于16K');
        theform.body.focus();
        return false;
      }
   if (theform.emailshowname.value.length1024)
     {
        alert('签名请少于1K');
        theform.emailshowname.focus();
        return false;
      }


}
</script
<%
meth=request.querystring("meth")
if meth=1 then
    geterempl=trim(request.querystring("geterempl"))
    emailtitle=trim(request.querystring("emailtitle"))
elseif meth=2 then
    mailid=trim(request.querystring("mailid"))
              set conn=server.createobject("adodb.connection")           
conn.open "DSN=;UID=;PWD="           
              dsnpath="DSN=;UID=;PWD="           
  set rs=server.createobject("adodb.recordset")           
             
展开更多 50%)
分享

猜你喜欢

使用asp实现支持附件的邮件系统(一)

ASP
使用asp实现支持附件的邮件系统(一)

使用asp实现支持附件的邮件系统(二)

ASP
使用asp实现支持附件的邮件系统(二)

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

使用asp实现支持附件的邮件系统(三)

ASP
使用asp实现支持附件的邮件系统(三)

用ASP实现支持附件的EMail系统

ASP
用ASP实现支持附件的EMail系统

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

《功夫英雄》邮件系统

网络游戏
《功夫英雄》邮件系统

搭建Linux邮件网关与邮件系统

电脑入门
搭建Linux邮件网关与邮件系统

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

Windows XP SP2配置及故障解决技巧大揭露

Windows XP SP2配置及故障解决技巧大揭露

Word2007也能认生字查单词

Word2007也能认生字查单词
下拉加载更多内容 ↓