")
strtext = REPLACE(strtext, vbCrlf ,"
")
END IF
FixQuotes = strtext
END FUNCTION
name = REQUEST("name")
email = REQUEST("email")
Company = REQUEST("Company")
Industry = REQUEST("Industry")
city = REQUEST("city")
state = REQUEST("state")
zip = REQUEST("zip")
DayPhone = REQUEST("DayPhone")
EveningPhone = REQUEST("EveningPhone")
NewSite = REQUEST("NewSite")
IF NewSite = "" THEN
NewSite = "No"
END IF
ReDesign = REQUEST("ReDesign")
IF ReDesign = "" THEN
ReDesign = "No"
END IF
ExistingWebSite = REQUEST("ExistingWebSite")
pages = REQUEST("pages")
WebSitePurpose = REQUEST("WebSitePurpose")
SiteMaintenance = REQUEST("SiteMaintenance")
IF SiteMaintenance = "" THEN
SiteMaintenance = "No"
END IF
ManySiteUpdates = REQUEST("ManySiteUpdates")
IF ManySiteUpdates = "" THEN
ManySiteUpdates = "No"
END IF
ShoppingCart = REQUEST("ShoppingCart")
IF ShoppingCart = "" THEN
ShoppingCart = "No"
END IF
OrderForm = REQUEST("OrderForm")
IF OrderForm = "" THEN
OrderForm = "No"
END IF
ContactForm = REQUEST("ContactForm")
IF ContactForm = "" THEN
ContactForm = "No"
END IF
Newsletter = REQUEST("Newsletter")
IF Newsletter = "" THEN
Newsletter = "No"
END IF
Chat = REQUEST("Chat")
IF Chat = "" THEN
Chat = "No"
END IF
Message = REQUEST("Message")
IF Message = "" THEN
Message = "No"
END IF
Affiliate = REQUEST("Affiliate")
IF Affiliate = "" THEN
Affiliate = "No"
END IF
autoresponder = REQUEST("autoresponder")
IF autoresponder = "" THEN
autoresponder = "No"
END IF
Database = REQUEST("Database")
IF Database = "" THEN
Database = "No"
END IF
Admin = REQUEST("Admin")
IF Admin = "" THEN
Admin = "No"
END IF
Onlineupdates = REQUEST("Onlineupdates")
IF Onlineupdates = "" THEN
Onlineupdates = "No"
END IF
secure = REQUEST("secure")
IF secure = "" THEN
secure = "No"
END IF
Creditcard = REQUEST("Affiliate")
IF Creditcard = "" THEN
Creditcard = "No"
END IF
HeavyGW = REQUEST("HeavyGW")
IF HeavyGW = "" THEN
HeavyGW = "No"
END IF
Moderate = REQUEST("Moderate")
IF Moderate = "" THEN
Moderate = "No"
END IF
Light = REQUEST("Light")
IF Light = "" THEN
Light = "No"
END IF
singlepage = REQUEST("single")
IF singlepage = "" THEN
singlepage = "No"
END IF
Logo = REQUEST("Logo")
IF Logo = "" THEN
Logo = "No"
END IF
Banners = REQUEST("Banners")
IF Banners = "" THEN
Banners = "No"
END IF
Animated = REQUEST("Animated")
IF Animated = "" THEN
Animated = "No"
END IF
FlashIntro = REQUEST("FlashIntro")
IF FlashIntro = "" THEN
FlashIntro = "No"
END IF
FlashWeb = REQUEST("FlashWeb")
IF FlashWeb = "" THEN
FlashWeb = "No"
END IF
Interactive = REQUEST("Interactive")
IF Interactive = "" THEN
Interactive = "No"
END IF
Stationary = REQUEST("Stationary")
IF Stationary = "" THEN
Stationary = "No"
END IF
comments = REQUEST("comments")
StrMsg = "
| Name: | "& name &" |
| Email: | "& email &" |
| Company: | "&Company &" |
| Industry: | "& Industry &" |
| Address: | "&Address&" |
| City/State/Zip: | "&city& " "&state&" " &zip &" |
| Day Phone: | "&DayPhone&" |
| Evening Phone: | "&EveningPhone&" |
| New Site Development? | "&NewSite&" |
| ReDesign Web site Re-Design? | "&ReDesign&" |
| URL : | "& ExistingWebSite &" |
| No. of Pages: | "&pages&" (estimated quanity) |
| Topic/Purpose: | "&FixQuotes(WebSitePurpose)&" |
| Maintenance: | |
| Will you be making changes yourself? | "& SiteMaintenance&" |
| Do you expect many updates? | "&ManySiteUpdates &" |
| Specialties: | |
| Shopping Cart | "&ShoppingCart&" |
| Online Order Form | "&OrderForm&" |
| Contact Form | "&ContactForm&" |
| Newsletter | "&Newsletter&" |
| Online Live Chat | "&Chat&" |
| Message Boards/Discussion Forums | "&Message&" |
| Affiliate Programs | "&Affiliate&" |
| E-mail Auto Responder | "&autoresponder&" |
| A Database Design | "&Database&" |
| Administration Panel | "&Admin&" |
| Online procedure for updates | "&Onlineupdates&" |
| Secure Processing | "&secure&" |
| Merchant Account for Credit Cards | "&Creditcard&" |
| Heavy Graphics Website | "& HeavyGW &" |
| Moderate Graphics Website | " & Moderate & " |
| Light Graphics Website | " & Light & " |
| Single Page Design | " & singlepage & " |
| Logo Design | "& Logo &" |
| Advertising Banners | "& Banners &" |
| Animated Graphics/Flash FX | " & Animated & " |
| Flash Intro | " & FlashIntro & " |
| Flash Website | " & FlashWeb & " |
| Interactive Flash | " & Interactive & " |
| Stationary Design | " & Stationary & " |
| Comments/Other: | " & FixQuotes(comments) & " |
| Thanks for contacting us. We will be contacting you within couple of days. Customer Support www.IndiaSoftwareSolution.com |