View Single Post
  #11   Report Post  
Posted to microsoft.public.excel.programming
Ron de Bruin Ron de Bruin is offline
external usenet poster
 
Posts: 11,123
Default Mailing Excel workbooks that are not active workbook

Hi Beverly

I can't help you with this
Maybe the IT guys at your work can help you..


--
Regards Ron de Bruin
(Win XP Pro SP-1 XL2000-2003)
www.rondebruin.nl



"Beverly" wrote in message ...
Hi Ron-
Sorry to be such a pest. It looks like my lotus mail server supports tcpip, nds and netbios. I see nothing about smtp.

However, we can access our mail from a webserver. I inserted my .nsf path as follows, but get a message that "the transport
failed to connect to server."

here is the code where I inserted my text:
Set Flds = iConf.FIELDS
With Flds

.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.ilsirusntsm1/mail/BeverlyMcDowell.nsf"
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
.Update
End With

With iMsg
Set .Configuration = iConf
.To = "Beverly "
.From = """Beverly"" "
.Subject = "This is a test"
.TextBody = "Hi there"
' .AddAttachment "C:\bev\" & WBname
.AddAttachment "C:\bev\bystry.xls"
' You can add any file you want with this line .AddAttachment "C:/Test.txt"
.SEND


Thanks again for your efforts
-Beverly