<% call ShowUserLogin() %>

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

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

Culture

<% If IsFlash1="Yes" Then %>

<% Else %>

<% end If%>

Home >> Culture >>main

Culture

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

Add Time ：

<%=rs("time")%>

Hit：

<%=rs("counter")%>

<%=rs("Content")%>


	【Print】【Top】【Close】

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