Website Background Music Provided By "The Arbuckles" - Double Banjo Blues 

<% openStr = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\db\stwgb.mdb") & ";PWD=STW_BLG" Set cn = Server.CreateObject("ADODB.Connection") cn.Open openStr, UserID, Password SQL = "SELECT * FROM guestbook ORDER BY todaysdate DESC" Set record = Server.CreateObject("ADODB.Recordset") record.Open sql, cn record.MoveFirst Do While Not record.EOF Response.Write"Date: " & record("todaysDate").Value & "
" Response.Write"Name: " & trim(record("fullname").Value) & "     " & trim(record("city").Value) & ", " & trim(record("state").Value) & "
" urlValue=record("url").Value Response.Write"URL: " & record("url").Value & "
" Response.Write"Message: " & _ record("message").Value & "
" Response.Write"

---

" record.MoveNext Loop record.Close Set record = Nothing cn.Close Set cn = Nothing %>