<% myself=request.servervariables("path_info") SeekValue=trim(request("SeekValue")) ParentClassName=trim(request("ParentClassName")) '取栏目对应的ClassID值 sqlClass="select ClassID,Child From ArticleClass where trim(ClassName)='"&ParentClassName&"'" set rsClass=server.CreateObject("adodb.recordset") rsClass.open sqlClass,conn,1,1 if not rsClass.bof and not rsClass.eof then rsClass.movefirst ParentClassID=rsClass("ClassID") Child=rsClass("Child") end if rsClass.close set rsClass=nothing const ChannelID=1 Const ShowRunTime="Yes" select case ParentClassName case "Organization" MaxPerPage=20 case "Payment" MaxPerPage=20 case else MaxPerPage=10 End Select %> 中国城镇网
 
 
 
 
政策·资金
 
 
华夏名镇
 
 
招商引资
 
 
乡村旅游
民俗文化
扶贫互助
乡镇特产市场
中国地方节庆
民生·民声
 
    入网城镇