<% set conn=server.Createobject("ADODB.Connection") conn.Open Application("strConn") Set rs=Server.CreateObject("ADODB.RecordSet") sql="select top 1 * from news where isok='是' and isfocus='是'" rs.open sql,conn,1,1 Set rs1=Server.CreateObject("ADODB.RecordSet") sql1="select top 6 * from news where isok='是' and isfocus=''" rs1.open sql1,conn,1,1 %>



     
  今天开始的“2003新加坡热卖会”，参与的零售商超过2万2000家。旅游局还特地在印尼、马来西亚和泰国展开促销，推出吸引人的旅游配套。  
     




 

     adm@lygfuel.com        ??:0518-85452162 ??:0518-85477818             Copyright © 2003 ????????????
<% rs.colse() set rs=nothing conn.close() set conn=nothing %>