Hanna Philippi
15-Apr-2005, 05:19 PM
guys,
I have the following code that works fine within my asp page.I need to have
it working within mt .wbo as I want to generate and send an email in the
procedure body in a web report.how can I do that and is this possible
thks
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Po#:"+iorder
myMail.From=
myMail.To=
myMail.TextBody=inotes
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
'Name or IP of remote SMTP server
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver") _
="192.168.0.7"
'Server port
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") _
=25
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") _
=1
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusername") _
=
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendpassword") _
=
myMail.Configuration.Fields.Update
myMail.Send
I have the following code that works fine within my asp page.I need to have
it working within mt .wbo as I want to generate and send an email in the
procedure body in a web report.how can I do that and is this possible
thks
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Po#:"+iorder
myMail.From=
myMail.To=
myMail.TextBody=inotes
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
'Name or IP of remote SMTP server
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver") _
="192.168.0.7"
'Server port
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") _
=25
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") _
=1
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusername") _
=
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendpassword") _
=
myMail.Configuration.Fields.Update
myMail.Send