一个什么都不懂的家伙非跟我要个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 %>
