Just incase anyone else would like to know....
strSql = "SELECT " & strMemberTablePrefix & "MEMBERS.MEMBER_ID FROM " & strMemberTablePrefix & "MEMBERS"
set rs = Server.CreateObject("ADODB.Recordset")
rs.cachesize = "1"
rs.open strSql, my_Conn, 3
if not(rs.EOF or rs.BOF) then '## Images found in DB
rs.movefirst
strMembersInDB = cint(rs.RecordCount)
Randomize Timer
RndMemberNumber = Int(Rnd * strMembersInDB)
rs.move cint(RndMemberNumber)
end if
THIS CODE IS NOT FOR SNITZ FORUM'S IT COULD BE USED, BUT IM NOT SURE IF THE TABLE NAMES ARE CORRECT
Brad
Topic Locked
Posted - 19 April 2001 : 16:09:55
