%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Dim rs_news
Dim rs_news_numRows
Set rs_news = Server.CreateObject("ADODB.Recordset")
rs_news.ActiveConnection = MM_mp_STRING
rs_news.Source = "SELECT * FROM tbl_nws ORDER BY nws_id DESC"
rs_news.CursorType = 0
rs_news.CursorLocation = 2
rs_news.LockType = 1
rs_news.Open()
rs_news_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index
Repeat1__numRows = 10
Repeat1__index = 0
rs_news_numRows = rs_news_numRows + Repeat1__numRows
%>
moving pictures productions
<%
rs_news.Close()
Set rs_news = Nothing
%>