Daily News

CUSTOMER LOGIN | REGISTER | CART

| HELP | TOLL FREE 1.877.534.4278

PRODUCT SEARCH

<% SQL = "SELECT * FROM News ORDER BY NewsDate DESC" RS.Open SQL, RMSConn, adOpenStatic, adLockReadOnly, adCmdText %>

<% Do While Not RS.EOF AND howmanyrecs
" Response.Write "" & RS("NewsTitle") & "

" Response.Write Replace(Mid(RS("NewsText"),1,200),Chr(10),"
") & "...

" If RS("NewsURL") <> "" Then Response.Write "" & RS("NewsLinkText") & "
" End If Response.Write "Read Full Article

" Response.Write "

" howmanyrecs=howmanyrecs+1 RS.MoveNext Loop rs.close set rs=nothing Call PageNavBar %>

CUSTOMER LOGIN | REGISTER | CART

| HELP | TOLL FREE 1.877.534.4278

PRODUCT SEARCH

Web Site Developed and Managed by Research Management Strategies LLC