M
Milton Snider
I tried using the following vbscript to turn on the cdoReturnReceiptTo and
recieved an error: http 500 server error. When I remove the code the script
works fine. This is running on an IIS 5 server in win2000 server. Can
anyone tell me how to make the reciept function work? The BCC doesn't work
either. Can I put more than one address in the .To parameter? Here is the
code.
<html>
<%
Dim MyMail
Dim mypath
mypath = Server.MapPath(Application("FrontPage_VRoot")) & "\email.htm"
Set MyMail = Server.CreateObject("CDO.Message")
With MyMail
.Fields(cdoDispositionNotificationTo) = "(e-mail address removed)"
.Fields(cdoReturnReceiptTo) = "(e-mail address removed)"
.Fields.Update
End With
MyMail.From = "(e-mail address removed)"
MyMail.To = "(e-mail address removed)"
MyMail.Bcc ="(e-mail address removed)"
MyMail.Subject = "Bankruptcy CMECF Operations Forum Registration"
MyMail.TextBody = "TEST EMAIL" & vbCrLf & "Line # 2!" & vbCrLf
MyMail.AddAttachment mypath
MyMail.Fields.Update()
MyMail.Send()
Set MyMail = Nothing
%>
<head>
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Email and Update</title>
</head>
<body>
</body>
</html>
recieved an error: http 500 server error. When I remove the code the script
works fine. This is running on an IIS 5 server in win2000 server. Can
anyone tell me how to make the reciept function work? The BCC doesn't work
either. Can I put more than one address in the .To parameter? Here is the
code.
<html>
<%
Dim MyMail
Dim mypath
mypath = Server.MapPath(Application("FrontPage_VRoot")) & "\email.htm"
Set MyMail = Server.CreateObject("CDO.Message")
With MyMail
.Fields(cdoDispositionNotificationTo) = "(e-mail address removed)"
.Fields(cdoReturnReceiptTo) = "(e-mail address removed)"
.Fields.Update
End With
MyMail.From = "(e-mail address removed)"
MyMail.To = "(e-mail address removed)"
MyMail.Bcc ="(e-mail address removed)"
MyMail.Subject = "Bankruptcy CMECF Operations Forum Registration"
MyMail.TextBody = "TEST EMAIL" & vbCrLf & "Line # 2!" & vbCrLf
MyMail.AddAttachment mypath
MyMail.Fields.Update()
MyMail.Send()
Set MyMail = Nothing
%>
<head>
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Email and Update</title>
</head>
<body>
</body>
</html>