Hvordan laver jeg

Hvordan kalder jeg lettest tre forskellige tabeller i samme db, på den samme side?

<%
set ObjConn = Server.CreateObject (\"ADODB.Connection\")
strConnDriver=\"Driver={Microsoft Access Driver (*.mdb)};\"
strConnPath=\"DBQ=\" & Server.MapPath (\"../db/data.mdb\")
objConn.Open strConnDriver & strConnPath
set RS = Server.CreateObject (\"ADODB.RecordSet\")

strSQL = \"SELECT * FROM tabel1 Where vis=TRUE\"
RS.Open strSQL, objConn, 3, 1
randomize
rs.Move(int(rs.RecordCount * rnd))

Dim Billede
Billede = RS(\"Billede\")
Link=RS(\"Link\")

RS.Close
objConn.Close
set RS = nothing
set objConn = nothing
%>