如何利用ASP做出基于WEB页的电子邮件系统?有这方面的文档吗?(500分,分次给)

bensula_java 2002-03-30 10:44:51
希望实现:
1、在WEB上实现邮件的收发等(如163、21CN等);
2、与现有Windows2000域用户集成:比如域用户bensula_java的登录密码是abcxxx,那么在WEB上登录时用的也是同样的密码!而该用户的邮箱类似bensula_java@domain;
3、与现有的Exchange2000邮件服务器集成,就是用户登录以后,操作的都是在Exchange2000里的邮件数据库!(其实第3步实现了,基本也算实现了第2步,因为Exchange2000与Windows2000的AD是集成的)。
先解决以上问题吧!多谢了。
...全文
145 19 打赏 收藏 转发到动态 举报
写回复
用AI写文章
19 条回复
切换为时间正序
请发表友善的回复…
发表回复
jxzqsun 2002-04-19
  • 打赏
  • 举报
回复
到www.ntbar.com 去看看吧,有这样的组件。
tfming 2002-04-19
  • 打赏
  • 举报
回复
再给你看一看它的组件,它自己提供的哟!
dim Users, User
' First, create and initialize the User object
set User=WScript.CreateObject("MailServerX.User")
User.UserName="joe"
User.Password="secret"
' Now, create the Users object, and add new user
set Users=WScript.CreateObject("MailServerX.Users")
Users.Add User
MsgBox "Now your server has " & Users.Count & " users"



dim Users, User, i
set Users=WScript.CreateObject("MailServerX.Users")
i=Users.IndexOf("joe")
if i>-1 then
set User=Users.Items(i)
User.Password="newpassword"
Users.Items(i)=User
call MsgBox("Done")
else
call MsgBox("User not found")
end if


'First, prepare lists of recipients, message body, and list
'of attachments
dim Sender, Recipients, CC, Body, Attachments, MailMessage

'From header
set Sender=WSCript.CreateObject("MailServerX.AddressItem")
Sender.Name="John Doe"
Sender.Address="jdoe@domain.com"

'To headers
set Recipients=WScript.CreateObject("MailServerX.AddressList")
Recipients.AddAddress "archie@argosoft.com","Jane Doe"

'CC Headers
set CC=WScript.CreateObject("MailServerX.AddressList")
CC.AddAddress "archie@hotmail.com","Jane Doe"

'Create message body
set Body=WScript.CreateObject("MailServerX.Lines")
Body.Add "Hi Jane"
Body.Add "I am sending test message. CC should go to your hotmail account"
Body.Add "Regards"
Body.Add "John"

'Attach files
set Attachments=WScript.CreateObject("MailServerX.Lines")
Attachments.Add "c:\temp\1.jpg"

'Now, create mail message itself, and assign values
set MailMessage=WScript.CreateObject("MailServerX.MailMessage")
MailMessage.From=Sender
MailMessage.ToRcpt=Recipients
MailMessage.CCRcpt=CC
MailMessage.Subject="Testing"
MailMessage.Body=Body
MailMessage.Attachments=Attachments

'Create SendMail object
dim SendMail
set SendMail=WScript.CreateObject("MailServerX.SendMail")

'Assign the message
SendMail.MailMessage=MailMessage

'and send it
SendMail.Send

call MsgBox("Mail has been sent")


。。。。。。。。。。。。。
还有很多!!就不在这里写了,想要自己发Email来,我认为好东东应该大家一起来用!
tfming 2002-04-19
  • 打赏
  • 举报
回复
如果想要你就发Email给我吧!我再发给你!tfm7841@163.com
哈哈,包括注册码的啊!!
但你要给我加分啊!!!!
tfming 2002-04-19
  • 打赏
  • 举报
回复
你可以下载一个ArGoSoft Mail Server,它也很好用提供了很多组件,而且如果你不想自已做,它本身就提供了网页方式的邮件处理。
很好用的啊!
shan__le 2002-04-19
  • 打赏
  • 举报
回复
这些都是网络的,你可以用Exchange2000+ASP写邮件处理,都是自己的域名,自己建立邮件处理系统等等,不过开发很难,要是能写出来,也很值钱,百万以上应该是没有问题的:)
yyy_er 2002-04-19
  • 打赏
  • 举报
回复
邮件服务器一般都带了建web邮局的范例或说明

邮件服务器很多下载网站都有啊
ksy 2002-04-19
  • 打赏
  • 举报
回复
search
ahead_lin 2002-04-19
  • 打赏
  • 举报
回复
呵呵,可以发给我一份吗?ahead_lin@163.net 谢了
alexander_lin 2002-04-10
  • 打赏
  • 举报
回复
jmail去哪下载呢
jobin 2002-04-10
  • 打赏
  • 举报
回复
gz
xiaoyu 2002-04-03
  • 打赏
  • 举报
回复
webeasymail
wanguohua 2002-04-03
  • 打赏
  • 举报
回复
你下载 JMail 组件装上, 程序代码如下:
if request.form("mail")<>"" then
name ="**公司"
senderEmail ="bensula_java@domain"
subject = "回复"
recipient =request.form("mail")
body = "内容"

' Create the JMail message Object
set msg = Server.CreateOBject( "JMail.Message" )

' Set logging to true to ease any potential debugging
' And set silent to true as we wish to handle our errors ourself
msg.Logging = true
msg.silent = true

' Enter the sender data
msg.From = senderEmail
msg.FromName = name

' Note that as addRecipient is method and not
' a property, we do not use an equals ( = ) sign
msg.AddRecipient recipient

' The subject of the message
msg.Subject = subject

' And the body
msg.body = body

' Now send the message, using the indicated mailserver
if not msg.Send("邮件服务器地址") then
Response.write "<pre>" & msg.log & "</pre>"
else
Response.write "<center><br>邮件发送成功!</center><br><br>"
end if
else

end if
我们公司服务器就是这样弄的,没出现问题.
newah 2002-04-03
  • 打赏
  • 举报
回复
强烈关注!!
zhenhao 2002-03-30
  • 打赏
  • 举报
回复
下载一个,有很多的,你喜欢哪个用哪个:)
julyclyde 2002-03-30
  • 打赏
  • 举报
回复
宁波点心局就是用WebEasyMail
theng 2002-03-30
  • 打赏
  • 举报
回复
下载webeasymail吧,支持asp对象调用,非常方便。其功能可以和绝大多数免费邮件媲美。
强烈推荐!
ksy 2002-03-30
  • 打赏
  • 举报
回复
要有固定的IP
馋嘴蜗牛 2002-03-30
  • 打赏
  • 举报
回复
第一个用 JMail 应该能实现
bensula_java 2002-03-30
  • 打赏
  • 举报
回复
我等了一个下午,怎么就没人懂呢?

28,406

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