 |
<%=WebMenu()%> |
| |
|
 <%=WebLocation()%> |
|
| |
<%
dim rs,sql
set rs = server.createobject("adodb.recordset")
if request.QueryString("ID")="" or not IsNumeric(request.QueryString("ID")) then
sql="select top 1 * from Qianbo_About where ViewFlagCh and not ChildFlag order by Sequence asc"
else
sql="select * from Qianbo_About where ViewFlagCh and ID="&request.QueryString("ID")
end if
rs.open sql,conn,1,3
if rs.eof Then
%>
| <%= Languagech7 %> |
<%
Else
if ViewNoRight(rs("GroupID"),rs("Exclusive")) then
%>
|
| <%= Languagech54 %>：<%=FormatDate(rs("UpdateTime"),13)%> <%= Languagech18 %>： |
| |
| <%=rs("ContentCh")%> |
<%
else
%>
 |
<%
end if
rs.update
end if
rs.close
set rs=nothing
%>
| |
|
