<% function cutstr(tempstr,tempwid) if len(tempstr)>tempwid then cutstr=left(tempstr,tempwid)&"..." else cutstr=tempstr end if end function %>
<% set rs_news=server.createobject("adodb.recordset") sqltext4="select * from GuangGao where id=1" rs_news.open sqltext4,conn,1,1 %> <%if rs_news.bof and rs_news.eof then %> <% else if rs_news("LogoUrl")<>"" then %> " target='blank'> " border="0" width="210" height="198"> <% else %> <% end if end if rs_news.close %> <% set rs_news=server.createobject("adodb.recordset") sqltext4="select * from GuangGao where id=3" rs_news.open sqltext4,conn,1,1 %> <%if rs_news.bof and rs_news.eof then %> <% else if rs_news("LogoUrl")<>"" then %> " target='blank'> " border="0" width="210" height="65"> <% else %> <% end if end if rs_news.close %> <% set rs_news=server.createobject("adodb.recordset") sqltext4="select * from GuangGao where id=4" rs_news.open sqltext4,conn,1,1 %> <%if rs_news.bof and rs_news.eof then %> <% else if rs_news("LogoUrl")<>"" then %> " target='blank'> " border="0" width="210" height="65"> <% else %> <% end if end if rs_news.close %> <% set rs_news=server.createobject("adodb.recordset") sqltext4="select * from GuangGao where id=5" rs_news.open sqltext4,conn,1,1 %> <%if rs_news.bof and rs_news.eof then %> <% else if rs_news("LogoUrl")<>"" then %> " target='blank'> " border="0" width="210" height="65"> <% else %> <% end if end if rs_news.close %> <% set rs_news=server.createobject("adodb.recordset") sqltext4="select * from GuangGao where id=6" rs_news.open sqltext4,conn,1,1 %> <%if rs_news.bof and rs_news.eof then %> <% else if rs_news("LogoUrl")<>"" then %> " target='blank'> " border="0" width="210" height="65"> <% else %> <% end if end if rs_news.close %> <% set rs_news=server.createobject("adodb.recordset") sqltext4="select * from GuangGao where id=7" rs_news.open sqltext4,conn,1,1 %> <%if rs_news.bof and rs_news.eof then %> <% else if rs_news("LogoUrl")<>"" then %> " target='blank'> " border="0" width="210" height="65"> <% else %> <% end if end if rs_news.close %>
<% 'call ShowFriendLinks(2,16,8,2) '文字链接 call ShowFriendLinks(1,12,2,2) '图片链接 %> <% If IsQQ="Yes" Then %> <% end if %>
<% set rs_news=server.createobject("adodb.recordset") sqltext4="select top 8 * from news where BigClassName='市场新闻' order by id desc" rs_news.open sqltext4,conn,1,1 %> <%i=0 do while not rs_news.eof%> <%rs_news.movenext i=i+1 loop rs_news.close %>
<% if PopAnnounce="Yes" then call ShowAnnounce(1) end if %>
<% set rs_news=server.createobject("adodb.recordset") sqltext4="select * from GuangGao where id=2" rs_news.open sqltext4,conn,1,1 %>
<%if rs_news.bof and rs_news.eof then %> <% else if rs_news("LogoUrl")<>"" then %> " target='blank'> " border="0" width="215" height="200"> <% else %> <% end if end if rs_news.close %>
更多>>  
更多>>   
更多>>  
更多>>  
<% 'call ShowProductcc(2,16,8,2) '文字链接 call ShowProductcc(1,10,5,2) '图片链接 %>
更多>>  
<% set rs_news=server.createobject("adodb.recordset") sqltext4="select top 6 * from news where BigClassName='行业动态' order by id desc" rs_news.open sqltext4,conn,1,1 %> <%i=0 do while not rs_news.eof%> <%rs_news.movenext i=i+1 loop rs_news.close %>
更多>>  
<% set rs_news=server.createobject("adodb.recordset") sqltext4="select top 6 * from news where BigClassName='会展信息' order by id desc" rs_news.open sqltext4,conn,1,1 %> <%i=0 do while not rs_news.eof%> <%rs_news.movenext i=i+1 loop rs_news.close %>
更多>>  
<% set rs_news=server.createobject("adodb.recordset") sqltext4="select top 6 * from news where BigClassName='政策法规' order by id desc" rs_news.open sqltext4,conn,1,1 %> <%i=0 do while not rs_news.eof%> <%rs_news.movenext i=i+1 loop rs_news.close %>
更多>>  
<% set rs_news=server.createobject("adodb.recordset") sqltext4="select top 6 * from news where BigClassName='农技推广' order by id desc" rs_news.open sqltext4,conn,1,1 %> <%i=0 do while not rs_news.eof%> <%rs_news.movenext i=i+1 loop rs_news.close %>