收录日期:2018/12/11 02:09:50 时间:2016/05/18 03:13:39 标签:ASP
我现在要做得是在网页上获取客户输入的资料信息,然后自动的把他的邮箱地址和输入的内容当成邮件发到我的信箱。。。先谢谢大虾们了
需要使用组件,asp不支持mail的
你是用的什么网上服务器,不一定会提供组件支持的说啊
Cdonts是IIS默认带的!一般用这个就好了!
JMAIL功能很强大如果你可以操作你的服务器最好用这个
<%  
           sub  Jmail(email)  
           Dim  JMail,SendMail  
           Set  JMail=Server.CreateObject("JMail.SMTPMail")  
           JMail.Logging=True  
           JMail.Charset="gb2312"  
           JMail.ContentType  =  "text/html"  
           JMail.ServerAddress=SMTPServer  
           JMail.Sender=SystemEmail  
           JMail.Subject=topic  
           JMail.Body=mailbody  
           JMail.AddRecipient  email  
           JMail.Priority=3  
           JMail.Execute    
           Set  JMail=nothing    
           if  err  then    
           SendMail=err.description  
           err.clear  
           else  
           SendMail="OK"  
           end  if  
           end  sub  
 
           sub  Cdonts(email)  
           dim    objCDOMail  
           Set  objCDOMail  =  Server.CreateObject("CDONTS.NewMail")  
           objCDOMail.From  =SystemEmail  
           objCDOMail.To  =email  
           objCDOMail.Subject  =topic  
           objCDOMail.BodyFormat  =  0    
           objCDOMail.MailFormat  =  0    
           objCDOMail.Body  =mailbody  
           objCDOMail.Send  
           Set  objCDOMail  =  Nothing  
           if  err  then    
           SendMail=err.description  
           err.clear  
           else  
           SendMail="OK"  
           end  if  
           end  sub  
 
           sub  aspemail(email)  
           Set  mailer=Server.CreateObject("ASPMAIL.ASPMailCtrl.1")      
           recipient=email  
           sender=SystemEmail  
           subject=topic  
           message=mailbody  
           mailserver=SMTPServer  
           result=mailer.SendMail(mailserver,  recipient,  sender,  subject,  message)  
           if  err  then    
           SendMail=err.description  
           err.clear  
           else  
           SendMail="OK"  
           end  if  
           end  sub  
%>  
to  supere(在线等待):
你说的方法我也试过,是不是还得在iis上进行什么设置?

报错:
From: postmaster@tjisc168
To: aa@263.net
Date: Sun, 25 May 2003 01:50:38 +0800
MIME-Version: 1.0
Content-Type: multipart/report; report-type=delivery-status;
boundary="9B095B5ADSN=_01C3221CE998AC4000000001tjisc168"
Message-ID: <C8wSA1Xvp00000001@tjisc168>
Subject: Delivery Status Notification (Failure)

This is a MIME-formatted message.  
Portions of this message may be unreadable without a MIME-capable mail program.

--9B095B5ADSN=_01C3221CE998AC4000000001tjisc168
Content-Type: text/plain; charset=unicode-1-1-utf-7

This is an automatically generated Delivery Status Notification.

Delivery to the following recipients failed.

       aa@263.net




--9B095B5ADSN=_01C3221CE998AC4000000001tjisc168
Content-Type: message/delivery-status

Reporting-MTA: dns;tjisc168
Received-From-MTA: dns;tjisc168
Arrival-Date: Sun, 25 May 2003 01:48:30 +0800

Final-Recipient: rfc822;aa@263.net
Action: failed
Status: 5.0.0
Diagnostic-Code: smtp;553 You are not authorized to send mail as <MAIL FROM:<aa@263.net> SIZE=497>, authentication is required


--9B095B5ADSN=_01C3221CE998AC4000000001tjisc168
Content-Type: message/rfc822

Received: from mail pickup service by tjisc168 with Microsoft SMTPSVC;
 Sun, 25 May 2003 01:48:30 +0800
From: <aa@263.net>
To: <aa@263.net>
Subject: Hello
Date: Sun, 25 May 2003 01:48:30 +0800
X-Priority: 5
X-MSMail-Priority: Low
Importance: Low
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
Message-ID: <TJISC168FRaqbC8wSA100000003@tjisc168>
X-OriginalArrivalTime: 24 May 2003 17:48:30.0384 (UTC) FILETIME=[B001C300:01C3221C]

I sent this in 3 statements!



--9B095B5ADSN=_01C3221CE998AC4000000001tjisc168--

不知道如何处理。。。。。。。

asp作的b/s 的程序怎样实现打印,在浏览器里么?没有了报表生成器之类的组件真是费劲 怎样获得本机的ip(ip是动态分配的) 请问,有什么写ASP程序的好环境?用记事本太原始! 有关rarp的问题! 大师们好,小弟想问一道简单的C语言二级考试题目,哪位大师会做,请帮帮忙 想做一个“同步备份文件夹”,能实现么? 哪里能下载vb6企业版? 200求 小弟需要天喻的IC卡双卡座读写器的驱动 200求 求购程序员考试用书!!! “网络精灵”?他是谁? 急,急,急 各位大虾:现有一个问题:如何不通过BDE,ODBC来使用Paradox? 急救!怎么用javascript去掉字符串首尾的空格。 Delphi6下,有没有作皮肤的很好用的控件,请介绍一个。 请教碎片的问题 怎样在系统托盘上显示程序图标???? ■■■上海的朋友关注一下,谢谢>>>>> 在MID子窗口中放一个BUTTON按钮,如何写代码来关闭MID子窗口?caFree不行。 有关报表的问题 帮帮忙 谢谢!!!!!!!!!!!! 急寻大侠!请教Amaya程序。 让字段保存2位小数,怎么不行?看看这个... 请看我sqlserver问的存储过程执行效率问题(100分)http://www.csdn.net/expert/topic/880/880485.xml?temp=.8870203 该不该相信微软的日历 何处寻找linux下 C/C++/Java Coding的开发环境.急需!!! 一个JNDI错误,请大家帮忙解决 内部网络中的数据库服务器怎么做物理隔离 关于绿娃传奇注册码 高分相赠(100分) 紧急求救!在线等待! 这种方法是否可以说明存在内存泄漏: 有谁做过银行外设的ActiveX控件?如密码键盘? 软件本地化是什么意思?