Set rszs= Server.CreateObject("ADODB.Recordset")
zssql="select * from spzs where flag=1 and zsbz like '%01%' order by ID desc"
rszs.open zssql,conn
set Rechy=server.createobject("adodb.recordset")
Rechysql="select * from class_1 order by sortid asc"
Rechy.open Rechysql,conn
set Rechyxx=server.createObject("ADODB.Recordset")
Rechyxxsql="SELECT top 10 * from hyxx order by newsid desc"
Rechyxx.open rechyxxsql,conn
set recnews=server.CreateObject("adodb.recordset")
recnewssql="select top 8 title,flag,newsid,title,typeid,typename from commerce where flag=1 order by newsid desc"
recnews.open recnewssql,conn
recztsql="SELECT ztName,ztid FROM zt ORDER BY ztID DESC"
set reczt=server.CreateObject("adodb.recordset")
reczt.open recztsql,conn
set Reccg=server.createObject("ADODB.Recordset")
Reccgsql="SELECT top 50 * FROM info where flag=1 and type='采购' ORDER BY info_id DESC"
Reccg.open Reccgsql,conn
set Recgy=server.createObject("ADODB.Recordset")
Recgysql="SELECT top 50 * FROM info where flag='1' and type='供应' ORDER BY info_id DESC"
Recgy.open Recgysql,conn
set Recdl=server.createObject("ADODB.Recordset")
Recdlsql="SELECT * FROM info where flag='1' and type='" & "代理" & "' and dateandtime>='"&dat&"' ORDER BY dateandtime DESC"
Recdl.open Recdlsql,conn
set Rechz=server.createObject("ADODB.Recordset")
Rechzsql="SELECT top 50 * FROM info where flag='1' and type='" & "合作" & "' and dateandtime>='"&dat&"' ORDER BY dateandtime DESC"
Rechz.open Rechzsql,conn
set rstspl=server.CreateObject("adodb.recordset")
sqltspl="select top 10 id,zt from tsbg order by id desc"
rstspl.open sqltspl,conn,1,1
Set rscx= Server.CreateObject("ADODB.Recordset")
sqlcx="select top 6 newsid,title from hyxx where typeid=6 order by NewsID desc"
rscx.open sqlcx,conn,1,1
sql_hb="select top 6 newsid,title from Commerce where typeid=3 order by NewsID desc"
Set rs_hb= Server.CreateObject("ADODB.Recordset")
rs_hb.open sql_hb,conn,1,1