再发一帖,请帮帮忙!
这个是万网提供的邮件组件,可是只有ASP的,怎么改成ASP.NET?
<%
Set objMail = Server.CreateObject("CDO.Message")
Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration")
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 1
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverpickupdirectory") = "c:\Inetpub\mailroot\Pickup"
objCDOSYSCon.Fields.Update
Set objMail.Configuration = objCDOSYSCon
'系统配置结束
'以下为用户自行更改部分,请由程序员进行修改
objMail.From = "you@yourhouse.com"
objMail.Subject = "CDOSYS Mail Message"
objMail.To = "yourfriend@otherdomain.com"
objMail.TextBody = "Hello World"
objMail.Send
Set objMail = Nothing
Set objCDOSYSCon = Nothing
%>