View Single Post
  #6 (permalink)  
Old January 4th, 2010, 02:39 AM
Trupti Trupti is offline
Registered User
Join Date: Jan 2010
Posts: 1
Thanks: 0
Thanked 0 Times in 0 Posts
Unhappy I am getting the Run-Time error - The "SendUsing" configuration value is invalid

Sub Email()

Set objmessage = CreateObject("CDO.Message")
'SmtpMail.SmtpServer = "smtpserver name"
objmessage.Subject = "Subject"
objmessage.From = ""
objmessage.To = ""
objmessage.TextBody = "Excel Data is sent successfully."

End Sub

Please let me know if you know any solution...Its urgent
Reply With Quote