<%
if Request.Form("Submit") = "Submit" Then
sub sendmail()
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mail.2xlearning.com" ' Specify a your SMTP server
Mail.From = "info@2xlearning.com" ' Specify sender's address
Mail.FromName = "Info-2xlearning" ' Specify sender's name
Mail.AddAddress "info@2xlearning.com" ' Recipient No.1 pls change this
'Mail.AddAddress "our_Server_receiver2@yourcompany.com" ' Recipient No.2
'mail.Addbcc "our_Server_receiver_cc@yourcompany.com" ' Bcc Email
Mail.Subject = "Contact Us - Kandhari Web"
Mail.Body = "Feedback Form" & "
" & Chr(13) & Chr(10) & _ "Name : " & request.form("txtsFull_Name") & "
" & Chr(13) & Chr(10) & _ "Email : " & request.form("txtsEmail") & "
" & Chr(13) & Chr(10) & _ "Question : " & request.form("txtsQuestion") & "
" & Chr(13) & Chr(10) & _ "Thank you from Kandhari Minerals." Mail.IsHTML = True On Error Resume Next Mail.Send If Err <> 0 Then Response.Write "Error encountered in sending mail..." & Err.Description End If end sub end if %>
" & Chr(13) & Chr(10) & _ "Name : " & request.form("txtsFull_Name") & "
" & Chr(13) & Chr(10) & _ "Email : " & request.form("txtsEmail") & "
" & Chr(13) & Chr(10) & _ "Question : " & request.form("txtsQuestion") & "
" & Chr(13) & Chr(10) & _ "Thank you from Kandhari Minerals." Mail.IsHTML = True On Error Resume Next Mail.Send If Err <> 0 Then Response.Write "Error encountered in sending mail..." & Err.Description End If end sub end if %>
Alternatively you can contact us on following address: Mr. Purushottam Kandhari Phone- 91-294-2462559, 2485001 (O) Mobile- 094141 56358, 094141 5659 |