custinfo.asp

Windows Web脚本开发指南/(美) Dan Heflin, Todd Ney著 的源码

<%@ LANGUAGE=VBSCRIPT %>
<!--#INCLUDE VIRTUAL="/ScriptLibrary/RS.ASP"-->
<% RSDispatch %>

<SCRIPT RUNAT=SERVER Language=javascript>	
var dbLoc = "d:/wsc book/chpt12/examples/";

function CustInfo()
{ 
	this.getCustByID = custInfoByID;
	this.getNextCust = nextCust;
	this.getPrevCust = prevCust;
	this.getFirstCust = firstCust;
	this.getLastCust = lastCust;
	this.updateCustData = updateData;

}
public_description = new CustInfo();

function custInfoByID(id){
	return loadData('select * from customers where customerid = "' + id + '"');
}
function nextCust(id){
	return loadData('select top 1 * from customers where customerid > "' + id + '"');
}
function prevCust(id){
	return loadData('select top 1 * from customers where customerid < "' + id + '" order by customerid desc');
}
function firstCust(){
	return loadData('select top 1 * from customers order by customerid');
}
function lastCust(){
	return loadData('select top 1 * from customers order by customerid desc');
}
function loadData(strSQL){
var dataValue;
var data;
var dbCust;
var rsCustInfo;    

	dbCust = new ActiveXObject("ADODB.Connection");
   	rsCustInfo = new ActiveXObject("ADODB.Recordset");
	dbCust.Open("provider=Microsoft.Jet.OLEDB.4.0;Data Source=" +  dbLoc + "customer.mdb;Persist Security Info=False");
   	rsCustInfo.Open(strSQL, dbCust, 3, 1);

	if (rsCustInfo.EOF && rsCustInfo.BOF)
		return "";
		
	for (i = 0; i < rsCustInfo.Fields.Count; i++){
		if (rsCustInfo(i).Value == null)
			dataValue = "";
		else
			dataValue = rsCustInfo(i).Value;
		
		if (i > 0)
			data = data + "<||>" + dataValue;
		else
			data = dataValue;
	}
	
	rsCustInfo.Close();
	dbCust.Close();

	return data;
	
}
function updateData(strData){
var strSQL;
var data = new Array();
var rs;

	data = strData.split("<||>");
	strSQL = buildSQL(data);
   	rs = new ActiveXObject("ADODB.Recordset");

	dbCust = new ActiveXObject("ADODB.Connection");
	dbCust.Open("provider=Microsoft.Jet.OLEDB.4.0;Data Source=" +  dbLoc + "customer.mdb;Persist Security Info=False");
	rs = dbCust.Execute(strSQL);
	dbCust.Close();
	return data[0];
}
function buildSQL(data){
var strSQL;
	
	strSQL = "update customers set ";
	strSQL = strSQL + "customerid = ";
	strSQL = strSQL + "'" + replaceQuote(data[1]) + "',";
	strSQL = strSQL + "LastName = ";
	if (data[2] == "")
		strSQL = strSQL + "null,";
	else
		strSQL = strSQL + "'" + replaceQuote(data[2]) + "',";
	strSQL = strSQL + "FirstName = ";
	if (data[3] == "")
		strSQL = strSQL + "null,";
	else
		strSQL = strSQL + "'" + replaceQuote(data[3]) + "',";
	strSQL = strSQL + "address = ";
	if (data[4] == "")
		strSQL = strSQL + "null,";
	else
		strSQL = strSQL + "'" + replaceQuote(data[4]) + "',";
	strSQL = strSQL + "city = ";
	if (data[5] == "")
		strSQL = strSQL + "null,";
	else
		strSQL = strSQL + "'" + replaceQuote(data[5]) + "',";
	strSQL = strSQL + "region = ";
	if (data[6] == "")
		strSQL = strSQL + "null,";
	else
		strSQL = strSQL + "'" + replaceQuote(data[6]) + "',";
	strSQL = strSQL + "postalcode = ";
	if (data[7] == "")
		strSQL = strSQL + "null,";
	else
		strSQL = strSQL + "'" + replaceQuote(data[7]) + "',";
	strSQL = strSQL + "country = ";
	if (data[8] == "")
		strSQL = strSQL + "null,";
	else
		strSQL = strSQL + "'" + replaceQuote(data[8]) + "',";
	strSQL = strSQL + "phone = ";
	if (data[9] == "")
		strSQL = strSQL + "null";
	else
		strSQL = strSQL + "'" + replaceQuote(data[9]) + "'";
	
	strSQL = strSQL + " where customerid = '" + replaceQuote(data[0]) + "'"	
	return strSQL;
}
function replaceQuote(value){
  	return value.replace(/\'/ig, "\'\'");
}
</SCRIPT>