Asp ile Veri Tabanındaki Resimleri Listeletmek

Merhaba arkadaşlar asp bilen arkadaşlarım özgün yazılar yazıyorlar asp ile bende onlardan birtanesini alıp sizlere yararlı olacagını düşündüğün için konu olarak açıyorum.

Kodlar:

<%
set baglanti = server.CreateObject("Adodb.connection")
baglanti.open "Provider=Microsoft.Jet.Oledb.4.0; Data Source="& server.MapPath("vt.mdb")

set rsresim=server.CreateObject("Adodb.Recordset")
rsresim.open "Select * from resim",baglanti,1,3

%>
<table width="42" border="0">
  
  <tr>
    <%do until rsresim.eof%><td width="32"><img src="<%=rsresim("resim")%>" width="189" height="188" alt=""></td>
   <%rsresim.moveNext
  Loop %>  
</tr>
  
</table>

Burada yaptıklarımız öncelikle veritabanımıza baglandık ve ardından resim adlı tablomuza bagladık ve daha sonrasını döngüye sokarak resimleri listelettik yardım etmesi dileğiyle.

basit birşey ama bilmeyenlere yardımcı olacaktır