快精灵印艺坊 您身边的文印专家
广州名片 深圳名片 会员卡 贵宾卡 印刷 设计教程
产品展示 在线订购 会员中心 产品模板 设计指南 在线编辑
 首页 名片设计   CorelDRAW   Illustrator   AuotoCAD   Painter   其他软件   Photoshop   Fireworks   Flash  

 » 彩色名片
 » PVC卡
 » 彩色磁性卡
 » 彩页/画册
 » 个性印务
 » 彩色不干胶
 » 明信片
   » 明信片
   » 彩色书签
   » 门挂
 » 其他产品与服务
   » 创业锦囊
   » 办公用品
     » 信封、信纸
     » 便签纸、斜面纸砖
     » 无碳复印纸
   » 海报
   » 大篇幅印刷
     » KT板
     » 海报
     » 横幅

ASP实现在WEB中显示电子表格数据(二)生成HTML表格

过程的最后一步是格式化数据并显示,就是建立一个HTML输出,步骤如下:

依次循环记录集(Recordset)中每一个字段(Field),写标题
依次循环记录集和每一个字段,写数值
   例程代码将整个的HTML表格组合为一个长字符串,最后输出到HTML页面。字符串初始化为如下值:

DataTable = "< table >< tr >"

   电子数据表的列的必要信息由记录集对象的Field集合产生,它包括了一系列字段对象,可以使用它们的Name属性建立标题行。

For Each oField in oRs.Fields
DataTable = DataTable & "< th >" & oField.Name & "< /th >"
Next
DataTable = DataTable & "< /tr >"

   最新打开的记录集(recordset)自动将初始位置指向第一行,使用MoveNext方式移动记录指针,顺序存取每一行,直到整个记录集的末尾。当到记录集末尾时,属性Eof的值变成True,循环结束。在循环中,通过字段集合的列举以及对应的Value属性,从而达到单元格数据的存取。

Do While Not oRs.EOF
DataTable = DataTable & "< tr >"

For Each oField in oRs.Fields
DataTable = DataTable & "< td >" & oField.Value & "< /td >"
Next

DataTable = DataTable & "< /tr >"
oRs.MoveNext
Loop

   最后,加上HTML的表格结束标记,输出整个字符串到页面,形成了动态产生的表格。由于记录集对象不再需要,所以要释放它。

DataTable = DataTable & "< /table >"
Set oRs = Nothing

Response.Write DataTable

   在总结前,有必要说明一个小的定义在电子数据表是如何解释的。

   通常,在ADO中将一定范围内的第一行解释为一套列标题,尽管在ODBC中有明文定义的选项可以禁止这种解释,但我也不愿意在ADO中这么做。假如第一行包含数字信息,那么ADO中将返回通用的字段名,比如:F1,F2,等等...,这样就不能看到数字的值。而且,ADO也会将第一行中的“非字母、非数字”字符替换为符号#。
返回类别: 教程
上一教程: ASP系列讲座(十五)使用 HTML 表格
下一教程: 嵌入式WEB视频点播系统实现方式

您可以阅读与"ASP实现在WEB中显示电子表格数据(二)生成HTML表格"相关的教程:
· asp实现在web中显示电子表格数据(二)生成HTML表格
· asp实现在web中显示电子表格数据(三)创建数据表列表和名字范围
· ASP实现在WEB中显示电子表格数据(四)创建文件选择列表
· ASP实现在WEB中显示电子表格数据(一)显示数据表格的应用
· asp实现在web中显示电子表格数据(一)显示数据表格的应用
    微笑服务 优质保证 索取样品