<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
If request.form("SP_AspEmailSend") = "True" Then
Set SP_AspEMail = Server.CreateObject("Persits.MailSender")
SP_AspEMail.Host = "localhost"
SP_AspEMail.FromName = request("company")
SP_AspEMail.From = request("email")
SP_AspEMail.AddAddress "rain@hkwp.com" , "century"
SP_AspEMail.Charset = "Big5"
SP_AspEMail.Priority = 3
SP_AspEMail.IsHTML = True
SP_AspEMail.Subject = "This is an requirement from century website. Please follow up"
SP_AspEMail.Body ="gender: "&" "& request("gender") &_
vbcrlf&vbcrlf & "last name: " & " "&request("lastname") &_
vbcrlf&vbcrlf & "first name:" &" "&request("firstname") &_
vbcrlf &vbcrlf& "Job Title: " & " "&request("job") &_
vbcrlf &vbcrlf& "Company Name: " & " "&request("company") &_
vbcrlf &vbcrlf& "Phone Number: " & " "&request("tel") &_
vbcrlf &vbcrlf& "Fax Number: " & " "&request("fax") &_
vbcrlf &vbcrlf& "E-mail Address: " & " "&request("email") &_
vbcrlf &vbcrlf& "Address: " & " "&request("add") &_
vbcrlf &vbcrlf& "Remark: " & " "&request("remark")
On Error Resume Next
SP_AspEMail.Send
If Err.Description <> "" Then
Response.Write("error:" & Err.Description & "
")
Response.End
End If
Response.Redirect("thank.htm")
End If
%>
CENTURY INDUSTRIAL (ASIA) LTD
