contactinfo.wsc

来自「Windows Web脚本开发指南/(美) Dan Heflin, Todd N」· WSC 代码 · 共 348 行

<?xml version="1.0"?>
<component>

<?component error="true" debug="true"?>

<registration
	description="contactinfo"
	progid="contactinfo.WSC"
	version="1.00"
	classid="{b92188c0-cab7-11d3-a555-002078128f96}"
>
</registration>
<object id="cnn" progid="ADODB.Connection"/>
<object id="rs" progid="ADODB.Recordset"/>
<public>
	<property name="fName">
		<get/>
		<put/>
	</property>
	<property name="lName">
		<get/>
		<put/>
	</property>
	<property name="address">
		<get/>
		<put/>
	</property>
	<property name="city">
		<get/>
		<put/>
	</property>
	<property name="state">
		<get/>
		<put/>
	</property>
	<property name="zip">
		<get/>
		<put/>
	</property>
	<property name="phone">
		<get/>
		<put/>
	</property>
	<property name="email">
		<get/>
		<put/>
	</property>
	<property name="id">
		<get/>
	</property>
	<property name="dbLoc">
		<put/>
	</property>
	<method name="retrieve">
	</method>
	<method name="update">
		<parameter name="oldLName"/>
	</method>
	<method name="del">
	</method>
	<method name="add">
	</method>
	<method name="clear">
	</method>
</public>

<script language="JScript">
<![CDATA[
var fName = "";
var lName = "";
var address = "";
var city = "";
var state = "";
var zip = "";
var phone = "";
var email = "";
var id = 0;
var dbLoc = "";
function get_fName()
{
	return fName;
}

function put_fName(newValue)
{
	fName = newValue;
}

function get_lName()
{
	return lName;
}

function put_lName(newValue)
{
	lName = newValue;
}

function get_address()
{
	return address;
}

function put_address(newValue)
{
	address = newValue;
}

function get_city()
{
	return city;
}

function put_city(newValue)
{
	city = newValue;
}

function get_state()
{
	return state;
}

function put_state(newValue)
{
	state = newValue;
}

function get_zip()
{
	return zip;
}

function put_zip(newValue)
{
	zip = newValue;
}

function get_phone()
{
	return phone;
}

function put_phone(newValue)
{
	phone = newValue;
}

function get_email()
{
	return email;
}

function put_email(newValue)
{
	email = newValue;
}

function get_id()
{
	return id;
}
function put_dbLoc(newValue)
{
	dbLoc = newValue;
}

function retrieve(){
   cnn.Open("provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + dbLoc + "contact.mdb;Persist Security Info=False");
   rs.Open("select * from contact where lastname = '" + lName + "'", cnn, 3, 1);

   if (rs.EOF && rs.BOF){
	clear();
	rs.Close();
        cnn.Close();
	return;
   }

   if (rs(0).value != null)
       fName = rs(0).value;
   else
       fName = "";

   if (rs(1).value != null)
       lName = rs(1).value;
   else
       lName = "";

   if (rs(2).value != null)
       address = rs(2).value;
   else
       address = "";

   if (rs(3).value != null)
       city = rs(3).value;
   else
       city = "";

   if (rs(4).value != null)
       state = rs(4).value;
   else
       state = "";
   if (rs(5).value != null)
       zip = rs(5).value;
   else
       zip = "";
   if (rs(6).value != null)
       phone = rs(6).value;
   else
       phone = "";
   if (rs(7).value != null)
       email = rs(7).value;
   else
       email = "";
   if (rs(8).value != null)
       id = rs(8).value;
   else
       id = "";

   rs.Close();
   cnn.Close();
}

function update(oldLName)
{
var sTemp;

   sTemp = "update contact set "
   sTemp += "lastname = "
   if (lName == "")
       sTemp += "null,"
   else
       sTemp += "'" + lName + "',"
   sTemp += "firstname = "
   if (fName == "")
       sTemp += "null,"
   else
       sTemp += "'" + fName + "',"
   sTemp += "address = "
   if (address == "")
       sTemp += "null,"
   else
       sTemp +=  "'" + address + "',"
   sTemp += "city = "
   if (city == "")
       sTemp += "null,"
   else
       sTemp +=  "'" + city + "',"
   sTemp += "state = "
   if (state == "")
       sTemp += "null,"
   else
       sTemp +=  "'" + state + "',"
   sTemp += "zipcode = "
   if (zip == "")
       sTemp += "null,"
   else
       sTemp +=  "'" + zip + "',"
   sTemp += "phone = "
   if (phone == "")
       sTemp += "null,"
   else
       sTemp +=  "'" + phone + "',"
   sTemp += "email = "
   if (email == "")
       sTemp += "null "
   else
       sTemp +=  "'" + email + "' "
   sTemp += "where lastname = '" + oldLName + "'"

   cnn.Open("provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + dbLoc + "contact.mdb;Persist Security Info=False");
   cnn.Execute(sTemp);
   cnn.Close();
   return true;
}

function del()
{
var sTemp;
   sTemp = "delete from contact where lastname = '" + lName + "'"

   cnn.Open("provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + dbLoc + "contact.mdb;Persist Security Info=False");
   cnn.Execute(sTemp);
   cnn.Close();
   clear();
   return true;
}

function add()
{
var sTemp;

   sTemp = "insert into contact (firstname, lastname, address, city, state, zipcode, phone, email) values( "
   if (fName == "")
       sTemp += "null,"
   else
       sTemp += "'" + fName + "',"
   if (lName == "")
       sTemp += "null,"
   else
       sTemp += "'" + lName + "',"
   if (address == "")
       sTemp += "null,"
   else
       sTemp +=  "'" + address + "',"
   if (city == "")
       sTemp += "null,"
   else
       sTemp +=  "'" + city + "',"
   if (state == "")
       sTemp += "null,"
   else
       sTemp +=  "'" + state + "',"
   if (zip == "")
       sTemp += "null,"
   else
       sTemp +=  "'" + zip + "',"
   if (phone == "")
       sTemp += "null,"
   else
       sTemp +=  "'" + phone + "',"
   if (email == "")
       sTemp += "null)"
   else
       sTemp +=  "'" + email + "')"

   cnn.Open("provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + dbLoc + "contact.mdb;Persist Security Info=False");
   cnn.Execute(sTemp);
   cnn.Close();
   return true;
}
function clear()
{
    fName = "";
    lName = "";
    address = "";
    city = "";
    state = "";
    zip = "";
    phone = "";
    email = "";
    id = 0;
}
]]>
</script>

</component>