<% Dim MsgTo MsgTo = request("MT") select case MsgTo case "Sales" EmailMsgTo = "sales_dpt@formostfuji.com" MsgToTxt = "Sales Department" case "Service" EmailMsgTo = "service_dpt@formostfuji.com" MsgToTxt = "Service Department" case "Parts" EmailMsgTo = "parts_dpt@formostfuji.com" MsgToTxt = "Parts & Purchasing Department" case "Engineering" EmailMsgTo = "engineering_dpt@formostfuji.com" MsgToTxt = "Engineering & Production Department" case "North" EmailMsgTo = "PJoepaw@aol.com" MsgToTxt = "North Central Regional Sales Manager" case "East" EmailMsgTo = "JGBond@optonline.net" MsgToTxt = "North East Regional Sales Manager" case "Northwest" EmailMsgTo = "daym@earthlink.net" MsgToTxt = "North West Regional Sales Manager" case "South" EmailMsgTo = "armandol@formostfuji.com" MsgToTxt = "South Central Regional Sales Manager" case "Southeast" EmailMsgTo = "msaformost@bellsouth.net" MsgToTxt = "South East Regional Sales Manager" case "West" EmailMsgTo = "didur@verizon.net" MsgToTxt = "South West Regional Sales Manager" case "test" EmailMsgTo = "anation@nationmanagement.com" MsgToTxt = "used for testing by development" case else EmailMsgTo = "service_dpt@formostfuji.com" MsgToTxt = "Customer Support Department" end select %>
Please Complete Our Contact Form to Email our <%= MsgToTxt%>
Name
Business Name
*Email Address
Street Address
City / State / Zip Code
Country
Telephone Number
FAX Number
How Can We Help?

 


* notes required field