|
<%
Set rsNews = Server.CreateObject("ADODB.Recordset")
rsNews.ActiveConnection = MM_newsConn_STRING
rsNews.Source = "SELECT top 8 * FROM NewsTbl Where InUse<>0 and newsTypeID=2 ORDER BY NewsID DESC"
rsNews.CursorType = 0
rsNews.CursorLocation = 2
rsNews.LockType = 1
rsNews.Open()
rsNews_numRows = 0
While ((NOT rsNews.BOF) AND (NOT rsNews.EOF))
%>
建设中 |
|
<%
rsNews.MoveNext()
Wend
rsNews.Close
%>
|
|
|