| |
|
| |
 |
| |
|
<%
set rs_fy=server.createobject("adodb.recordset")
sqltext4="select * from SmallClass_New where BigClassName='公司介绍' and isMenu = 0 order by orderby"
rs_fy.open sqltext4,conn,1,1
For j = 1 To rs_fy.RecordCount
If rs_fy.Eof or rs_fy.bof Then Exit For
%>
| |
|
<%
rs_fy.movenext
Next
rs_fy.close
%>
| |
|
| |
|
|
|
|
|
| <%= rsnews("title") %> |
| 双击自动滚屏 |
发布者：<%= rsnews("user") %>
发布时间：<%= rsnews("infotime") %> 阅读：<%= rsnews("hits") %>次 |
<%'=rsnews("content") %>
<%
If Request("page")="" Then
pageNum=0
Else
pageNum=Request("page")
End if
Content=Replace(rsnews("content"),"[NextPage]","｜｜｜")
ContentStr=split(Content,"｜｜｜")
For i=pageNum to pageNum
%>
<%=ContentStr(i)%>
<% Next %>
<%if ubound(ContentStr)>=1 then%>
|
| |
| |
<%
end if
rsnews.close
set rsnews=nothing
%>
|
|
|
|
