<% call ShowUserLogin() %>

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

公司简介
"><%=rslist("Title")%>

公司文化

<% If IsFlash1="Yes" Then %>

<% Else %>

<% end If%>

首页 >> 公司文化 >> 正文

公司文化

<% 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("time")%>

点击数：

<%=rs("counter")%>

<%=rs("content")%>


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

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