// Make a transaction dispatcher instance tNGs = Request.tNG_CreateObject("tNG_dispatcher"); tNGs.init("../"); // Start trigger formValidation = Request.tNG_CreateObject("triggers.tNG_FormValidation"); formValidation.init(); formValidation.addField("FirstName", true, "text", "", "", "", "Please enter your first name."); formValidation.addField("LastName", true, "text", "", "", "", "Please enter your last name."); formValidation.addField("Email", true, "text", "email", "", "", "Please enter a valid email address."); formValidation.addField("Target", false, "text", "", "", "300", ""); formValidation.addField("MajorTopic", false, "text", "", "", "300", ""); formValidation.addField("TypesPages", false, "text", "", "", "500", ""); tNGs.prepareValidation(formValidation); // End trigger //start Trigger_SendEmail trigger //remove this line if you want to edit the code by hand function Trigger_SendEmail(tNG) { emailObj = Request.tNG_CreateObject("triggers.tNG_Email"); emailObj.init(tNG); emailObj.setFrom("{EMail}"); emailObj.setTo("joyce@je-ideadesign.com"); emailObj.setCC("barbara@centricweb.com"); emailObj.setBCC(""); emailObj.setSubject("Questions"); //WriteContent method emailObj.setContent("" & Chr(13) & Chr(10) & "

{CID}

" & Chr(13) & Chr(10) & "

{FirstName}

" & Chr(13) & Chr(10) & "

{LastName}

" & Chr(13) & Chr(10) & "

{Email}

" & Chr(13) & Chr(10) & "

{Optimizing}

" & Chr(13) & Chr(10) & "

{Purpose}

" & Chr(13) & Chr(10) & "

{Target}

" & Chr(13) & Chr(10) & "

{MajorTopic}

" & Chr(13) & Chr(10) & "

{TypesPages}

" & Chr(13) & Chr(10) & "

{PayOnline}

" & Chr(13) & Chr(10) & "

{NeedDB}

" & Chr(13) & Chr(10) & "

{Copy}

" & Chr(13) & Chr(10) & "

{Logo}

