Hi gurus

I am trying to sedn email using the vbsendmail on my VB6 version, I know, I know,"update" but I really would like this to work and here is my problem.

I can send emails internally with or without attachment but for some reason I cant send email to outside the company, we host our own exchange server 2000 and I would like to send email out of my domain, not just within our domain.

here is what I have so far with the help of you guys.

Code:
Dim stringmessage As String
Dim stringmessage2 As String
Dim stringmessage3 As String



' initialize the component
Set poSendMail = New clsSendMail


stringmessage = "test1"
stringmessage2 = "test2"
stringmessage3 = "test3"




poSendMail.SMTPHost = "my server name"
poSendMail.From = "[email protected]" 
poSendMail.Recipient = "[email protected]"
poSendMail.Subject = "Outside email test"
poSendMail.Attachment = "test.txt"
poSendMail.Message = vbCrLf & stringmessage & vbCrLf & vbCrLf & stringmessage2 & vbCrLf & vbCrLf & stringmessage3

poSendMail.Send

End
Thanks for any help I can get guys