<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% set Recordtjsjz = Server.CreateObject("ADODB.Recordset") Recordtjsjz.ActiveConnection = MM_jxsjk_STRING Recordtjsjz.Source = "SELECT * FROM tjsjwz WHERE tjpage<>'#' ORDER BY tjid DESC" Recordtjsjz.CursorType = 0 Recordtjsjz.CursorLocation = 2 Recordtjsjz.LockType = 3 Recordtjsjz.Open() Recordtjsjz_numRows = 0 %> <% set Recordtjsjj = Server.CreateObject("ADODB.Recordset") Recordtjsjj.ActiveConnection = MM_jxsjk_STRING Recordtjsjj.Source = "SELECT * FROM tjsjwj WHERE tjpage<>'#' ORDER BY tjid DESC" Recordtjsjj.CursorType = 0 Recordtjsjj.CursorLocation = 2 Recordtjsjj.LockType = 3 Recordtjsjj.Open() Recordtjsjj_numRows = 0 %> <% set Recordtjsjm = Server.CreateObject("ADODB.Recordset") Recordtjsjm.ActiveConnection = MM_jxsjk_STRING Recordtjsjm.Source = "SELECT * FROM tjsjwm WHERE tjpage<>'#' ORDER BY tjid DESC" Recordtjsjm.CursorType = 0 Recordtjsjm.CursorLocation = 2 Recordtjsjm.LockType = 3 Recordtjsjm.Open() Recordtjsjm_numRows = 0 %> <% Dim Recordtjsjq Dim Recordtjsjq_cmd Dim Recordtjsjq_numRows Set Recordtjsjq_cmd = Server.CreateObject ("ADODB.Command") Recordtjsjq_cmd.ActiveConnection = MM_jxsjk_STRING Recordtjsjq_cmd.CommandText = "SELECT * FROM tjsjqt WHERE tjpage<>'#' ORDER BY tjid DESC" Recordtjsjq_cmd.Prepared = true Set Recordtjsjq = Recordtjsjq_cmd.Execute Recordtjsjq_numRows = 0 %> <% Dim Recordtjsjd Dim Recordtjsjd_numRows Set Recordtjsjd = Server.CreateObject("ADODB.Recordset") Recordtjsjd.ActiveConnection = MM_jxsjk_STRING Recordtjsjd.Source = "SELECT * FROM tjsjjd WHERE tjpage<>'#' ORDER BY tjid DESC" Recordtjsjd.CursorType = 0 Recordtjsjd.CursorLocation = 2 Recordtjsjd.LockType = 1 Recordtjsjd.Open() Recordtjsjd_numRows = 0 %> <% Dim Repeat1__numRows Repeat1__numRows = 6 Dim Repeat1__index Repeat1__index = 0 Recordtjsjz_numRows = Recordtjsjz_numRows + Repeat1__numRows %> <% Dim Repeat4__numRows Repeat4__numRows = 5 Dim Repeat4__index Repeat4__index = 0 Recordtjsjq_numRows = Recordtjsjq_numRows + Repeat4__numRows %> <% Dim Repeat7__numRows Dim Repeat7__index Repeat7__numRows = 5 Repeat7__index = 0 Recordtjsjj_numRows = Recordtjsjj_numRows + Repeat7__numRows %> <% Dim Repeat6__numRows Dim Repeat6__index Repeat6__numRows = 5 Repeat6__index = 0 Recordtjsjd_numRows = Recordtjsjd_numRows + Repeat6__numRows %> <% Dim Repeat3__numRows Repeat3__numRows = 5 Dim Repeat3__index Repeat3__index = 0 Recordtjsjm_numRows = Recordtjsjm_numRows + Repeat3__numRows %> 统计表数据
 
当前位于：首页>统计表数据>
   
<% While ((Repeat3__numRows <> 0) AND (NOT Recordtjsjm.EOF)) %> <% Repeat3__index=Repeat3__index+1 Repeat3__numRows=Repeat3__numRows-1 Recordtjsjm.MoveNext() Wend %>
" target="_blank"><%=(Recordtjsjm.Fields.Item("titel").Value)%>
更多>>
<% While ((Repeat6__numRows <> 0) AND (NOT Recordtjsjd.EOF)) %> <% Repeat6__index=Repeat6__index+1 Repeat6__numRows=Repeat6__numRows-1 Recordtjsjd.MoveNext() Wend %>
" target="_blank"><%=(Recordtjsjd.Fields.Item("titel").Value)%>
更多>>
<% While ((Repeat1__numRows <> 0) AND (NOT Recordtjsjz.EOF)) %> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 Recordtjsjz.MoveNext() Wend %>
" target="_blank"><%=(Recordtjsjz.Fields.Item("titel").Value)%>
<% While ((Repeat7__numRows <> 0) AND (NOT Recordtjsjj.EOF)) %> <% Repeat7__index=Repeat7__index+1 Repeat7__numRows=Repeat7__numRows-1 Recordtjsjj.MoveNext() Wend %>
" target="_blank"><%=(Recordtjsjj.Fields.Item("titel").Value)%>
<% While ((Repeat4__numRows <> 0) AND (NOT Recordtjsjq.EOF)) %> <% Repeat4__index=Repeat4__index+1 Repeat4__numRows=Repeat4__numRows-1 Recordtjsjq.MoveNext() Wend %>
" target="_blank"><%=(Recordtjsjq.Fields.Item("titel").Value)%>
 
 
<% Recordtjsjd.Close() Set Recordtjsjd = Nothing %> <% Recordtjsjz.Close() Set Recordtjsjz = Nothing %> <% Recordtjsjj.Close() Set Recordtjsjj = Nothing %> <% Recordtjsjm.Close() Set Recordtjsjm = Nothing %> <% Recordtjsjq.Close() Set Recordtjsjq = Nothing %>