%@LANGUAGE="JAVASCRIPT"%>
<%
// *** Edit Operations: declare variables
// set the form action variable
var MM_editAction = Request.ServerVariables("SCRIPT_NAME");
if (Request.QueryString) {
MM_editAction += "?" + Server.HTMLEncode(Request.QueryString);
}
// boolean to abort record edit
var MM_abortEdit = false;
// query string to execute
var MM_editQuery = "";
%>
<%
// *** Insert Record: set variables
if (String(Request("MM_insert")) == "survey") {
var MM_editConnection = MM_dbsurvey_STRING;
var MM_editTable = "survey";
var MM_editRedirectUrl = "thanks.html";
var MM_fieldsStr = "learnaboutbannerAd|value|learnabout_linkFromAnotherSite|value|learnabout_searchEngine|value|learnabout_emailOrNewsletter|value|learnabout_wordOfMouth|value|learnabout_other|value|learnaboutother|value|whatsearch|value|whatsearchother|value|visits|value|timespent|value|visitreason|value|visitreasonother|value|easynav|value|visual|value|infolocation|value|infoQuality|value|infoquantity|value|selection|value|prodimages|value|prodinfo|value|likemost|value|dobetter|value|sitesatisfaction|value|like2see_howToInfo|value|like2see_howToVideos|value|like2see_podcasts|value|like2see_forumBoard|value|like2see_newProductImages|value|like2see_moreDescriptiveText|value|like2see_gallery|value|recommend|value|revisitlikely|value|purchases|value|DBpercent|value|bonsai|value|bonsaiinfoonweb|value|infopreference_videos|value|infopreference_websiteArticles|value|infopreference_forumBoard|value|frequentsite|value|frequentforum|value";
var MM_columnsStr = "learnabout_bannerAd|none,'Y','N'|learnabout_linkFromAnothrSite|none,'Y','N'|learnabout_searchEngine|none,'Y','N'|learnabout_emailOrNewsletter|none,'Y','N'|learnabout_wordOfMouth|none,'Y','N'|learnabout_other|none,'Y','N'|learnaboutother|',none,''|whatsearch|',none,''|whatsearchother|',none,''|visits|',none,''|timespent|',none,''|visitreason|',none,''|visitreasonother|',none,''|easynav|',none,''|visual|',none,''|infolocation|',none,''|infoQuality|',none,''|infoquantity|',none,''|selection|',none,''|prodimages|',none,''|prodinfo|',none,''|likemost|',none,''|dobetter|',none,''|sitesatisfaction|',none,''|like2see_howToInfo|none,'Y','N'|like2see_howToVideos|none,'Y','N'|like2see_podcasts|none,'Y','N'|like2see_forumBoard|none,'Y','N'|like2see_newProductImages|none,'Y','N'|like2see_moreDescriptiveText|none,'Y','N'|like2see_gallery|none,'Y','N'|recommend|',none,''|revisitlikely|',none,''|purchases|',none,''|DBpercent|',none,''|bonsai|',none,''|bonsaiinfoonweb|',none,''|inforpreference_videos|none,'Y','N'|inforpreference_websiteArticles|none,'Y','N'|inforpreference_forumBoard|none,'Y','N'|frequentsite|',none,''|frequentforum|',none,''";
// create the MM_fields and MM_columns arrays
var MM_fields = MM_fieldsStr.split("|");
var MM_columns = MM_columnsStr.split("|");
// set the form values
for (var i=0; i+1 < MM_fields.length; i+=2) {
MM_fields[i+1] = String(Request.Form(MM_fields[i]));
}
// append the query string to the redirect URL
if (MM_editRedirectUrl && Request.QueryString && Request.QueryString.Count > 0) {
MM_editRedirectUrl += ((MM_editRedirectUrl.indexOf('?') == -1)?"?":"&") + Request.QueryString;
}
}
%>
<%
// *** Insert Record: construct a sql insert statement and execute it
if (String(Request("MM_insert")) != "undefined") {
// create the sql insert statement
var MM_tableValues = "", MM_dbValues = "";
for (var i=0; i+1 < MM_fields.length; i+=2) {
var formVal = MM_fields[i+1];
var MM_typesArray = MM_columns[i+1].split(",");
var delim = (MM_typesArray[0] != "none") ? MM_typesArray[0] : "";
var altVal = (MM_typesArray[1] != "none") ? MM_typesArray[1] : "";
var emptyVal = (MM_typesArray[2] != "none") ? MM_typesArray[2] : "";
if (formVal == "" || formVal == "undefined") {
formVal = emptyVal;
} else {
if (altVal != "") {
formVal = altVal;
} else if (delim == "'") { // escape quotes
formVal = "'" + formVal.replace(/'/g,"''") + "'";
} else {
formVal = delim + formVal + delim;
}
}
MM_tableValues += ((i != 0) ? "," : "") + MM_columns[i];
MM_dbValues += ((i != 0) ? "," : "") + formVal;
}
MM_editQuery = "insert into " + MM_editTable + " (" + MM_tableValues + ") values (" + MM_dbValues + ")";
if (!MM_abortEdit) {
// execute the insert
var MM_editCmd = Server.CreateObject('ADODB.Command');
MM_editCmd.ActiveConnection = MM_editConnection;
MM_editCmd.CommandText = MM_editQuery;
MM_editCmd.Execute();
MM_editCmd.ActiveConnection.Close();
if (MM_editRedirectUrl) {
Response.Redirect(MM_editRedirectUrl);
}
}
}
%>
<%
var Recordset1 = Server.CreateObject("ADODB.Recordset");
Recordset1.ActiveConnection = MM_dbsurvey_STRING;
Recordset1.Source = "SELECT * FROM survey";
Recordset1.CursorType = 0;
Recordset1.CursorLocation = 2;
Recordset1.LockType = 1;
Recordset1.Open();
var Recordset1_numRows = 0;
%>
Dallas Bonsai Garden - bonsai tools and supplies - chinese elm
 |
|
|
| © 1998, 1999, 2000, 2001, 2002, 2003
Dallas Bonsai Garden. No part of this catalog may be reproduced for commercial
purposes without written permission. |
<%
Recordset1.Close();
%>