<%=myname%>

<% '会议名称 ZT_NAME="2008_1" %> <% '专题名称 myname=HTMLS(getinfo("news","and fid='9921' and mytitle='"&ZT_NAME&"_专题名称'","mytxt","无"),100) '媒体支持 'mtzc=getinfo("news","and fid='9921' and mytitle='媒体支持'","mytxt","无") '主办单位 'zbdw=getinfo("news","and fid='9921' and mytitle='主办单位'","mytxt","无") '会议精华报道 hybd=getinfo("news","and fid='9921' and mytitle='"&ZT_NAME&"_会议精华报道'","mytxt","无") '当前栏目 classid=request.QueryString("classid") action=request.QueryString("action") if not isnumeric(classid) or classid="" then classid=12837 sql="select mytitle,mytxt from news where fid='9921' and id="&classid&"" set rs=conn.execute(sql) if rs.eof then mytitle="" mytxt="错误参数" else mytitle=rs(0) mytxt=rs(1) end if '去掉特别的名字 function replace_gjz(str) if str<>"" then replace_gjz=replace(str,ZT_NAME&"_","") End if ENd function %> <%=myname%>

首页

<% sql="select mytitle,id from news where fid='9921' and gjz='专题导航显示' and mytitle like '"&ZT_NAME&"_%' order by mytime desc,id asc" set rs=conn.execute(sql) do while not rs.eof response.Write("") rs.movenext loop rs.close conn.close set rs=nothing set conn=nothing %>

"&replace_gjz(rs(0))&"

精彩图片回顾