<% Const IMGS_DIR = "/Slideshow/" Dim objFSO, objFolderObject, objFileCollection, objFile Dim intFileNumberToUse, intFileLooper Dim objImageFileToUse Dim strImageSrcText Set objFSO = Server.CreateObject("Scripting.FileSystemObject") Set objFolderObject = objFSO.GetFolder(Server.MapPath(IMGS_DIR)) Set objFSO = Nothing Set objFileCollection = objFolderObject.Files Set objFolderObject = Nothing Randomize() intFileNumberToUse = Int(objFileCollection.Count * Rnd) + 1 intFileLooper = 1 For Each objFile in objFileCollection If intFileLooper = intFileNumberToUse Then Set objImageFileToUse = objFile Exit For End If intFileLooper = intFileLooper + 1 Next Set objFileCollection = Nothing strImageSrcText = IMGS_DIR & objImageFileToUse.Name Set objImageFileToUse = Nothing %> Welcome to VBC!
 
click on "View Larger Map" below for more map features

View Larger Map 
Map and Directions to VBC

Driving Instructions

From I 40- Follow Hwy 171 north. Turn left on W. Division St. Follow W. Division St. 1.4 miles. Turn right on Tate Lane. Church is on the right after crossing railroad.

From Hwy 70- Turn on Hwy 70 south. Turn right on W. Division St. Follow W. Division St. 1.4 miles. Turn right on Tate Lane. Church is on the right after crossing railroad.