html>
ÜYELİK
<%
Set baglanti=Server.CreateObject("ADODB.connection" )
baglanti.Open "driver={microsoft access driver (*.mdb)}; DBQ=" &Server.MapPath("www.denizciler53.tr.gg" )
SQL="select * from Uyelik"
Set kayitseti = baglanti.Execute(SQL)
Do While not kayitseti.Eof
%>
<% kayitseti.Movenext %> ' Bu kodu nereye koyarsaniz orada kayit listeleme biter ve diger kayda gelir...
<% Loop %>
<%kayitseti.Close %>
<%baglanti.Close %>
Telif Hakkı © 2001 [by SaLvAdOR]. Tüm hakları saklıdır.
Son düzeltme tarihi: 11.06.2008
.
|