%@language=jscript%> <% var eg_objConn1; var eg_result1; var eg_result3; // Connect to database eg_objConn1 = Server.CreateObject("ADODB.Connection"); eg_objConn1.Open("Provider=SQLOLEDB;Password=201aq+zz;Persist Security Info=True;User ID=pathfinderdb1;Initial Catalog=pathfinderdb;Data Source=sql6.prosql.net;"); //firstly see if the email address has been used before - if so reject order process. var emailstr=String(Request.Form("email")).replace(/'/g, "''"); eg_Result3 = eg_objConn1.Execute("SELECT count(*) from internetbizcouk where email='"+emailstr+"'", 1, adCmdText); if (eg_Result3(0)>0 ) { delete eg_Result3; delete eg_objConn1; Response.Redirect("duplicateemailaddress.asp"); } eg_Result1 = eg_objConn1.Execute("SELECT Setting from Settings WHERE Setting_ID='internetbiz-com_order_no'", 1, adCmdText); var firstnamestr=String(Request.Form("firstname")).replace(/'/g, "''"); var secondnamestr=String(Request.Form("secondname")).replace(/'/g, "''"); var telephonestr=String(Request.Form("telephone")).replace(/'/g, "''"); var thepasswordstr=String(Request.Form("thepassword")).replace(/'/g, "''"); var address1str=String(Request.Form("add1")).replace(/'/g, "''"); var address2str=String(Request.Form("add2")).replace(/'/g, "''"); var townstr=String(Request.Form("Town")).replace(/'/g, "''"); var countystr=String(Request.Form("county")).replace(/'/g, "''"); var postcodestr=String(Request.Form("postcode")).replace(/'/g, "''"); var countrystr=String(Request.Form("Country")).replace(/'/g, "''"); var eg_date = new Date(); var eg_date1 = eg_date.formatDate("Ymj"); var eg_ordernum=eg_Result1("setting"); // Response.write("insert into internetbizcouk (firstname, secondname, telephone, email, thepassword,orderdate, ordernum, temp_access_flag, address1, address2, town, county, postcode) values('"+firstnamestr+"','" +secondnamestr+"','"+telephonestr+"','"+emailstr+"','"+thepasswordstr+"','"+eg_date1+"',"+eg_ordernum+",'N'"+"',"+address1str+"','"+address2str+"','"+townstr+"','"+countystr+"','"+postcodestr+"','"+countrystr+"')"); eg_objConn1.Execute("insert into internetbizcom (firstname, secondname, telephone, email, thepassword,orderdate, ordernum, temp_access_flag, address1, address2, town, county, postcode, country) values('"+firstnamestr+"','" +secondnamestr+"','"+telephonestr+"','"+emailstr+"','"+thepasswordstr+"','"+eg_date1+"',"+eg_ordernum+",'Y'"+",'"+address1str+"','"+address2str+"','"+townstr+"','"+countystr+"','"+postcodestr+"','"+countrystr+"')"); var NextOrderNum = parseInt(eg_ordernum)+1; eg_objConn1.Execute("Update Settings Set Setting='"+NextOrderNum+ "' WHERE Setting_ID='internetbiz-com_order_no'", 1, adCmdText); var oemail; oemail = Server.CreateObject("Dynu.Email"); oemail.host="mail.internetbizsolution.com"; oemail.AddAddress(emailstr); oemail.From = "noreply@internetbizsolution.com" oemail.Subject = "Online Web Marketing Training (Trial) Order" oemail.body="Thank you once again for your purchase." + String.fromCharCode(13,10)+ String.fromCharCode(13,10)+ "Your username (email address) is: "+ emailstr + String.fromCharCode(13,10)+ String.fromCharCode(13,10)+"Your chosen Password is: "+thepasswordstr+ String.fromCharCode(13,10)+ String.fromCharCode(13,10)+ String.fromCharCode(13,10)+"Now here are your easy log on instructions to assess the course materials. " + String.fromCharCode(13,10)+String.fromCharCode(13,10)+ "Step 1: Log on to http://www.InternetBizSolution.co.uk" +String.fromCharCode(13,10)+ "Step 2: Enter your Username (email address) and Password into respective Log in boxes after you have logged onto the site. "+String.fromCharCode(13,10)+ "Step 3: Click on the 'Go' button" + String.fromCharCode(13,10) +"Step 4: That's it! Start to study at your own pace" + String.fromCharCode(13,10) +"Step 5: Put in to practice what you've learnt and go make a killing online." + String.fromCharCode(13,10) + String.fromCharCode(13,10) + "Thank you" + String.fromCharCode(13,10) +"Yours sincerely, " +String.fromCharCode(13,10) +"Joe Amagada" + String.fromCharCode(13,10) +"http://www.InternetBizSolution.com" + String.fromCharCode(13,10) + "http://www.pathfinderpublications.com"; oemail.send(); delete oemail; %>
Your order reference is <%=eg_ordernum%>. Your details have been submitted.
You will receive an email shortly detailing how to access the training materials. However, below is a summary of how to access the course material: -
Step 1: Log on
to http://www.InternetBizSolution.com |
Click here to print this page please
Thank you
Yours sincerely,
Joe Amagada
http://www.InternetBizSolution.com
http://www.pathfinderpublications.com
Thank you for your custom.
Pathfinder Publications.
<% delete eg_Result1; delete eg_Result3; // Close database connection eg_objConn1.Close(); delete eg_objConn1; %>