Mail form script in VB

See more:

ASP

ASP.NET

Hi all, I've got a form which work well when an email is set from the same domain.

My problem is that I want the script to send the email to an account not from the same domain. (ie:me@mydomain.com.au works when I change the email to you@yourdomain.com it does not send the mail)

Below you will find my full code, If any one can help me, it would be appreciated:

<%
  DIM StrEmail, StrName, StrNumber, StrSubject, StrMessage, StrMsgHeader

   StrEmail = request.form("email")
   StrName = request.form("name")
   StrNumber = request.form("number")
   StrSubject = request.form("subject")
   StrMessage = request.form("message")

  Set Mail = Server.CreateObject("Persits.MailSender")
    Mail.Host = "mail.mydomain.com.au";
    Mail.From = "me@mydomain.com.au"
    Mail.AddAddress "you@yourdomain.com.au"
 


        Mail.Subject = "Enquiry Request Form"

 
     Mail.Body = strMsgHeader & "Email: " & StrEmail & vbCrLf & vbCrLf & _
     "Full Name : " & vbCrLf & StrName & vbCrLf & vbCrLf & _
     "Phone Number : "; & vbCrLf & StrNumber & vbCrLf & vbCrLf & _
     "Subject : " & vbCrLf & StrSubject & vbCrLf & vbCrLf & vbCrLf & _

     "Message: " & vbCrLf & StrMessage

   
     On Error Resume Next
     Mail.Send
     Set Mail = Nothing

    IF Err <> 0 THEN
     Response.Write "There has been an error and your message could not be sent through email." & Err.Description
    END IF

    %>