%@ Language=VBScript %>
<%
Response.Expires=0
set connection=server.CreateObject("ADODB.Connection")
Connection.Open "Ndc_db"
sqlstmt="select * from news ORDER BY date_value"
set rsNews=connection.Execute(sqlstmt)
tablestring=""
'tablestring=tablestring & "
| " & "7/12/2001" & " | Prospects Newsletter(Adobe Acrobat .PDF) |
"
do while not rsNews.eof
tablestring=tablestring & "| " & rsNews("date_value") & " | " & replace(rsNews("heading"),"^","'") & " | |
"
tablestring=tablestring & "
"
rsNews.movenext
loop
rsNews.close
set rsnews=nothing
connection.Close
set connection=nothing
%>
St. Lucia National Development Corporation
 |
 |
|
Date
|
Heading(Acrobat
Format)
|
<%=tablestring%>
|
|
To save any of the Files,
Right Click on it and choose "Save Target As" when using Internet
Explorer. Netscape users, Right Click and choose the "Save Link As".
Then select a location on your PC.
|