eyvallah mkoroglu çok yardımın dokundu valla. hallettim sayende.
<% Set rs = Baglanti.Execute("select * from Haberler where onay=1 order by id desc") %>
<%rs.Move 0
For i = 1 To 9
hid=rs("id")
hbaslik=rs("baslik")
hspot=rs("spot")
hresim=rs("resim")
%>
.....kodlar.....
<% rs.MoveNext
Next %>
Rica ederim.
Yalnız, bir an önce MySql ya da MsSql veritabanı sistemlerine geçmenizi öneririm. Performans ve kolaylığı kısa zamanda fark edeceksinizdir.