Henry R. Lee Carpenter, Kitchen remodeling, woodworking and custom trim work by New Jersey craftsman

<% function WA_Universal_Email_1_SendMail(RecipientEmail) dim MailObject, MailAttachments, MailBCC, MailCC, MailTo, MailBodyFormat, MailBody, MailImportance, MailFrom, MailSubject MailAttachments = "" MailBCC = "" MailCC = "" MailTo = "" MailBodyFormat = "" MailBody = "" MailImportance = "" MailFrom = "" & cStr(cStr(Request.Form("Mail"))) & "" MailSubject = "Contact Form Submission" 'Global Variables gBodyFormat = "" set WA_MailObject = WAUE_Definition("smtp.appliedi.net") if (RecipientEmail <> "") then set WA_MailObject = WAUE_AddRecipient(WA_MailObject,RecipientEmail) else 'To Entries end if 'Attachment Entries 'BCC Entries 'CC Entries 'Character Set 'Body Format set WA_MailObject = WAUE_BodyFormat(WA_MailObject,1) MailBodyFormat = gBodyFormat 'Set Importance set WA_MailObject = WAUE_SetImportance(WA_MailObject,"3") 'Start Mail Body MailBody = MailBody & "last name: " MailBody = MailBody & cStr(Request.Form("LastName")) MailBody = MailBody & "" & vbCrlf & "" MailBody = MailBody & "first name: " MailBody = MailBody & cStr(Request.Form("FirstName")) MailBody = MailBody & "" & vbCrlf & "" MailBody = MailBody & "company: " MailBody = MailBody & cStr(Request.Form("Company")) MailBody = MailBody & "" & vbCrlf & "" MailBody = MailBody & "phone: " MailBody = MailBody & cStr(Request.Form("Phone")) MailBody = MailBody & "" & vbCrlf & "" MailBody = MailBody & "mail: " MailBody = MailBody & cStr(Request.Form("Mail")) MailBody = MailBody & "" & vbCrlf & "" MailBody = MailBody & "heard about us: " MailBody = MailBody & cStr(Request.Form("Heardat")) MailBody = MailBody & "" & vbCrlf & "" MailBody = MailBody & "comments: " MailBody = MailBody & cStr(Request.Form("Comments")) MailBody = MailBody & "" & vbCrlf & "" 'End Mail Body set WA_MailObject = WAUE_SendMail(WA_MailObject,MailAttachments,MailBCC,MailCC,MailTo,MailImportance,MailFrom,MailSubject,MailBody) set WA_MailObject = nothing end function %> <% if ((cStr(Request.Form("Submit")) <> "")) then 'WA Universal Email object="AspMail" 'Send Loop Once Per Entry WA_Universal_Email_1_SendMail("info@nailbender.net") 'Send Mail All Entries if ("contactsubmit.asp"<>"") then Response.Redirect("contactsubmit.asp") end if end if %> Henry R. Lee Carpenter, Kitchen remodeling, woodworking and custom trim work by New Jersey craftsman

Please feel free to send in any questions or comments you may have about an upcoming project by filling out the form below. Thank you for your interest.

	11 Mullen Rd. Whitehouse Station, NJ 08889 Phone (908) 534-5115 Fax (908) 534-3103
Your contact information:
Last Name*
First Name*
Company
Phone
E-Mail*
Where did you hear about us
Please submit any questions or comments:
Your comments*

NJ Web Design - Flying Turtle Studio