<% dim id,rs,exec id = Server.Htmlencode(request.querystring("id")) if id = "" or not isnumeric(id) then set rs=server.createobject("adodb.recordset") exec="select * from news order by hits asc,id desc" rs.open exec,conn,1,1 titlefl = "新闻中心" else set rs2=server.createobject("adodb.recordset") exec2="select * from news_fl where id="&id&" order by id desc " rs2.open exec2,conn,1,1 titlefl = rs2("title") set rs=server.createobject("adodb.recordset") exec="select * from [news] where ssfl="&id&" order by hits asc,id desc" rs.open exec,conn,1,1 end if %> <%=titlefl%>-<%=config("title")%> " /> " />
<%=eqq%> <%=config("share")%>