<% id=rp(Request("id")) if not isnumeric(id) then goerror(2) End if Dim objrs,strsql strsql="select * from tech where id=" & id set objrs=server.createobject("ADODB.Recordset") objrs.open strsql,objconn,1,2,1 if objrs.Recordcount<1 then goerror(1) End if objrs("hits")=objrs("hits")+1 objrs.update %> <%=objrs("topic") %>--洗车器疑难解答,对自助洗车器、便携式洗车器、车载洗车器、多功能清洗器各类疑问的解答
疑难解答
<%=objrs("topic") %>
发布时间:<%=objrs("addtime") %>浏览次数:<%=objrs("hits") %>
<%=objrs("content") %>
[关闭窗口]