<%
if Request("sendMessage")="true" then
Set Mail=Server.CreateObject("Persits.MailSender")
Mail.Host="asp1"
Mail.Subject="Error reported through website"
Mail.From="website@softronix.pk"
Mail.AddAddress "faheemsalik@gmail.com"
Mail.Body="Software:" + Request.Form("software") + vbcrlf + "Company :" + Request.Form("company")+ vbcrlf + "Person Name : " + Request.Form("person") + vbcrlf + "Mobile No: " + Request.Form("mobile") + vbcrlf + "Landline no:" + Request.Form("landline") + vbcrlf + "Email: " + Request.Form("email") + vbcrlf + "Message Detail:" + Request.Form("message")
On Error Resume Next ' catch errors
Mail.Send
If Err <> 0 Then ' error occurred
response.write("Mail could not be sent!
" & Err.Description)
else
%>
Your reuest has been processed: please keep checking website download area for latest updates of your software. Thanks for reporting a problem.
<% End If
End if
%>
Write down the error and send to Softronix.