Çok çeşitli ürün ağımızdan yararlanmak avantajlı fiyatlarla dilediğiniz ürünü online sipariş etmek için üyelik gerekmektedir...
Bugün 1 ziyaretçi (3 klik) kişi burdaydı!
Sayfa hakkında
Burda sayfan hakkındaki bilgileri yazabilirsin, başka sayfalarını yazabilirsin ya da benzeri işler ;-)
ürünler
Srcn
Talking Cevap: Üye ol......
Form Gönderme
<%
Set baglanti=Server.CreateObject(" ADODB.connection" )
baglanti.Open "driver={microsoft access driver (*.mdb)}; DBQ=" &Server.MapPath("veritabani_yo lu" )
SQL="select * from tablo_ismi"
Set kayitseti = baglanti.Execute(SQL)
Do While not kayitseti.Eof
%>
Alinacak Bilgiler
<% kayitseti.Movenext %> ' Bu kodu nereye koyarsaniz orada kayit listeleme biter ve diger kayda gelir...
<% Loop %>
<%kayitseti.Close %>
<%baglanti.Close %>
