Dear All;
i am getting error "Connection timed out." when posting form, please help me. thanks

<%
cperson=request.Form("cperson")
emailaddress=request.Form("emailaddress")


'Create the e-mail server object
Set Mail= Server.CreateObject("Persits.MailSender")

'Who the e-mail is from
Mail.From ="[email protected]"
Mail.AddAddress "[email protected]"
Mail.Subject = "Email For Newsletter: " &" "

' Create the body text for the e-mail
Bodytxt = "Details of newsletter : " & VbCrLf & VbCrLf
Bodytxt = Bodytxt & "Name : " &cperson & VbCrLf
Bodytxt = Bodytxt & "Email Address : " &emailaddress & VbCrLf

Mail.Body = Bodytxt

Mail.Username = "[email protected]"
Mail.Password = "password"

' The e-mail is now ready to go, we just need to specify the server and send
Mail.Host = "mail.accuray.com.pk"
Mail.Send

Set Mail = Nothing
response.redirect "./thanksfornewsletter.asp"
%>

please check http://www.accuray.com.pk/newsletter.asp

Persits.MailSender.4 error '800a0004'

Connection timed out.

/submitnewsletter.asp, line 26

Line
25: Mail.Host = "mail.accuray.com.pk"
26: Mail.Send