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