一個sql查詢器,自動畫表格填字段
更新時間:2008年11月20日 13:56:17 作者:
隨便寫了一個,當然為了數(shù)據(jù)安全,要過濾掉一個sql關(guān)鍵詞和系統(tǒng)中的一些表了
一個什么都不懂的家伙非跟我要個sql查詢器
隨便寫了一個,當然為了數(shù)據(jù)安全,要過濾掉一個sql關(guān)鍵詞和系統(tǒng)中的一些表了
哦,對了,里面的一些函數(shù)你可能不知道哪里來的,是我現(xiàn)在開發(fā)一些東西一直用的自己寫的一個小框架
把常用的功能封裝一下,寫程序主要是思路,看一下代碼思想就知道我的原理了
<%
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
%>
隨便寫了一個,當然為了數(shù)據(jù)安全,要過濾掉一個sql關(guān)鍵詞和系統(tǒng)中的一些表了
哦,對了,里面的一些函數(shù)你可能不知道哪里來的,是我現(xiàn)在開發(fā)一些東西一直用的自己寫的一個小框架
把常用的功能封裝一下,寫程序主要是思路,看一下代碼思想就知道我的原理了
<%
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下實現(xiàn)替換遠程文件為本地文件并保存遠程文件的代碼
asp下實現(xiàn)替換遠程文件為本地文件并保存遠程文件的代碼...2007-03-03
asp取動態(tài)表單中數(shù)據(jù)并寫入xml文件,用xsl顯示
asp取動態(tài)表單中數(shù)據(jù)并寫入xml文件,用xsl顯示...2006-09-09
Asp 操作Access數(shù)據(jù)庫時出現(xiàn)死鎖.ldb的解決方法
在一天某個時間段內(nèi)打不開,等待好幾分鐘就會說asp腳本超時,但FTP可以登陸進去,查看數(shù)據(jù)庫目錄時,發(fā)現(xiàn)與數(shù)據(jù)庫(我的數(shù)據(jù)庫是access數(shù)據(jù)庫)同名的記錄鎖定信息文件 (.ldb文件)一直都在那里2009-04-04
ASP調(diào)用遠程XML數(shù)據(jù)的代碼(alexa排名數(shù)據(jù))
調(diào)用網(wǎng)易新聞的XML數(shù)據(jù)為例進行講解如果通過ASP遠程調(diào)取XML文件,并讀出數(shù)據(jù)。其實我們之前就使用了asp讀取alexa官方的數(shù)據(jù)。2011-09-09
asp目錄讀寫權(quán)限檢測腳本 TestFolder
T00LS 檢測星外可執(zhí)行目錄的一個工具,今天剛好用到,記錄下。檢測了下運氣差得很,全盤只能讀不能寫,檢測讀寫權(quán)限的時候?qū)⒁韵麓a保存為x.asp上傳到網(wǎng)站修改檢測目錄,點提交即可2011-11-11

