[akgun]

arkadaşlar MSSQL tabanlı çalışan sınırsız kategorileme olan bir sistemım var

normalde menuyu veritabanından okuyarak


[PHP]
<%
'**********************
function veri(xxx)
end function

Sub AddProducts(kategori, iLevel)
Dim prs
Set prs = CreateObject("ADODB.Recordset")
sSQLText = "SELECT id, isim FROM urun WHERE kategori = " & kategori & " ORDER BY id"
prs.open sSQLText,Conn,1,3
if prs.recordcount > 0 then
tf.write vbcrlf & String(iLevel, Chr(09)) & "<ul>"& vbcrlf
While ( NOT prs.EOF )
tf.Write String(iLevel, Chr(09)) & "<li><a href ='sayfama.ASP?sayfaaa=9&product="& prs("id") & "'>" & veri(prs("isim")) & "</a></li>"& vbcrlf
prs.MoveNext
Wend
tf.write String(iLevel, Chr(09)) & "</ul>"& vbcrlf
end if
prs.close
Set prs = Nothing
End Sub

Sub RecurseCategories(sIDParentCat, iLevel)
Dim rs
Set rs = CreateObject("ADODB.Recordset")
sSQLText = "SELECT * FROM kategori WHERE kat_kod = " & sIDParentCat & " ORDER BY id"
rs.open sSQLText,Conn,1,3
if rs.recordcount > 0 then
tf.write String(iLevel, Chr(09)) & "<ul>"& vbcrlf
end if
While ( NOT rs.EOF )
tf.Write String(iLevel, Chr(09)) & "<li><a href ='sayfama.ASP?sayfaaa=8&kategori="& rs("id") & "'>" & veri(rs("isim")) & "</a>"
iLevel = iLevel + 1
Call RecurseCategories(rs("id"), iLevel)
Call AddProducts(rs("id"), iLevel+1)
iLevel = iLevel - 1
tf.write "</li>"& vbcrlf
rs.MoveNext
Wend
if rs.recordcount > 0 then
tf.write String(iLevel, Chr(09)) & "</ul>"& vbcrlf
end if
rs.close
Set rs = Nothing
End Sub

Response.Write "Temp dosya olu&thorn;turuluyor !<br>"
dim fs,tf
set fs = server.CreateObject("Scripting.FileSystemObject")
set tf = fs.CreateTextFile(server.Mappath("../../db/menutemp.HTML"),true)

Response.Write "menu olu&thorn;turulyor ... <br>"
tf.write "<div id=""menu"">"& vbcrlf
call RecurseCategories(0, 0)
tf.write "</div>"& vbcrlf

Response.Write "Eski menu siliniyor !<br>"
If (fs.FileExists(server.Mappath("../../db/menu.HTML")))=true Then
set old_menu = fs.getfile(server.Mappath("../../db/menu.HTML"))
old_menu.delete
end if

Response.Write "Yeni menü dosyas&yacute;n&yacute;n ismi de&eth;i&thorn;tiriliyor !<br>"
set tf = fs.getfile(server.Mappath("../../db/menutemp.HTML"))
tf.name="menu.HTML"

Set tf = nothing
Set fs = nothing
%>
<!--#include file="verikop.ASP" -->
<a href="../../db/menu.HTML">Menünün Liste Halini Gör</a>


HTML olarak oluşturuyorum

PHP Code:

<div id="menu">
<ul>
<li><a href ='sayfama.ASP?sayfaaa=8&kategori=24'>GiTARLAR</a>    <ul>
    <li><a href ='sayfama.ASP?sayfaaa=8&kategori=68'>KLASiK GiTARLAR</a>        <ul>
        <li><a href ='sayfama.ASP?sayfaaa=8&kategori=213'>YAMAHA</a>
                <ul>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=168'>C 40 KLASiK GiTAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=169'>C 70 KLASiK GiTAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=170'>CG 101M KLASiK GiTAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=1309'>C 30 M KLASiK GiTAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=1772'>C 80 KLASiK GiTAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=2390'>CG 101 K KLASiK GiTAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=2391'>CG 101 MS KLASiK GiTAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=2392'>CG 111 KLASiK GiTAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=2393'>CG 131 S KLASiK GiTAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=2394'>CG 151 KLASiK GiTAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=2395'>CG 171 KLASiK GiTAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=2396'>CG 201S KLASiK GiTAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=2397'>CS 101C KLASiK GiTAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=2398'>CGS 104 KLASiK GiTAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=2399'>CGS 103 KLASiK GiTAR</a></li>
                </ul>
</li>
        <li><a href ='sayfama.ASP?sayfaaa=8&kategori=214'>ANTONIO SANCHEZ</a>
                <ul>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=224'>S-20 KLASIK GITAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=225'>1005 KLASIK GITAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=228'>1010 KLASIK GITAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=229'>1015 KLASIK GITAR</a></li>
                </ul>
</li>
        <li><a href ='sayfama.ASP?sayfaaa=8&kategori=215'>ADMIRA</a>
                <ul>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=214'>PALOMA KLASiK GiTAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=216'>JUANITA KLASiK GiTAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=217'>SOLISTA KLASiK GiTAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=218'>ARTISTA KLASiK GiTAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=1143'>IRENE KLASiK GiTAR</a></li>
                <li><a href ='sayfama.ASP?sayfaaa=9&product=1837'>MARIA KLASiK GiTAR</a></li>
                </ul>
</li>
</ul>
</div> 


tabi haliyle 174 kb lık bi HTML elde ediyorum.. buda sayfamı kasıyor..(menu buraya bile sıgmadı)
neyapmalıyım bu menuyü XML mi olmalı ? ve nasıl yol gösterirmisiniz...
unutmadan menüyü include ediyorum
ÇOK AciL ÇÖZüMLERiNiZi bekliyorum bu konuda sonuçsuz kaldım..

ajax bir örnek olabilir (yaptıgım yapıya göre)
XML olabilir

tabi kasmaması ve hızlı çalışması için farklı önerilerde olabilir

[akgun]

kolay bi yol yaptım geçici olarak ürünleri menüye yükletmedim..

boyut 41.kb düştü ve hızlandı ama ürünleride göstermek gerekiyor