<%@ Language=VBScript %> <% '**************************************************************************************************** 'File Name : contactus.asp 'Date of Creation : 12th March 2k4 'Purpose : Contact Us page for Business Customers 'Created By : Nandip 'Date of Modification : 'Last Modified By : 'Last Change Reason : 'Location on Server : e:\wwwroot\www.550access.com 'File Currently in Use : Yes 'Company Name : 550Access '**************************************************************************************************** if Request.QueryString = "process" then firstname = trim(Request.Form("txtFirstname")) lastname = trim(Request.Form("txtLastname")) title = trim(Request.Form("txtTitle")) companyname = trim(Request.Form("txtCoName")) address1 = trim(Request.Form("txtAddress1")) address2 = trim(Request.Form("txtAddress2")) city = trim(Request.Form("txtCity")) state = trim(Request.Form("txtState")) postal = trim(Request.Form("txtZipCode")) emailaddress = trim(Request.Form("txtEmail")) phone = trim(Request.Form("txtPhone")) contactmethod = trim(Request.Form("radioContactMethod")) queries = trim(Request.Form("txtareaQueries")) fullname = firstname & " " & lastname if contactmethod = "phone" then contactmethod = "By Email" elseif contactmethod = "email" then contactmethod = "Through Phone" end if trBgColorOdd = "#F0FBCA" trFontColorOdd = "#554640" trBgColorEven = "#FCF4DA" trFontColorEven = "#002800" busiCustInfoText = busiCustInfoText & "
Below is the Information filled in by BUSINESS CUSTOMERS.

" busiCustInfoText = busiCustInfoText & "" busiCustInfoText = busiCustInfoText & "" busiCustInfoText = busiCustInfoText & "" busiCustInfoText = busiCustInfoText & "" busiCustInfoText = busiCustInfoText & "" if(not address2 = "") then busiCustInfoText = busiCustInfoText & "" end if busiCustInfoText = busiCustInfoText & "" busiCustInfoText = busiCustInfoText & "" busiCustInfoText = busiCustInfoText & "" busiCustInfoText = busiCustInfoText & "" busiCustInfoText = busiCustInfoText & "" busiCustInfoText = busiCustInfoText & "" busiCustInfoText = busiCustInfoText & "" busiCustInfoText = busiCustInfoText & "
Fullname " & fullname & "
Business Title " & title & "
Company Name " & companyname & "
Address1 " & address1 & "
Address2 " & address2 & "
City " & city & "
State " & state & "
Postal Code " & postal & "
Email Address " & emailaddress & "
Phone Number " & phone & "
Contact Method " & contactmethod & "
Queries " & queries & "
" 'Response.Write busiCustInfoText 'Response.End set ObjMail = server.CreateObject("cdonts.newmail") ObjMail.To = "voicemail@550access.com" ObjMail.Bcc = "nandip@vippowernet.com" ObjMail.From = "support@550access.com" ObjMail.subject = "550Access -BUSINESS CUSTOMER INFORMATION" ObjMail.Body = busiCustInfoText ObjMail.BodyFormat = 0 ObjMail.MailFormat = 0 ObjMail.send set ObjMail = nothing session("confirmMessage") = "
Your Information Has Been Sent Successfully.
In most cases your call will be returned with during the requested time but in certain circumstances please allow up to 24-48 business hrs to receive a call back.


" Response.Redirect("contactus.asp") end if %> 550 Access - Contact Us
550 Access.com
 
 
 
NEW USER
QUICK LINKS

Refer A Friend

  WHERE YOU ARE? :: HOME COMPANY CONTACT US
About Us
About Us

 

RESIDENTIAL CUSTOMERS
You can contact us via Phone, Online Chat or by creating a Trouble Ticket.
For Sales: You can conveniently Sign up online and get instant access to our service. If you prefer to sign up by phone, you can call us at 832-476-0532 between 9:30 A.M. - 6:30 P.M. (CST)  Monday - Saturday.

For Technical Support: You can get free Online Chat support at any time or create a Trouble Ticket to get prompt response via e-mail.

 

If you prefer Phone Support, you can call us at 832-476-0532 between 9:30 A.M. - 6:30 P.M. (CST) Monday - Saturday or Submit an Online Request for call back. You will be charged $5.00 for a phone support call.

  <% if not(session("confirmMessage") = "") then Response.Write session("confirmMessage") session("confirmMessage") = "" end if %>
My 550Access | Make 550access.com your home page | Add 550Access.com to your favorites
Copyright © 2003 www.550Access.com. All Rights Reserved.
User
Software
Support
Business Partnerships
Company Info.
WebmailTake a tour | Getting Started | Sign Up | Order A CD |
Plans & Prices | Referrals | Support | Downloads |
General FAQ's
Toolbar | Toolbar 3.0 | Deskbar | Browser | Dialer | Automatic configuration Access Numbers | Settingup Connection | Common Errors/Issues Corporate Dialup | Affiliate About Us | Contact Us | Press Room | Terms & Conditions | Privacy Policy | Employment