|
|
|
|
| |
| |
ADMINISTRATIVE OFFICE
Naughty
Machine
43/1741, Jacob's Apartment,
SRM road, Pachalam P.O.
Cochin, Kerala, India, Pin - 982 012
Tel: +91-484 6575575 |
| |
OVERSEAS
OPERATIONS |
Magna Computech, 192,
Merton High Street,
Wimbledon, UK.
Tel: ++44- 79181 83003
e-mail: bennymathewuk@yahoo.com
|
|
|
| |
Enquiry Form |
| |
| |
<%
if Request("Submit")="Submit" then
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Enquiry from " & replace (request("name"),"'","''")
myMail.From=replace (request("email"),"'","''")
myMail.To="ceo@naughtymachine.com"
myMail.HTMLBody = " Dear Sir, I wish to know more about your srvices, my contact informations given below | | Name : | " & Replace(Request("name"),"'","''") & " | | Address : | " & Replace (Request("address"),"'","''") &" | | E-mail : | " & Replace (Request("email"),"'","''") &" | | Phone : | " & Replace (Request("phone"),"'","''") &" | | Suggestions/ Remarks: | "& Replace (Request("remarks"),"'","''") & " | Regards, | | " & Replace (Request("name"),"'","''")&" |
"
on error resume next
myMail.Send
if err.number=0 then
Response.write("Thank You " & Request("name") & "! , your request has been sent successfully..")
''Thanks mail--------------
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Enquiry from " & replace (request("name"),"'","''")
myMail.From="ceo@naughtymachine.com"
myMail.To=replace (request("email"),"'","''")
myMail.HTMLBody = " | Dear " & Replace (Request("name"),"'","''")&", | | | Thank you for your interest in our tiles. We will contact you soon. Thank you again | | Regards, | ST.ANTONY'S TILE WORKS Kanichai House Annallur, Chalkudy Thrissur Kerala- 680 731 Tel: 0480- 270 8788 Fax: 0480- 2708239 |
"
on error resume next
myMail.Send
''end-----------------------
else
Response.write(" Error:" & err.description & "")
end if
set Mymail=nothing
End if
%>
|
| |
|
|
|
|
©
2006, All rights reserved to Naughty Machine™, Cochin - 12 |
|
|