物件導向的asp編程之六--用於自動顯示RecordSet的表格

<script language=jscript runat=server>
// ************************************************************************
// Script Compont Object Model
// Design for Active Server Pages
//
// Copyright 2003 Version 1.0
// Made by 尹曙光
// ************************************************************************
//用於顯示一個recordset中的資料,可以指定顏色和樣式
//介面函數
function createJDBList(){
var objJDBlist=new JDBlist
objJDBlist.create()
return objJDBlist
}
//類體定義
function JDBlist(){

this.AdoRecordSet

this.Width
this.Border
this.Cellspacing
this.Cellpadding
this.Class
this.TitleClass

this.FirstColor
this.SecondColor
this.create=_JDBlist_Create
this.display=_JDBlist_Display
}
//方法實現
function _JDBlist_Create(){

this.AdoRecordSet=""

this.Width="100%"
this.Border="1"
this.Cellspacing="0"
this.Cellpadding="1"
this.Class=""

this.TitleClass=''

this.FirstColor=''
this.SecondColor=''
}
function _JDBlist_Display(){
var htmlDSO = '';
var nFields = this.AdoRecordSet.Fields.Count;
if (nFields)
{
var n = 0;
htmlDSO += '<' + 'table width="'+this.Width+'" id="'+this.Id+'" Cellspacing="'+this.Cellspacing+'" Cellpadding="'+this.Cellpadding+'" Border="'+this.Border+'" Class="'+this.Class+'">';

htmlDSO += '<' + 'tr>';
for (var i=0; i < nFields; i++)
{
htmlDSO += '<' + 'td class="'+this.TitleClass+'">' + this.AdoRecordSet(i).name + '<' + '/td>';
}
htmlDSO += '<' + '/tr>';

if (!(this.AdoRecordSet.EOF&&this.AdoRecordSet.Bof))