一個(gè)sql查詢器，自動(dòng)畫表格填字段
更新時(shí)間：2008年11月20日 13:56:17 作者：
隨便寫了一個(gè)，當(dāng)然為了數(shù)據(jù)安全，要過(guò)濾掉一個(gè)sql關(guān)鍵詞和系統(tǒng)中的一些表了
一個(gè)什么都不懂的家伙非跟我要個(gè)sql查詢器
隨便寫了一個(gè)，當(dāng)然為了數(shù)據(jù)安全，要過(guò)濾掉一個(gè)sql關(guān)鍵詞和系統(tǒng)中的一些表了
哦，對(duì)了，里面的一些函數(shù)你可能不知道哪里來(lái)的，是我現(xiàn)在開(kāi)發(fā)一些東西一直用的自己寫的一個(gè)小框架
把常用的功能封裝一下，寫程序主要是思路，看一下代碼思想就知道我的原理了
<%
function QuerySql(sql)
%>
<table width="680" cellspacing="1" cellpadding="3" border="0" bgcolor="#c7c7c7" align="center">
<%
set rs=getRs(sql)
FieldsNum=rs.Fields.Count
puts "<tr >"
for i=0 to FieldsNum-1
puts "<td style=""background:#ccc"">"&rs.Fields.item(i).name"</td>"
next
puts "</tr>"
do while not rs.eof
puts "<tr>"
for i=0 to FieldsNum-1
puts "<td>"&rs(i)"</td>"
next
puts "</tr>"
rs.movenext
loop
%>
</table>
<%
end function
%>
隨便寫了一個(gè)，當(dāng)然為了數(shù)據(jù)安全，要過(guò)濾掉一個(gè)sql關(guān)鍵詞和系統(tǒng)中的一些表了
哦，對(duì)了，里面的一些函數(shù)你可能不知道哪里來(lái)的，是我現(xiàn)在開(kāi)發(fā)一些東西一直用的自己寫的一個(gè)小框架
把常用的功能封裝一下，寫程序主要是思路，看一下代碼思想就知道我的原理了
<%
function QuerySql(sql)
%>
<table width="680" cellspacing="1" cellpadding="3" border="0" bgcolor="#c7c7c7" align="center">
<%
set rs=getRs(sql)
FieldsNum=rs.Fields.Count
puts "<tr >"
for i=0 to FieldsNum-1
puts "<td style=""background:#ccc"">"&rs.Fields.item(i).name"</td>"
next
puts "</tr>"
do while not rs.eof
puts "<tr>"
for i=0 to FieldsNum-1
puts "<td>"&rs(i)"</td>"
next
puts "</tr>"
rs.movenext
loop
%>
</table>
<%
end function
%>
相關(guān)文章
Asp Access 創(chuàng)建靜態(tài)文件/HTML
Asp Access 創(chuàng)建靜態(tài)文件/HTML...2006-10-10
ASP頁(yè)面隨機(jī)添加字符實(shí)現(xiàn)防復(fù)制的代碼
ASP頁(yè)面隨機(jī)添加字符實(shí)現(xiàn)防復(fù)制的代碼...2007-08-08
64位win7的IIS7下asp與access的連接問(wèn)題
運(yùn)行asp是提示Microsoft OLE DB Provider for ODBC Drivers (0x80004005)[Microsoft][ODBC Microsoft Access Driver] 找不到文件 '(未知的)'。2009-12-12
asp下實(shí)現(xiàn)替換遠(yuǎn)程文件為本地文件并保存遠(yuǎn)程文件的代碼
asp下實(shí)現(xiàn)替換遠(yuǎn)程文件為本地文件并保存遠(yuǎn)程文件的代碼...2007-03-03
asp取動(dòng)態(tài)表單中數(shù)據(jù)并寫入xml文件,用xsl顯示
asp取動(dòng)態(tài)表單中數(shù)據(jù)并寫入xml文件,用xsl顯示...2006-09-09
Asp 操作Access數(shù)據(jù)庫(kù)時(shí)出現(xiàn)死鎖.ldb的解決方法
在一天某個(gè)時(shí)間段內(nèi)打不開(kāi)，等待好幾分鐘就會(huì)說(shuō)asp腳本超時(shí)，但FTP可以登陸進(jìn)去，查看數(shù)據(jù)庫(kù)目錄時(shí)，發(fā)現(xiàn)與數(shù)據(jù)庫(kù)（我的數(shù)據(jù)庫(kù)是access數(shù)據(jù)庫(kù)）同名的記錄鎖定信息文件 (.ldb文件)一直都在那里2009-04-04
ASP調(diào)用遠(yuǎn)程XML數(shù)據(jù)的代碼(alexa排名數(shù)據(jù))
調(diào)用網(wǎng)易新聞的XML數(shù)據(jù)為例進(jìn)行講解如果通過(guò)ASP遠(yuǎn)程調(diào)取XML文件，并讀出數(shù)據(jù)。其實(shí)我們之前就使用了asp讀取alexa官方的數(shù)據(jù)。2011-09-09
asp目錄讀寫權(quán)限檢測(cè)腳本 TestFolder
T00LS 檢測(cè)星外可執(zhí)行目錄的一個(gè)工具，今天剛好用到，記錄下。檢測(cè)了下運(yùn)氣差得很，全盤只能讀不能寫，檢測(cè)讀寫權(quán)限的時(shí)候?qū)⒁韵麓a保存為x.asp上傳到網(wǎng)站修改檢測(cè)目錄，點(diǎn)提交即可2011-11-11
asp對(duì)復(fù)雜json的解析一定要注意要點(diǎn)
網(wǎng)上有很多類似的文章但只解析出第一層，后面的死活試了大半天才測(cè)試出來(lái)，下面貼上我的代碼，解釋一下，也算對(duì)我做的東西留個(gè)備份2014-06-06
用ASP做搜索很容易，但要實(shí)現(xiàn)智能搜索這類就比較累一點(diǎn)，其實(shí)任何程序都差不多，主要還是看數(shù)據(jù)庫(kù)的處理能力，一般小網(wǎng)站ASP經(jīng)常跟ACCESS數(shù)據(jù)庫(kù)搭配2009-03-03