Buda benden olsun (Ms Access'de kullanabilirsiniz)
strSQL = "SELECt * FROm tblTabloAdi WHERE fldKategoriID = 1 ORDER BY Rnd(-(1000*fldFieldID)*Time())"