随便写了一个，当然为了数据安全，要过滤掉一个sql关键词和系统中的一些表了一个什么都不懂的家伙非跟我要个sql查询器
随便写了一个，当然为了数据安全，要过滤掉一个sql关键词和系统中的一些表了
哦，对了，里面的一些函数你可能不知道哪里来的，是我现在开发一些东西一直用的自己写的一个小框架
把常用的功能封装一下，写程序主要是思路，看一下代码思想就知道我的原理了
< %
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
% >