<%@LANGUAGE="VBSCRIPT"%> <% set Conn = Server.Createobject("ADODB.Connection") Conn.open MM_Amerace_STRING sql = "SELECT * From NewsData ORDER BY Date Desc" set Recordset1 = Server.CreateObject("ADODB.Recordset") Recordset1.open sql, Conn, 1, 3 'set Recordset1 = Server.CreateObject("ADODB.Recordset") 'Recordset1.ActiveConnection = MM_Amerace_STRING 'Recordset1.Source = "SELECT * FROM NewsData ORDER BY Date DESC" 'Recordset1.CursorType = 0 'Recordset1.CursorLocation = 2 'Recordset1.LockType = 3 'Recordset1.Open() 'Recordset1_numRows = 0 %> Amerace - News
News...

News and Announcements

<% do while not Recordset1.EOF %> <% Recordset1.MoveNext() Loop %>
Date Title
<%=(Recordset1.Fields.Item("Date").Value)%> "><%=(Recordset1.Fields.Item("Title").Value)%>

 

Proven in a Battery of TestsTM
©Amerace, Microporous Products, L.P., All Rights Reserved
<% Recordset1.Close() %>