Rastgele Listeleme ?

Arkadaşlar aspden pek anlamıyorum ama aspde ratgele listelemeye ihtiyacım var.

Olay şu. bir haber sitesini düşünelim.Haberler eklenme tarihine göre sıralanmış.Fakat ben sayfa her yenilendiğinde bu sıranın değişmesini istiyorum.Bi sitede bunun örneğini gördüm. İşte bu sitede

Bu konuda bana yardımcı olabilirseniz sevinirim.yardımlarınız için şimideden tşk ederim.

msn: [email protected]

böle bişeymi?
<%
Set Kon = Server.CreateObject("ADODB.Connection" )
Kon.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("veritabany yolu" ))
Set Rs = Server.CreateObject("ADODB.Recordset" )
SQL = "SELECT * FROM TblYeni"
Rs.Open SQL,kon,1,3
Randomize
kac = Int((rs.RecordCount * Rnd)+ 0)
Rs.Move(kac)
Soz=Rs("Soz" )
Resim=Rs("Resim" )
AltYazi=Rs("AltYazi" )
Rs.Close
Kon.Close
Set Rs=Nothing
Set Kon=Nothing
%>

valla ben pek anlamıyorum.. ama bana yapabilecek arkadaşa hosting konusunda yardımcı olabilirim