MDB'deki veriyi asp dosyaya yazdırmak.
8
●756
- 06-10-2008, 15:52:46
<% set baglanti = server.createobject("ADODB.connection") baglanti.open ="DRIVER={microsoft access driver (*.mdb)}; DBQ=" & server.mappath ("uyeler.mdb") Set yaz = baglanti.execute("Select * from tbl_uyeler order by id desc") %> <table border="0" width="76%" id="table1" cellspacing="0" cellpadding="0" bgcolor="#D8D8D8" height="48"> <tr> <td height="23"><b>No</b></td> <td width="202" height="23"><b>Kullanıcı adı</b></td> <td width="268" height="23"><b>Adı ve Soyadı</b></td> <td width="234" height="23"><b>Şehir</b></td> <td width="152" height="23"><b>Üyelik tarihi</b></td> </tr> <% Do while not yaz.eof %> <tr> <td bgcolor="#FFFFFF"><%yaz("id")%></td> <td width="202" bgcolor="#FFFFFF"><%yaz("kadi")%></td> <td width="268" bgcolor="#FFFFFF"><%yaz("adsoyad")%></td> <td width="234" bgcolor="#FFFFFF"><%yaz("sehir")%></td> <td width="152" bgcolor="#FFFFFF"><%yaz("tarih")%></td> </tr> <% yaz.movenext:loop %> </table> - 06-10-2008, 17:30:41<%
set baglanti = server.createobject("ADODB.connection")
baglanti.open ="DRIVER={microsoft access driver (*.mdb)}; DBQ=" & server.mappath ("uyeler.mdb")
Set yaz = baglanti.execute("Select * from tbl_uyeler order by id desc")
%>
<table border="0" width="76%" id="table1" cellspacing="0" cellpadding="0" bgcolor="#D8D8D8" height="48">
<tr>
<td height="23"><b>No</b></td>
<td width="202" height="23"><b>Kullanıcı adı</b></td>
<td width="268" height="23"><b>Adı ve Soyadı</b></td>
<td width="234" height="23"><b>Şehir</b></td>
<td width="152" height="23"><b>Üyelik tarihi</b></td>
</tr>
<%
Do while not yaz.eof
%>
<tr>
<td bgcolor="#FFFFFF"><%=yaz("id")%></td>
<td width="202" bgcolor="#FFFFFF"><%=yaz("kadi")%></td>
<td width="268" bgcolor="#FFFFFF"><%=yaz("adsoyad")%></td>
<td width="234" bgcolor="#FFFFFF"><%=yaz("sehir")%></td>
<td width="152" bgcolor="#FFFFFF"><%=yaz("tarih")%></td>
</tr>
<%
yaz.movenext:loop
%>
</table>
Pardon = eklemeyi unutmuşum
