<% '############################### 'Jiangrong专题调用参数说明 # 'tiao 专题数量 # 'lei 专题分类 # '############################### a=request("tiao") if a="" then a=12 end if lei=request("lei") response.write "document.write('

');" MM_conn_STRING = "Driver={SQL Server};server=202.108.201.10;uid=wufakendingdeai2008;pwd=wozuoyouyaobai8;database=solid_zhuanti;" set conn2=server.createobject("adodb.connection") conn2.open MM_conn_STRING set rss=server.CreateObject("ADODB.RecordSet") if lei="" or isnull("lei") then sql1l="select * from General_Data where disdel=0 order by id desc" else sql1l="select * from General_Data where disdel=0 and cid="&lei&" order by id desc" end if rss.open sql1l,conn2,1,1 for i=1 to a if rss.eof then exit for end if myid=rss("reporturl") myreport=rss("reportname") response.write "document.write('');" rss.movenext next rss.close set rss=nothing conn2.close set conn2=nothing response.write "document.write('

');" %>