<% BodyText = "" BodyText = BodyText & "KL International Motorshow 2000 Space Reservation" & VbCrLf BodyText = BodyText & "----------------------------------------------------" & VbCrLf BodyText = BodyText & "Requesting for : " & VbCrLf BodyText = BodyText & request("WhatDoYouWant") & VbCrLf & VbCrLf 'BodyText = request("shell scheme") & VbCrLf 'BodyText = request("obtain an update") & VbCrLf 'BodyText = request("obtain more info") & VbCrLf & VbCrLf BodyText = BodyText & "Space Required : " & request("space_m2") & " metres square" & VbCrLf BodyText = BodyText & "Shell Required : " & request("shell_m2") & " metres square" & VbCrLf BodyText = BodyText & "Name : " & request("name") & VbCrLf BodyText = BodyText & "Company : " & request("company") & VbCrLf BodyText = BodyText & "Address : " & request("address") & VbCrLf BodyText = BodyText & "Country : " & request("country") & VbCrLf BodyText = BodyText & "Job Title : " & request("job_title") & VbCrLf BodyText = BodyText & "Tel : " & request("telephone_number") & VbCrLf BodyText = BodyText & "Fax : " & request("fax_number") & VbCrLf BodyText = BodyText & "Email : " & request("email") & VbCrLf BodyText = BodyText & "Nature of Business : " & request("nature_of_business") & VbCrLf BodyText = BodyText & "----------------------------------------------------" & VbCrLf BodyText = BodyText & request("msg") BodyText = BodyText & VbCrLf BodyText = BodyText & VbCrLf Set Mailer = Server.CreateObject("SMTPsvg.Mailer") Mailer.FromName = request("name") Mailer.FromAddress = "bunyu@autoworld.com.my" Mailer.RemoteHost = "mail.autoworld.com.my" Mailer.Replyto = request("bunyu@autoworld.com.my") Mailer.AddRecipient "Support", "bunyu@autoworld.com.my" Mailer.Subject = "Space Reservation by " & request("name") Mailer.BodyText = BodyText if Mailer.SendMail then %> KL International Motorshow 2000 Space Reservation

Thanks for visiting us!


Congratulations! Your application has been successfully sent to the event managers. We will process your application and get in touch with you soon.

Back to previous page

<%else Response.Write "Sorry, mail send failure. Error was " & Mailer.Response Response.Write "Please report to support@autoworld.com.my" end if%>