Katgorili Listeleme
-
selam hocm ben şimdi sitemdeki bilgiler katagori şeklinde ben bu bilgileri ana syfad da katgori şeklinde listelemek istiyorum ana en son eklediğim en başta olacak ürünlerde de o şekilde en son eklediğin ürün 1 sırd olacak. acaba böyle bir şey ypmama yardımcı olabilirmisiniz. teşekürler.
katagori en son eklediğim 1 2 3 4 5 6 katagori sornr eklediği 1 2 3 4 5 6 katagori ilk eklediği 1 2 3 4 5 6 -
<%set kategori=server.createobject("adodb.recordset")
kategori.open "kategori",db,1,3
if kategori.eof then
else
while not kategori.eof
response.write "<table width=46% border=1><T><tr><td>'kategori('isim')'</td></tr><tr><td><table width=100% border=1><T><tr><td>1</td><td>2</td></tr><tr><td>3</td><td>4</td></tr><tr><td>5</td><td>6</td></tr></T></table></td></tr></table>"%>bole bişi yaptım ama tablodaki katogori ismini bile giremiyorum. isim yerine katagori('isim') çıkıyor.
-
katagori ismini helletim şimdi sırada 1 2 3 4 lerid oldurmaya geldi sıra. onuda yardım edebilecek biir olru insllah
<font color="#000000"
size="1" face="Verdana"><strong><%response.write " "%>
KATEGORİLER</strong></font>
<%set kategori=server.createobject("adodb.recordset")
kategori.open "kategori",db,1,3
if kategori.eof then
else
while not kategori.eof
response.write "<table width=46% border=1><T><tr><td>"&kategori("isim")&"</td></tr><tr><td><table width=100% border=1><T><tr><td>1</td><td>2</td></tr><tr><td>3</td><td>4</td></tr><tr><td>5</td><td>6</td></tr></T></table></td></tr></table>"%> -
katagori ismini helletim şimdi sırada 1 2 3 4 5 6 lerid oldurmaya geldi sıra. onuda yardım edebilecek biir olru insllah
<font color="#000000"
size="1" face="Verdana"><strong><%response.write " "%>
KATEGORİLER</strong></font>
<%set kategori=server.createobject("adodb.recordset")
kategori.open "kategori",db,1,3
if kategori.eof then
else
while not kategori.eof
response.write "<table width=46% border=1><T><tr><td>"&kategori("isim")&"</td></tr><tr><td><table width=100% border=1><T><tr><td>1</td><td>2</td></tr><tr><td>3</td><td>4</td></tr><tr><td>5</td><td>6</td></tr></T></table></td></tr></table>"%> -
sana şöyle bi örnek vereyim sen kendine göre uyarlarsın
önce vt adında bi db olustur
1. tablo adı "kategori"
" id " otomatik sayı
" kategori adı " not
2. tablo adı "altkategori"
" id " otomatik sayı
" altkategori adı " not
" katid " sayı
--------------
gelelim kod kısmına
<%
set baglanti = server.createobject("adodb.connection")
baglanti.open "provider=microsoft.jet.oledb.4.0;data source=" & server.mappath("vt.mdb")
dim Kategori
set kategori = server.createobject("adodb.recordset")
sql = "select * from kategori order by id desc"
kategori.open sql,baglanti,1,3
do while not kategori.eof
set altkat = server.createobject("adodb.recordset")
sqlalt = "select * from altkategori where katid="&kategori("id")&" order by id desc"
altkat.open sqlalt,baglanti,1,3
Response.write "üst kategoriler : "&kategori("kategoriadi")&" <br>"
do while not altkat.eof
Response.write "-----alt kategorileri : "&altkat("altkategoriadi")&" <br>"
altkat.movenext
loop
altkat.close
set altkat=nothing
kategori.movenext
loop
kategori.close
set kategori=nothing
%>
