ASP讀取資料庫自動生成表格，可自由控制換行！
在csdn論壇及admin5論壇中，經常遇到有網友問“怎樣根據資料庫的記錄來生成完整的表格，並且可自由控制換行？”這個問題。
其實在網路上也有很多ASP高手做過各種方法的解答，但個別也有些不完美的地方。比如：生成的表格程式碼不完整！<tr>與</tr>未配對出現，
或者輸出多個<tr>標籤。雖然在頁面顯示上好像沒什麼大的問題，但標籤不關閉不僅不符合W3C標準，也極可能導致頁面變形或出錯。
下面就將本人原創的“ASP讀取資料庫自動生成表格,可自由控制換行”這個方法跟大家作一個交流，不怕老鳥丟金磚哈。^_^
言歸正傳，下面的程式碼主要是將“資料表WEB”中的“網站名稱webname”及“網址url”迴圈輸出到表格中，ASP程式碼簡單，生成的表格程式碼卻非常完整！裡面有較詳細的註釋。
·資料庫版本：Access 2003
·資料庫檔名：data.asp
·資料庫路徑：與下面的檔案在一個目錄
·資料表名：web
·資料表結構：id（自動編號，關鍵字）--webname（文字型別）--url（文字型別）
·表中資料示例：1 -- 免費廣告位--
2 -- 站長新動力論壇 -- bbs.msxindl.com
3 -- 成都IT數碼論壇 -- www.cdit8.com
·測試環境：WindowsXp-Sp2 IE6.0 IIS5.1
示例程式碼開始：
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="content-type" content="text/html;charset=gb2312" />
<title>ASP讀取資料庫自動生成表格,可自由控制換行</title>
</head>
<body>
<table align="center" width="770" cellspacing="0" cellpadding="0" border="0">
<tr>
<td colspan="8">
<table width="100%" cellspacing="0" cellpadding="0" border="0">
<tr>
<td><font face="webdings">4</font><strong>ASP生成表格示例</strong></td>
</tr>
</table>
</td>
</tr>
<%
dim conn,connstr
sub connect() '將資料庫連線程式碼封裝成一個函式來執行,避免其中的on error resume next成為全域性程式碼,只讓它在此函式裡起作用!
on error resume next
set conn=server.createobject("adodb.connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("data.asp")
conn.open connstr
if err.number<>0 then
err.clear
conn.close
set conn=nothing
response.write("資料庫連線失敗!!")
response.end
end if
end sub
call connect() '執行資料庫連線函式
sub closeconn()
on error resume next
if isobject(conn) then
conn.close
set conn=nothing
end if
end sub
'-------------以上部分可單獨儲存成一個ASP檔案,用<!--#include file="xxx.asp"-->的方式來引用.-----
set rs=server.createobject("adodb.recordset")
sql="select webname,url from [web] order by id asc"
rs.open sql,conn,1,1
if not rs.eof then
'-----------以下是迴圈輸出單元格的關鍵步驟------------
rs.movefirst
dim x,z,o
x=rs.recordcount '單元格總數.即:記錄總數.也可以自定義.
'if x>=10 then x=10 '只取出前10條記錄
o=8 '設定每行的單元格數量.
z=x mod o '取餘數
response.write(" <tr>")
for i=1 to x-z
%>
<td align="center"><a href="
<%
rs.movenext
if i mod o = 0 then response.write(" </tr>"&vbCrlf)
%>
<%
next
if z<>0 then
if x > o then response.write(" <tr>") '如果單元格總數大於一行的單元格數量,則另起一行.
for ii=x-z+1 to x
%>
<td align="center"><a href="
<%
rs.movenext
next
for j=1 to o-z '如果記錄集資料小於設定的單元格數量,則輸出下面的單元格來補齊.
response.write(" <td align=""center"">站長新動力</td>"&vbCrlf)
next
response.write(" </tr>"&vbCrlf)
end if
else '設定記錄集為空時要顯示的內容.
%>
<tr><td align="center" colspan="8"> 站長新動力 www.msxindl.com </td></tr>
<%
end if
rs.close
set rs=nothing
%>
</table>
<% call closeconn() %>
</body>
</html>
----------完了！
相關推薦
ASP讀取資料庫自動生成表格，可自由控制換行！
在csdn論壇及admin5論壇中，經常遇到有網友問“怎樣根據資料庫的記錄來生成完整的表格，並且可自由控制換行？”這個問題。 其實在網路上也有很多ASP高手做過各種方法的解答，但個別也有些不完美的地方。比如：生成的表格程式碼不完整！<tr>與</tr&
使用xorm工具，根據資料庫自動生成 go 程式碼
使用xorm工具，根據資料庫自動生成 go 程式碼 引入 使用 golang 操作資料庫的同學都會遇到一個問題 —— 根據資料表結構建立對應的 struct 模型。因為 golang 的使用首字母控制可見範圍，我們經常要設計 struct 欄位名和資料庫欄位名的對應關係。久而久之
根據mysql資料庫自動生成mvc三層程式碼及jsp頁，極速開發srpingmvc+mybatis+bootstrap專案。
極速開發srpingmvc+mybatis+bootstrap專案 最近開發web總感覺增刪改查，mvc三層重複開發的套路程式碼太多，於是有了一個想法： 能不能一鍵生成增刪改查各層程式碼，於是開發了這個專案。 專案主要的功能：根據mysql資料庫（表和欄位要有
自動生成getter，setter方法的插件lombok
align es2017 此外 div bsp gpo idea alsa ane 1.在InteiliJ IDEA上安裝lombok插件，並重啟 . 2.在pom.xml文件中添加依賴 <dependency> <groupId>org.pr
XML之自動生成類，添加，修改，刪除類的屬性
pes 表示 創建 BE gen name 待完善 ica bsp 1. class ClassHelperDemo { public static void Main() { #re
laravel-admin自動生成模組，及相關基礎配置
一、模型建立、資料遷移、以及關聯模型控制器 $ php artisan make:model Brand -m //建立模型並生成遷移檔案 $ php artisan migrate //執行遷移 $ php artisan admin:make BrandController --
thinkphp 5 自動生成模組，最簡單方式，一句程式碼
直接在專案入口檔案中加上最後一句就夠了 可以不依賴自動生成檔案，直接使用預設目錄生成模組，例如： // 定義應用目錄 define('APP_PATH', __DIR__ . '/../application/'); // 載入框架引
使用T4模板從根據資料庫自動生成類類檔案
一個數據庫可能有多個表，需要生成多個類檔案，首先建立一個xx.ttinclude檔案.此檔案主要能夠生成單獨的類檔案。同時再定義一個類DBHelper來獲取資料庫裡所有表的資訊和資料。 <#@ assembly name="System.Core"#><#@ assembly nam
Spring boot入門（三）：SpringBoot整合結合AdminLTE(Freemarker)，利用generate自動生成程式碼，利用DataTable和PageHelper進行分頁顯示
關於SpringBoot和PageHelper，前篇部落格已經介紹過Spring boot入門（二）：Spring boot整合MySql,Mybatis和PageHelper外掛，前篇部落格大致講述了SpringBoot如何整合Mybatis和Pagehelper,但是沒有做出實際的範例，本篇部落格是連
Mybatis Generator（MBG）自動生成dao，entity ，mapper.xml對映
1.在pom.xml中引入依賴 <!--mybatis-generator 自動生成工具--> <dependency> <groupId>org.mybatis.generator
mybatis反向工程generatorSqlmap-increase自動生成程式碼，還有一點引數校驗
之前都是大佬搭框架我寫業務程式碼，知道mybatis能自動生成程式碼，但是從來沒自己操作過，菜雞。 一開始我是用springboot的mybatis外掛生成的，但是生成的程式碼裡方法很少，沒有各個欄位的操作，所以又用generatorSqlmap-increase做了一次，
Oracle資料庫自動生成資料字典
1.登陸Oracle官網下載SQL Developer（若安裝過jdk則可選擇不帶jdk的版本） 2.不用安裝，直接解壓使用即可 3.新建連線之後，在左側欄中選中連線名右鍵選擇 “生成資料庫文件” 即可 4、選擇輸出目錄，點選確定即可 注意：輸出為html
java根據資料庫自動生成vo 類
以前我們 spring + hibernate 寫程式，現在我用 spring + ibatis ，不管是hibernate 還是 Ibatis 都要自己寫一堆對應資料庫的vo類 今天早上我自己手工寫了一個程式，可以自動讀取資料庫 （目前只支援oracl 中的 varchar2 和 numb
springboot+mybatis配置generator.xml自動生成實體，xml檔案
<?xml version="1.0" encoding="UTF-8"?> <!DOCTYPE generatorConfiguration PUBLIC "-//mybatis.org//DTD MyBatis Generator Configuration 1
三、Angular自動生成專案，主要檔案分析
1. 專案主要檔案存放的路徑 2.app.module.ts模組解析 擴充套件 檔案的關係是從屬關係：|--a
根據資料庫自動生成java程式碼
package com.power.util; import java.io.BufferedWriter; import java.io.File; import java.io.FileNotFoundException; import java.io.FileOutputStream; import
《Effective C++》條款6：若不想使用編譯器自動生成函式，就該明確拒絕
條款5中講了編譯器會預設為我們定義一些函式，①copy建構函式 ②copy assignment ③解構函式④default建構函式 ，那如果我們不想使用這些函式怎麼辦？條款5中講到了，什麼情況我們需要自己定義cpoy assignment和copy 建構函
ASP資訊頁面自動生成HTML的兩種方法
1）目前已經有很多生成html的新聞系統，但是都是用的模板，本函式實現把asp頁面產生的html程式碼儲存成為一個html檔案，這樣就沒有必要改動原來的頁面就可以輕鬆完成一個生成html的新聞系統了 <% ''當目標頁面的包含檔案即#incl
Angularjs自動生成表格Table(用於資料回顯)
Angularjs自動生成表格Table 1、使用場景：（1）使用Augularjs請求後臺，查詢記錄，將返回的記錄以表格的形式進行顯示；（2）對錶格進行編輯時，資料回顯 2、使用方式（1）方式1 <!DOCTYPE html> <html> <head> <m
Angularjs自動生成表格Table(用於數據回顯)
oct charset ng- tps any alfred nds ctrl src Angularjs自動生成表格Table 1、使用場景：（1）使用Augularjs請求後臺，查詢記錄，將返回的記錄以表格的形式進行顯示；（2）對表格進行編輯時，數據回顯 2、使用方式（