|
The
Attractions Band
Memory Lane | <
| We dedicate our song list to the great artist that gave us
these wonderful songs
|
| SONGS THAT ARE PART OF OUR LIVES:
|
<%
dim connect, DSNtemp, sQuery, rs, songArray
set connect = server.createobject("adodb.connection")
set rs = Server.CreateObject("ADODB.Recordset")
connect.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0"
path = Server.MapPath("/fpdb/songlist.mdb")
response.write path
connect.open path
sQuery = "select song_title FROM songs ORDER BY song_title"
rs.open squery, connect
songArray = rs.getRows
rs.close
set rs = nothing
%>
<% For counter = 0 to ubound(songarray,2)
response.write "| " & songarray(0,counter) & " | "
next
%>
Printable Version |
