面向对象的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+@#">\n@#;

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

if (!(this.AdoRecordSet.EOF&&this.AdoRecordSet.Bof))
this.AdoRecordSet.MoveFirst()
else
htmlDSO += @#<@# + @#td colspan="@#+nFields+@#" align="center">没有数据！<@# + @#/td>@#

var rcc=0
while (!this.AdoRecordSet.EOF)
{ // add each record to table
if (rcc%2==0)
htmlDSO += @#<@# + @#tr bgcolor="@#+this.FirstColor+@#">@#;
else
htmlDSO += @#<@# + @#tr bgcolor="@#+this.SecondColor+@#">@#;

for (var i=0; i < nFields; i++)
{
htmlDSO += @#<@# + @#td >@# + this.AdoRecordSet(i).value + @#<@# + @#/td>@#;
}

htmlDSO += @#<@# + @#/tr>\n@#;

this.AdoRecordSet.MoveNext();

rcc++
}
htmlDSO += @#<@# + @#/table>@#;
}
Response.Write(htmlDSO);
}
</script>

文章来源于领测软件测试网 https://www.ltesting.net/