<%@LANGUAGE="VBSCRIPT"%> <% if request("action")="Send" then userName = trim(request("inp_name")) 'userGender = request("sel_gender") 'userAge = trim(request("inp_age")) userEmail = trim(request("inp_email")) 'userCellPhone = trim(request("inp_cell_phone")) userTel = trim(request("inp_tel")) userAddr = trim(request("inp_addr")) 'userFax = trim(request("inp_fax")) 'userDo = request("sel_do") 'userHour = request("sel_hour") 'userContact = request("rd_contact") userSubject = trim(request("inp_sub")) userContent = trim(request("ta_content")) if userName = "" then alertgolast ("Please input 【NAME】") if not isMailAdd(userEmail) then alertgolast ("【EMAIL】 incorrect") if userSubject = "" then alertgolast("Please input 【SUBJECT】") if userContent = "" then alertgolast ("Please input 【DESIRED TREATMENT】") if userTel = "" then alertgolast ("Please input 【TEL】") mailbody = mailbody & vbcrlf & "" mailbody = mailbody & vbcrlf & "" mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & "" mailbody = mailbody & vbcrlf & "" mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & "

．NAME*
．EMAIL*
．TEL*
．ADDRESS
．SUBJECT*
．DESIRED TREATMENT* " mailbody = mailbody & vbcrlf & "   "& userContent &"

" mailbody = mailbody & vbcrlf & " " mailbody = mailbody & vbcrlf & "" if rUser_1<>"" and isMailAdd(rMail_1) then toUserName = rUser_1 toAddress = rMail_1 mail_j toUserName,toAddress ,userName,userEmail,userSubject,mailbody end if if rUser_2<>"" and isMailAdd(rMail_2) then toUserName = rUser_2 toAddress = rMail_2 mail_j toUserName,toAddress ,userName,userEmail,userSubject,mailbody end if if rUser_3<>"" and isMailAdd(rMail_3) then toUserName = rUser_3 toAddress = rMail_3 mail_j toUserName,toAddress ,userName,userEmail,userSubject,mailbody end if if rUser_4<>"" and isMailAdd(rMail_4) then toUserName = rUser_4 toAddress = rMail_4 mail_j toUserName,toAddress ,userName,userEmail,userSubject,mailbody end if if rUser_5<>"" and isMailAdd(rMail_5) then toUserName = rUser_5 toAddress = rMail_5 mail_j toUserName,toAddress ,userName,userEmail,userSubject,mailbody end if if toUserName<>"" and toAddress<>"" then alertGoTo "Your mail has been sent, thank you!","appointment.asp?","" end if end if %>

*  NAME *  EMAIL *  TEL *  ADDRESS Pure Skin by Maggie 401 Kamakee Street, Suite 407 Honolulu, HI 96814 Local Phone: 808-728-6260 Email us at: pureskinbymaggie@gmail.com Business Hours Monday-Saturday: 10:00AM to 6:00PM Sunday: 11:00AM to 4:00PM Office Hours By Appointment We are located in the "Ward" area, across from Nordstrom Rack and Office Depot. We are on the 4th floor of building 401, in Suite 407. Parking is right next to building, with free validation. Google Map & Directions   SUBJECT DESIRED TREATMENT      Please complete the requested information above to receive a direct contact from Maggie, who will personally contact you to discuss the ideal treatment suited for your interest, and to schedule an appointment that works around your schedule. If you have other questions please feel free to contact me. All service and products does not include Hawaii State Tax.