default2_leixin.asp

来自「OA最新破解2008版 全新 破解 希望大家用着舒服」· ASP 代码 · 共 21 行

<%
set rssort= Server.CreateObject("ADODB.Recordset") 
sortsql="select * from class_1"   
rssort.open sortsql,conn,1,1
%>
<table width="96%" border="0" align="center" cellpadding="0" cellspacing="0">
 <%do while not rssort.eof%>  
                      <tr> 
                        <td class=nobianbuttonborder3 height="25">　<a href="default2.asp?sortid=<%=rssort("sortid")%>"><%=rssort("sort")%></a>（<%sql="select count(sortid) from quoted where sortid="&rssort("sortid")&" and h_flag=1"
                   set totle=conn.execute(sql)
                   totle=totle(0)%>(<%=totle%>)）</td>
                      </tr>
                      <tr> 
                      </tr>
		<% rssort.movenext
           loop
           rssort.close
           set rssort=nothing
        %>
</table>