% Const IMGS_DIR = "/images/random/" 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 %>
![]() |
|||||||
|
All in This Together If you have children between the ages of 3 and 23, you probably know the words to all the songs from High School Musical. With catchy tunes and accompanying dance steps, these songs are everpresent and universally loved by boys and girls alike. When I read over the articles in this issue of Connect, I’m reminded of the High School Musical finale, We’re All in This Together:
Hand in hand, hundreds of church members are reaching their community through acts of service. Hand in hand, congregations and global field personnel are sharing the Good News of Christ with the most neglected peoples of the world. Hand in hand, Missourians and Kenyans are partnering to make an eternal impact in the lives of young children in the village of Ngerenya. Thank you for joining hands with CBF of Missouri to be the presence of Christ right where you are and around the world.
|
Giving to CBF of
Missouri:
|
|