<% Function ASPEmailSendMail(sMailServer,sToAddress,sFromAddress,sFromName,sSubject,bHTML,sBody) Dim objAspEmail Set objAspEmail = Server.CreateObject("Persits.MailSender") objAspEmail.Host = sMailServer 'Out going SMTP mail server address objAspEmail.From = sFromAddress 'Who the e-mail is from If sFromName <> "" Then objAspEmail.FromName = sFromName End If objAspEmail.AddAddress sToAddress 'Who the e-mail is sent to objAspEmail.Subject = sSubject 'The subject of the e-mail objAspEmail.IsHTML = bHTML objAspEmail.Body = sBody 'The main body of the e-mail 'Send the e-mail If NOT sMailServer = "" Then objAspEmail.Send Set objAspEmail = Nothing ASPEmailSendMail = True End Function %> <% if request.QueryString("op") = "done" Then Response.write "" Response.write "" end if if request.QueryString("op") = "add" Then Dim sFirstName, sLastName, sTitle, sOrganization, sAddress, sCity, sState, sZipCode, sPhoneNumber Dim sFax, sEmailAddress, sBusinessneed, sAreainfo,sRole,sComents, sUrl Dim sMailBody, sMailServer, sToAdddress,sMailSub sMailServer = "mail.bytetechnology.net" 'sToAddress = "info@bytetechnology.net" 'sToAddress = "harsh@bytetechnology.net" sMailSub = "Quote Request from ineedwebsite.com" sName = Trim(Request("inquirersname")) sEmail = Trim(Request("emailaddress1")) sEmail2 = Trim(Request("emailaddress2")) sCountry = Trim(Request("inquirerscountry")) sPhoneNumber = Trim(Request("inquirersphoneno")) sState = Trim(Request("state")) sTypeofWebsite= Trim(Request("TypeofWebsite")) sTypenotListed= Trim(Request("TypenotListed")) sdate_site_required= Trim(Request("date_site_required")) secommerce_required= Trim(Request("ecommerce_required")) sonline_cc_payments= Trim(Request("online_cc_payments")) snumber_of_items_to_be_sold= Trim(Request("number_of_items_to_be_sold")) snumber_of_pages_required= Trim(Request("number_of_pages_required")) sDatabase= Trim(Request("Database")) sdomain_name_required= Trim(Request("domain_name_required")) swhat_domain_name_wanted= Trim(Request("what_domain_name_wanted")) shosting_required= Trim(Request("hosting_required")) slogo_required= Trim(Request("logo_required")) sheader_required= Trim(Request("header_required")) snumber_of_images_required= Trim(Request("number_of_images_required")) shave_digital_images= Trim(Request("have_digital_images")) sonsite_digital_photography_required= Trim(Request("onsite_digital_photography_required")) ssite_content_ready= Trim(Request("site_content_ready")) sauthoring_required= Trim(Request("authoring_required")) sinquiry_form_wanted= Trim(Request("inquiry_form_wanted")) sresearch_keywords= Trim(Request("research_keywords")) soptimisation_required= Trim(Request("optimisation_required")) ssite_submission_required= Trim(Request("site_submission_required")) sstatistics_required= Trim(Request("statistics_required")) sother_information= Trim(Request("other_information")) ' Define the mail body sMailBody = sMailBody & "
" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "" sMailBody = sMailBody & "
Quote From Web Site
Name"& sName &"
Email"& sEmail &"
Country"& sCountry &"
Phone Number"& sPhoneNumber &"
State"& sState &"
Type of Website"& sTypeofWebsite &"
Other type"& sTypenotListed &"
Date Site Required"& sdate_site_required &"
Ecommerce required"& secommerce_required &"
Online cc payments"& sonline_cc_payments &"
Number of items to be sold"& snumber_of_items_to_be_sold &"
Number of pages required"& snumber_of_pages_required &"
Database Required"& sDatabase &"
Domain name required?"& sdomain_name_required &"
What domain name wanted?"& swhat_domain_name_wanted &"
Hosting required?"& shosting_required &"
Logo required?"& slogo_required &"
Flash Header required?"&sheader_required &"
Number of images required"& snumber_of_images_required &"
Have digital images?"& shave_digital_images &"
Onsite digital photography required?"& sonsite_digital_photography_required &"
Site content ready?"& ssite_content_ready &"
Authoring required?"& sauthoring_required &"
Inquiry form wanted?"& sinquiry_form_wanted &"
Research keywords?"& sresearch_keywords &"
Site optimisation required?"& soptimisation_required &"
Site submission required?"& ssite_submission_required &"
Statistics required?"& sstatistics_required &"
Other information"& sother_information &"
" sMailBody = sMailBody & "
" 'Response.Write sMailBody 'response.end 'ASPEmailSendMail sMailServer,"harsh@bytetechnology.net",sEmail,sName,sMailSub,true,sMailBody ASPEmailSendMail sMailServer,"info@ineedwebsite.com",sEmail,sName,sMailSub,true,sMailBody 'ASPEmailSendMail sMailServer,sToAddress,sEmailAddress,sFirstName,sMailSub,true,sMailBody Response.Redirect("free_quotes.asp?op=done") end if %>
 

Note: This form is quite detailed but don't let that put you off. Its use will assist you to determine what you need on your website. The comment boxes provide help with its completion. It will take five or ten minutes to complete.

Full Name:
Email Address:
Confirm Email:
Phone:
State:
Country:


Type of website:
Other:
Current website URL:
Do you want to sell online?
Do you need to take credit card payments online?
 
If so, how many items will you offer?:
No. of web pages required:
Dynamic or database driven:
Is a domain name required? :
If so what domain name would you like?:
Is website hosting required?:
   
Do you need a logo?:
Do you need a flash header?:
   
Approx. images required:
Do you have the digital images you require?:
Is digital photography required?:
   
Is your site content prepared?:
   
Writing of copy required?:
   
Do you require an enquiry form?:
   
Do you want us to research your keywords?:
   
Do you want me to optimise your site?:
   
Do you want us to submit your site?:
   
Do you need visitor statistics?:
   
 
Other comments:

 
Testimonials
"You have done a fantastic job and you deserve to show this one off. Seriously, I just love it, the whole site. I am so impressed with your creativity and effort.

Thank you! I am very excited about what you have done. Words alone could not express the gratitude that I found you. Thank you for understanding the needs of this !"
- Amit Badlani
 
cheap Luxury Handbags Louis Vuitton Handbags Wholesale Gucci Messenger Bags GUCCI Coco Cicoon Balenciaga Business Handbags True Religion Jeans