Thx boRg,
I found the answer by changing some codes as follows. Users who want to use JMail component on a private hosting company which demand a SMTP authentication , need to use the following modifed code.
----------------------------------------------------------
'JMail component
Case "Jmail"
'Create the e-mail server object
Set objJMail = Server.CreateObject("JMail.Message")
With objJMail
'Out going SMTP mail server address - no need here!!!
'objJMail.ServerAddress = "mail.mywebsite.com:25" ' we are removing this part which make non-sense on authentication
'Who the e-mail is from
objJMail.from = strFromEmailAddress 'changing with .from
objJMail.fromName = strFromEmailName 'changing with fromname
'Who the e-mail is sent to
objJMail.AddRecipient strRecipientEmailAddress
'The subject of the e-mail
objJMail.Subject = strSubject
'Set the e-mail body format (BodyHTML=HTML Body=Text)
If blnHTML = True Then
objJMail.HTMLBody = strEmailBodyMessage & strEmailBodyAppendMessage
Else
objJMail.Body = strEmailBodyMessage & strEmailBodyAppendMessage
End If
'Importance of the e-mail
objJMail.Priority = 3
objJMail.MailServerUserName = "admin@mywebsite.com"
objJMail.MailServerPassWord = "mypassword"
'Send the e-mail
objJMail.Send("mail.mywebsite.com")
End With
'Close the server mail object
Set objJMail = Nothing
---------------------------------------------------------