{justsoRegion}

First Baptist Church Library

UPDATE (3/18/02): Not only do we have our library catalog online, but we have also recently installed a computer in the library itself for catalog browsing, and eventually, book circulation!

We currently have about 80 percent of our church's library card catalog available for browsing online. By clicking the "login" button below, you will be brought to an offsite catalog.

We are in the process of converting over the remaining books and audio/visual materials, so this catalog will be constantly changing. We will also be shortly placing a computer in the church library for catalog access and book checkout/checkin.

If anyone is interested in making their books available for loan, without the need for donating them to the library, please contact us. Your books can be made part of the catalog while keeping them in your home. Of course, the library is always looking for book donations as well.

 

Quotable

<% Dim objFSO, objTS Set objFSO = Server.CreateObject("Scripting.FileSystemObject") text_file = server.mappath("quotes_new.htm") Set objTS = objFSO.OpenTextFile(text_file) 'Now, read the contents of the file into a string Dim s s = objTS.ReadAll 'Now, use split to load the contents of the file into an array Dim aFile aFiles = split(s, vbCrLf) Randomize Timer 'How many random elements from the array do we want? Const n = 10 'For i = 1 to n value = aFiles(Int(Rnd * UBound(aFiles))) response.write value 'Now do something with value 'Next Set objFSO = Nothing %>

The Good News

"Make every effort to keep the unity of the Spirit through
the bond of peace." (Ephesians 4:3)