<%
'============ Begining of ASP code ===========================================================
%>
<%
Set RsGuestList = Server.CreateObject ("ADODB.Recordset")
RsGuestList.ActiveConnection = OBJdbConnection
RsGuestList.CursorType = 1
RsGuestList.LockType = 1
'============ View client headers from database ===========================================
RsGuestList.Open "select * from news order by NewsDate desc"
if not RsGuestList.EOF then
%>
No news available at this time, please check again at a later time.
<%
end if
RsGuestList.close
set OBJdbConnection = Nothing
Set StrConn=Nothing
'============ End of ASP code ===========================================================
%>
