<% option Explicit %> <% '*********************************************************** ' ' Made By: Piyush Rawat ' Date: 29/09/2003 ' Page Name: default.asp ' Description: Home page. '*********************************************************** const Jaipurhandicrafts_PageTitle = "Info4india" const Jaipurhandicrafts_pageTitleBar = "Info4india" const Jaipurhandicrafts_keywords = "Info4india" const Jaipurhandicrafts_description = "Info4india" %> <%'include file begin here%> <% if request("submited")=1 then dim con,str,str2admin set con = eBiz_GetDatabaseConnection(strConnect) con.execute("exec sp_insert_contact '" & request("orgname") & "','" & request("name") & "','" & request("email") & "','" & request("b_PhonePrefix") & "-" & request("b_PhoneAreaCode") & "-" & request("b_phone")& "','" & request("b_faxPrefix") & "-" & request("b_faxAreaCode") & "-" & request("b_fax") & "','" & request("title") & "','" & request("comments") & "'") str2admin = " You have got the enquiry:
Organsiation Name=" & request("orgname") & "
Contact Person Name=" & request("name") & "
Title=" & request("title") & "
Email=" & request("email") & "
Phone=" & request("b_PhonePrefix") & "-" & request("b_PhoneAreaCode") & "-" & request("b_phone")& "Fax=" & request("b_faxPrefix") & "-" & request("b_faxAreaCode") & "-" & request("b_fax") & "
Comments=" & request("comments") str="Escape Crafts

" str=str & "Thanks for showing your interest.
" str=str & "We will endeavor to reach you as soon as possible.
From
inquiry@jaipurhandicrafts.com" 'mail to contacting person SendHtmlMail "inquiry@jaipurhandicrafts.com",request("email"),"Thanks For Contacting.",str 'mail to admin SendHtmlMail "inquiry@jaipurhandicrafts.com","admin@jaipurhandicrafts","New Contact.",str2admin response.Redirect("default.asp") end if %>