谁能给我一份这样的代码？或者把代码列在下面。急用！谢谢。
我的邮箱：[email protected]
---------------------------------------------------------------
原理及其简单：
从用户输入的登陆账号名，查出其电子邮件地址以及密码，然后就用类似CDONTS.NEWMAIL的组件发送邮件给用户:
Dim sEmail, sPassword
'get password and email address
Dim myMail
Set myMail = CreateObject("CDONTS.NewMail")
myMail.From = "[email protected]"
myMail.To = sEmail
myMail.Subject = "Your Password"
myMail.Body = "This is a Your Password:" & sPassword
myMail.Send
Set myMail = Nothing
---------------------------------------------------------------
CDONTS.NEWMAIL 组件是ASP内置组件之一。。。所以不用编写。直接创建和调用
---------------------------------------------------------------
在 interdev里创建了这个对象后在YourMailObject后面敲一个点会列出全部方法属性和事件