国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > HTML > 正文

asp實現在web中顯示電子表格數據(二)生成HTML表格(轉)

2020-03-24 16:09:06
字體:
來源:轉載
供稿:網友

過程的最后一步是格式化數據并顯示,就是建立一個HTML輸出,步驟如下:

依次循環記錄集(Recordset)中每一個字段(Field),寫標題

依次循環記錄集和每一個字段,寫數值

例程代碼將整個的HTML表格組合為一個長字符串,最后輸出到html' target='_blank'>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

/tDataTable = 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也會將第一行中的“非字母、非數字”字符替換為符號#。

鄭重聲明:本文版權歸原作者所有,轉載文章僅為傳播更多信息之目的,如作者信息標記有誤,請第一時間聯系我們修改或刪除,多謝。

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 三门峡市| 陈巴尔虎旗| 台南县| 南岸区| 年辖:市辖区| 潼南县| 尉犁县| 禹城市| 波密县| 淳安县| 大同市| 盐城市| 巢湖市| 龙江县| 桓仁| 如东县| 鸡西市| 邻水| 江川县| 云林县| 五指山市| 彰化县| 湘乡市| 哈密市| 洛川县| 富川| 离岛区| 瓦房店市| 绵阳市| 武山县| 潼南县| 永吉县| 怀柔区| 岐山县| 康平县| 曲靖市| 临漳县| 汾西县| 板桥市| 石棉县| 濉溪县|