Cheer-Tech

<% If request.form("SP_AspEmailSend") = "True" Then Set SP_AspEMail = Server.CreateObject("Persits.MailSender") SP_AspEMail.Host = "mail.wiseproduction.com" SP_AspEMail.FromName = request("lastname") SP_AspEMail.From = request("email") SP_AspEMail.AddAddress "wind@wiseproduction.com" , "" SP_AspEMail.Charset = "Big5" SP_AspEMail.Priority = 3 SP_AspEMail.Subject = "This is an requrement from Cheer-Tech website. Please fellow up" SP_AspEMail.Body ="Models : "&" "& request("Models") &_ vbcrlf&vbcrlf & "Address : " & " "&request("address") &_ vbcrlf&vbcrlf & "Linkman: " & " "&request("linkman") &_ vbcrlf &vbcrlf& "Phone Number : " & " "&request("phone") &_ vbcrlf&vbcrlf & "Fax Number : " & " "&request("fax") &_ vbcrlf&vbcrlf & "E-mail : " & " "&request("email") &_ vbcrlf &vbcrlf& "Remark : " &" "&request("remark") If false Then SP_AspEMail.IsHTML = True End If On Error Resume Next SP_AspEMail.Send If Err <> 0 Then Response.Write "error

" & Err.Description & "

" Response.End End If If "thank_en.html" <> "" Then If false And Request.QueryString <> "" Then Response.Redirect "thank.html?" & Request.QueryString Else Response.Redirect "thank.html" End If Response.End End If End If %> Cheer-Tech