<% Set rslist = Server.CreateObject("ADODB.Recordset") sql="select Title from Aboutus order by Aboutusorder" rslist.open sql,conn,1,3 do while not rslist.eof %> <%rslist.movenext loop%>

"><%=rslist("Title")%>

企业文化

<% call ShowFriendLinks(2,6,6,3) %>

企业文化

<% if not isEmpty(request.QueryString("id")) then id=request.QueryString("id") else id=1 end if Set rs = Server.CreateObject("ADODB.Recordset") rs.Open "Select * From culture where id="&id, conn,1,3 '纪录访问次数 rs("counter")=rs("counter")+1 rs.update %>

首页 >> 企业文化 >> 正文

<%=rs("title")%>

<%=rs("content")%>

添加时间：

<%=rs("time")%>

点击数：

<%=rs("counter")%>


	【打印此页】【顶部】【关闭】

<%rs.close set rs=nothing rslist.close set rslist=nothing %>