Alıntı
<%
Set veysel = Server.CreateObject("ADODB.Connection")
veysel.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("veritabani.mdb")
set rs = server.createobject("ADODB.Recordset")
sql = "select * from tablo"
rs.open sql,veysel,1,3
Randomize
rastgele = Int((Rnd*Rs.RecordCount)+0)
rs.Move(rastgele)
response.write rs("field")
%>
normalde bu komut veri tabanından rastgele veri çeker. ancak kategori numarasına göre istediğiniz için
Alıntı
kategoriid=request.querystring("kategoiid")
sql = "select * from tablo where kategoriid="&kategoriid&""
şeklinde bir komut kullanmalısınız benimde biraz bazım ağrımakta sedefle aram kötü bugunler de pek rahat bırakmıyor anlatamadı isem üzgünüm ama mantık bu sekildedir
gibi kullanmanız gerekmekte. Sanırım tüm veriyi