" & Chr(13) & Chr(10) & ""); emailObj.setContentEncoding("UTF-8"); emailObj.setFormat("HTML/Text"); emailObj.setImportance("Normal"); return emailObj.Execute(); } Request.Trigger_SendEmail = Trigger_SendEmail; //end Trigger_SendEmail trigger SELECT * FROM dbo.tbl_Purposes ORDER BY SortOrder ASC // Make an insert transaction instance ins_tbl_Questions = Request.tNG_CreateObject("tNG_insert"); ins_tbl_Questions.init("dsnIdeaDesign"); tNGs.addTransaction(ins_tbl_Questions); // Register triggers ins_tbl_Questions.registerTrigger("STARTER", "Trigger_Default_Starter", 1, "POST", "KT_Insert1"); ins_tbl_Questions.registerTrigger("BEFORE", "Trigger_Default_FormValidation", 10, formValidation); ins_tbl_Questions.registerTrigger("END", "Trigger_Default_Redirect", 99, "/pages/ThankYou.htm"); ins_tbl_Questions.registerTrigger("AFTER", "Trigger_SendEmail", 40); // Add columns ins_tbl_Questions.setTable("tbl_Questions"); ins_tbl_Questions.addColumn("FirstName", "STRING_TYPE", "POST", "FirstName"); ins_tbl_Questions.addColumn("LastName", "STRING_TYPE", "POST", "LastName"); ins_tbl_Questions.addColumn("Email", "STRING_TYPE", "POST", "Email"); ins_tbl_Questions.addColumn("Optimizing", "CHECKBOX_1_0_TYPE", "POST", "Optimizing", "0"); ins_tbl_Questions.addColumn("Purpose", "STRING_TYPE", "POST", "Purpose"); ins_tbl_Questions.addColumn("Target", "STRING_TYPE", "POST", "Target"); ins_tbl_Questions.addColumn("MajorTopic", "STRING_TYPE", "POST", "MajorTopic"); ins_tbl_Questions.addColumn("TypesPages", "STRING_TYPE", "POST", "TypesPages"); ins_tbl_Questions.addColumn("PayOnline", "STRING_TYPE", "POST", "PayOnline"); ins_tbl_Questions.addColumn("NeedDB", "STRING_TYPE", "POST", "NeedDB"); ins_tbl_Questions.addColumn("Copy", "NUMERIC_TYPE", "POST", "Copy"); ins_tbl_Questions.addColumn("Logo", "NUMERIC_TYPE", "POST", "Logo"); ins_tbl_Questions.setPrimaryKey("CID", "NUMERIC_TYPE"); // Execute all the registered transactions tNGs.executeTransactions(); // Get the transaction recordset rstbl_Questions = tNGs.getRecordset("tbl_Questions"); Web design Tampa Bay Florida, Idea Design //begin JSRecordset jsObject_qrPurpose = Request.WDG_CreateObject("WDG_JsRecordset"); jsObject_qrPurpose.init("qrPurpose"); writeoutput(jsObject_qrPurpose.getOutput()); //end JSRecordset #tNGs.displayValidationRules()#
#tNGs.getErrorMsg()#
#tNGs.displayFieldHint("FirstName")# #tNGs.displayFieldError("tbl_Questions", "FirstName")#
#tNGs.displayFieldHint("LastName")# #tNGs.displayFieldError("tbl_Questions", "LastName")#
#tNGs.displayFieldHint("Email")# #tNGs.displayFieldError("tbl_Questions", "Email")#
checked type="checkbox" name="Optimizing" id="Optimizing" value="1" /> #tNGs.displayFieldError("tbl_Questions", "Optimizing")# Click here if you want a quote on optimizing your site. Please be sure to fill in the email and telephone fields below so we can discuss your needs more fully. If your site is already in existence then skip to number 12.
#tNGs.displayFieldHint("Purpose")# #tNGs.displayFieldError("tbl_Questions", "Purpose")#
#tNGs.displayFieldHint("Target")# #tNGs.displayFieldError("tbl_Questions", "Target")#
#tNGs.displayFieldHint("MajorTopic")# #tNGs.displayFieldError("tbl_Questions", "MajorTopic")#
#tNGs.displayFieldHint("TypesPages")# #tNGs.displayFieldError("tbl_Questions", "TypesPages")#
#Iif(Request.KT_escapeAttribute(rstbl_Questions.PayOnline) EQ "Yes",DE("CHECKED"),DE(""))# type="radio" name="PayOnline" id="PayOnline_1" value="Yes" />
#Iif(Request.KT_escapeAttribute(rstbl_Questions.PayOnline) EQ "No",DE("CHECKED"),DE(""))# type="radio" name="PayOnline" id="PayOnline_2" value="No" />
#Iif(Request.KT_escapeAttribute(rstbl_Questions.PayOnline) EQ "Not Sure",DE("CHECKED"),DE(""))# type="radio" name="PayOnline" id="PayOnline_3" value="Not Sure" />
#tNGs.displayFieldError("tbl_Questions", "PayOnline")#
#Iif(Request.KT_escapeAttribute(rstbl_Questions.NeedDB) EQ "Yes",DE("CHECKED"),DE(""))# type="radio" name="NeedDB" id="NeedDB_1" value="Yes" />
#Iif(Request.KT_escapeAttribute(rstbl_Questions.NeedDB) EQ "No",DE("CHECKED"),DE(""))# type="radio" name="NeedDB" id="NeedDB_2" value="No" />
#Iif(Request.KT_escapeAttribute(rstbl_Questions.NeedDB) EQ "Not Sure",DE("CHECKED"),DE(""))# type="radio" name="NeedDB" id="NeedDB_3" value="Not Sure" />
#tNGs.displayFieldError("tbl_Questions", "NeedDB")#
#Iif(Request.KT_escapeAttribute(rstbl_Questions.Copy) EQ "1",DE("CHECKED"),DE(""))# type="radio" name="Copy" id="Copy_1" value="1" />
#Iif(Request.KT_escapeAttribute(rstbl_Questions.Copy) EQ "0",DE("CHECKED"),DE(""))# type="radio" name="Copy" id="Copy_2" value="0" />
#tNGs.displayFieldError("tbl_Questions", "Copy")#
#Iif(Request.KT_escapeAttribute(rstbl_Questions.Logo) EQ "1",DE("CHECKED"),DE(""))# type="radio" name="Logo" id="Logo_1" value="1" />
#Iif(Request.KT_escapeAttribute(rstbl_Questions.Logo) EQ "0",DE("CHECKED"),DE(""))# type="radio" name="Logo" id="Logo_2" value="0" />
#tNGs.displayFieldError("tbl_Questions", "Logo")#

 

 

 

Other Areas We Service Include: Clearwater, St Petersburg, Brandon, Valrico, Seffner, Sarasota, Pasco, Temple Terrace, Carrollwood, Hernando, Westshore Area, New Tampa, Citrus Park, Oldsmar, Westchase, Keystone,Odessa, Riverview, Town 'N Country, Plant City and Nationwide. Our services include web design, web development, search engine optimization, getting found by a search engine, web hosting, marketing, search engine optimization, web site promotion, site design, e-commerce, flash, newsletters, photo galleries, graphic design, web site training, software training, web design training. Search engine optimization is customized to your needs