|
<%set rs=server.createobject("adodb.recordset")
sql="select top 4 * from wq_allnews where wq_key=1 and wq_key1=1 and wq_key2=1 and wq_newssort=23 order by wq_id desc"
rs.open sql,conn,1,1
do while not rs.eof
set rs1=server.createobject("adodb.recordset")
sql1="select * from wq_allnewssort where wq_id='23' "
rs1.open sql1,conn,1,1
newssort=rs1("wq_newssort")
rs1.close
title=trim(rs("wq_title"))
if cityHTML=1 then
webget="Html/allnews/"&year(rs("wq_date"))&month(rs("wq_date"))&"/"&replace(replace(replace(rs("wq_date"),"-",""),":","")," ","")&".html"
else
webget="allnew_view.php?id="&rs("wq_id")&""
end if
%>
· target="_blank" class=f14><%=Left(title,20)%>
<%rs.movenext
loop
rs.close%>
|
<%set rs=server.createobject("adodb.recordset")
sql="select top 3 * from wq_allnews where wq_key=1 and wq_key1=1 and wq_key2=1 and wq_newssort=33 order by wq_id desc"
rs.open sql,conn,1,1
do while not rs.eof
set rs1=server.createobject("adodb.recordset")
sql1="select * from wq_allnewssort where wq_id='33' "
rs1.open sql1,conn,1,1
newssort=rs1("wq_newssort")
rs1.close
title=trim(rs("wq_title"))
if cityHTML=1 then
webget="Html/allnews/"&year(rs("wq_date"))&month(rs("wq_date"))&"/"&replace(replace(replace(rs("wq_date"),"-",""),":","")," ","")&".html"
else
webget="allnew_view.php?id="&rs("wq_id")&""
end if
%>
· target="_blank" class=f14><%=Left(title,20)%>
<%rs.movenext
loop
rs.close%>
|
<%set rs=server.createobject("adodb.recordset")
sql="select top 3 * from wq_allnews where wq_key=1 and wq_key1=1 and wq_key2=1 and wq_newssort=26 order by wq_id desc"
rs.open sql,conn,1,1
do while not rs.eof
set rs1=server.createobject("adodb.recordset")
sql1="select * from wq_allnewssort where wq_id='26' "
rs1.open sql1,conn,1,1
newssort=rs1("wq_newssort")
rs1.close
title=trim(rs("wq_title"))
if cityHTML=1 then
webget="Html/allnews/"&year(rs("wq_date"))&month(rs("wq_date"))&"/"&replace(replace(replace(rs("wq_date"),"-",""),":","")," ","")&".html"
else
webget="allnew_view.php?id="&rs("wq_id")&""
end if
%>
· target="_blank" class=f14><%=Left(title,20)%>
<%rs.movenext
loop
rs.close%>
|
<%set rs=server.createobject("adodb.recordset")
sql="select top 3 * from wq_allnews where wq_key=1 and wq_key1=1 and wq_key2=1 and wq_newssort=35 order by wq_id desc"
rs.open sql,conn,1,1
do while not rs.eof
set rs1=server.createobject("adodb.recordset")
sql1="select * from wq_allnewssort where wq_id='35' "
rs1.open sql1,conn,1,1
newssort=rs1("wq_newssort")
rs1.close
title=trim(rs("wq_title"))
if cityHTML=1 then
webget="Html/allnews/"&year(rs("wq_date"))&month(rs("wq_date"))&"/"&replace(replace(replace(rs("wq_date"),"-",""),":","")," ","")&".html"
else
webget="allnew_view.php?id="&rs("wq_id")&""
end if
%>
· target="_blank" class=f14><%=Left(title,20)%>
<%rs.movenext
loop
rs.close%>
|
<%set rs=server.createobject("adodb.recordset")
sql="select top 3 * from wq_allnews where wq_key=1 and wq_key1=1 and wq_key2=1 and wq_newssort=32 order by wq_id desc"
rs.open sql,conn,1,1
do while not rs.eof
set rs1=server.createobject("adodb.recordset")
sql1="select * from wq_allnewssort where wq_id='32' "
rs1.open sql1,conn,1,1
newssort=rs1("wq_newssort")
rs1.close
title=trim(rs("wq_title"))
if cityHTML=1 then
webget="Html/allnews/"&year(rs("wq_date"))&month(rs("wq_date"))&"/"&replace(replace(replace(rs("wq_date"),"-",""),":","")," ","")&".html"
else
webget="allnew_view.php?id="&rs("wq_id")&""
end if
%>
· target="_blank" class=f14><%=Left(title,20)%>
<%rs.movenext
loop
rs.close%>
|
| 成功案例 >>更多... |
|
<%set rs=server.createobject("adodb.recordset")
sql="select top 8 * from wq_news where wq_key=1 and wq_key1=1 and wq_key2=1 and wq_key3=1 and wq_newssort=5 order by wq_id desc"
rs.open sql,conn,1,1
do while not rs.eof
title=trim(rs("wq_title"))
if cityHTML=1 then
webget="Html/news/"&year(rs("wq_date"))&month(rs("wq_date"))&"/"&replace(replace(replace(rs("wq_date"),"-",""),":","")," ","")&".html"
else
webget="ypnew_view.php?id="&rs("wq_id")&""
end if
%>
· target="_blank" class=f14><%=Left(title,10)%>
<%rs.movenext
loop
rs.close%> |
|
<%set rs=server.createobject("adodb.recordset")
sql="select top 12 * from wq_allnews where wq_key=1 and wq_key1=1 and wq_key2=1 and wq_newssort=35 order by wq_id desc"
rs.open sql,conn,1,1
do while not rs.eof
set rs1=server.createobject("adodb.recordset")
sql1="select * from wq_allnewssort where wq_id='35'"
rs1.open sql1,conn,1,1
newssort=rs1("wq_newssort")
rs1.close
title=trim(rs("wq_title"))
if cityHTML=1 then
webget="Html/allnews/"&year(rs("wq_date"))&month(rs("wq_date"))&"/"&replace(replace(replace(rs("wq_date"),"-",""),":","")," ","")&".html"
else
webget="allnew_view.php?id="&rs("wq_id")&""
end if
%>
· target="_blank" class=f14><%=Left(title,14)%>
<%rs.movenext
loop
rs.close%>
|
<%set rs=server.createobject("adodb.recordset")
sql="select top 24 * from wq_xxnews where wq_key=1 and wq_key1=1 and wq_key2=1 and wq_key3=1 order by wq_id desc"
rs.open sql,conn,1,1
n=0
do while not rs.EOF
n=n+1
set rs1=server.createobject("adodb.recordset")
sql1="select * from wq_xxnewssort where wq_id="&rs("wq_newssort")
rs1.open sql1,conn,1,1
newssort=rs1("wq_newssort")
rs1.close
title=trim(rs("wq_title"))
if cityHTML=1 then
webget="Html/xxnews/"&year(rs("wq_date"))&month(rs("wq_date"))&"/"&replace(replace(replace(rs("wq_date"),"-",""),":","")," ","")&".html"
else
webget="new_view.php?id="&rs("wq_id")&""
end if
%>
| · <%=newssort%>| target="_blank" class=f14><%=Left(title,12)%>
|
<%if n mod 2=0 then response.write" "
rs.movenext
loop
rs.close%>
<%set rs=server.createobject("adodb.recordset")
sql="select top 16 * from wq_yp where wq_key=3 and wq_key1=1 and wq_vip=2 order by wq_tjdate desc"
rs.open sql,conn,1,1
do while not rs.eof
goname=rs("wq_user")
goid=rs("wq_id")
coname=trim(rs("wq_coname"))%>
★ target=_blank><%=Left(coname,19)%>
<%rs.movenext
loop
rs.close%> |
|
<%set rs=server.createobject("adodb.recordset")
sql="select top 12 * from wq_news where wq_key=1 and wq_key1=1 and wq_key2=1 and wq_newssort=3 order by wq_id desc"
rs.open sql,conn,1,1
do while not rs.eof
set rs1=server.createobject("adodb.recordset")
sql1="select * from wq_newssort where wq_id='3'"
rs1.open sql1,conn,1,1
newssort=rs1("wq_newssort")
rs1.close
title=trim(rs("wq_title"))
if cityHTML=1 then
webget="Html/allnews/"&year(rs("wq_date"))&month(rs("wq_date"))&"/"&replace(replace(replace(rs("wq_date"),"-",""),":","")," ","")&".html"
else
webget="allnew_view.php?id="&rs("wq_id")&""
end if
%>
· target="_blank" class=f14><%=Left(title,14)%>
<%rs.movenext
loop
rs.close%>
|
<%set rs=server.createobject("adodb.recordset")
sql="select top 28 * from n828_flxx where wq_key=1 and wq_key1=1 and wq_key2=1 order by wq_id desc"
rs.open sql,conn,1,1
n=0
do while not rs.EOF
n=n+1
set rs1=server.createobject("adodb.recordset")
sql1="select * from wq_flxxsort where wq_id="&rs("wq_flxxsort")
rs1.open sql1,conn,1,1
newssort=rs1("wq_flxx")
rs1.close
title=trim(rs("wq_title"))
if cityHTML=1 then
webget="Html/xxnews/"&year(rs("wq_date"))&month(rs("wq_date"))&"/"&replace(replace(replace(rs("wq_date"),"-",""),":","")," ","")&".html"
else
webget="http://flxx.n828.com/flxx_view.asp?id="&rs("wq_id")&""
end if
%>
| · <%=newssort%>| target="_blank" class=f14><%=Left(title,10)%>
|
<%if n mod 2=0 then response.write" "
rs.movenext
loop
rs.close%>
| 推荐展会 更多... |
|
<%set rs=server.createobject("adodb.recordset")
sql="select top 12 * from wq_exhibit where wq_key<>0 and wq_key2=1 order by wq_tjdate desc"
rs.open sql,conn,1,1
do while not rs.eof
z_name=trim(rs("wq_z_name"))
%>
· target="_blank" class="f14"><%=Left(z_name,11)%>
<%rs.movenext
loop
rs.close%> |
|
<%set rs=server.createobject("adodb.recordset")
sql="select top 12 * from wq_allnews where wq_key=1 and wq_key1=1 and wq_key2=1 and wq_newssort=33 order by wq_id desc"
rs.open sql,conn,1,1
do while not rs.eof
set rs1=server.createobject("adodb.recordset")
sql1="select * from wq_allnewssort where wq_id='33'"
rs1.open sql1,conn,1,1
newssort=rs1("wq_newssort")
rs1.close
title=trim(rs("wq_title"))
if cityHTML=1 then
webget="Html/allnews/"&year(rs("wq_date"))&month(rs("wq_date"))&"/"&replace(replace(replace(rs("wq_date"),"-",""),":","")," ","")&".html"
else
webget="allnew_view.php?id="&rs("wq_id")&""
end if
%>
· target="_blank" class=f14><%=Left(title,13)%>
<%rs.movenext
loop
rs.close%>
|
<%set rs=server.createobject("adodb.recordset")
sql="select top 28 * from wq_qspf where wq_key=1 and wq_key1=1 and wq_key2=1 order by wq_id desc"
rs.open sql,conn,1,1
n=0
do while not rs.EOF
n=n+1
set rs1=server.createobject("adodb.recordset")
sql1="select * from wq_qspfsort where wq_id="&rs("wq_newssort")
rs1.open sql1,conn,1,1
newssort=rs1("wq_newssort")
rs1.close
title=trim(rs("wq_title"))
if cityHTML=1 then
webget="Html/xxnews/"&year(rs("wq_date"))&month(rs("wq_date"))&"/"&replace(replace(replace(rs("wq_date"),"-",""),":","")," ","")&".html"
else
webget="jspf_view.php?id="&rs("wq_id")&""
end if
%>
| · <%=newssort%>| target="_blank" class=f14><%=Left(title,10)%>
|
<%if n mod 2=0 then response.write" "
rs.movenext
loop
rs.close%>
| 新进企业 更多... |
|
|
| 产品推荐 |
更多>> |
|
<%Call wq_Cp_View(18,18,9,8,1,0,1,80,80,0,0,0,0,0,0,1,0,0,0,"index.php")%> |
|
|
|
|
<%if webkey8=0 then%>
城市分站导航
<%set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from fz_links where wq_key=0 and wq_key1=1 order by wq_id asc"
rs.open sql,conn,1,1
if not rs.eof then
n=0
do while not rs.eof
n=n+1%>
title=<%=rs("wq_linksm")%> target="_blank"><%=rs("wq_linkname")%> |
<%if n mod 16=0 then response.write " "
rs.movenext
loop
end if
rs.close
set rs=nothing%>
<%set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from fz_links where wq_key=1 and wq_key1=1 order by wq_id asc"
rs.open sql,conn,1,1
if not rs.eof then
n=0
do while not rs.eof
n=n+1%>
title=<%=rs("wq_linksm")%> target="_blank"> " width=88 height=31 border=0> |
<%if n mod 7=0 then response.write " "
rs.movenext
loop
end if
rs.close
set rs=nothing%>
<%end if%>
<%if webkey8=0 then%>
友情合作站点
<%set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from wq_links where wq_key=0 and wq_key1=1 order by wq_id asc"
rs.open sql,conn,1,1
if not rs.eof then
n=0
do while not rs.eof
n=n+1%>
title=<%=rs("wq_linksm")%> target="_blank"><%=rs("wq_linkname")%> |
<%if n mod 16=0 then response.write " "
rs.movenext
loop
end if
rs.close
set rs=nothing%>
<%set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from wq_links where wq_key=1 and wq_key1=1 order by wq_id asc"
rs.open sql,conn,1,1
if not rs.eof then
n=0
do while not rs.eof
n=n+1%>
title=<%=rs("wq_linksm")%> target="_blank"> " width=88 height=31 border=0> |
<%if n mod 7=0 then response.write " "
rs.movenext
loop
end if
rs.close
set rs=nothing%>
<%end if%>
|