Hallo Claudius,
Hallo Alexander,
beides nein....
Nochmal:
Dim ebene
ShowFolder 1
Function ShowFolder (ParentID)
SQL - Shape Folder / Dokument
While not rs.eof
response.write rs(folder)
set rsSub...value
response.write rs(dokument)
ebene = ebene + 1
ShowFolder rs(FolderID)
ShowFileFolder (SomePath) '<----Damit beginnt das Problem
rs.movenext
wend
ebene = ebene -1
'Some more
end function
Function FileFolder (Path)
if folderExists Then
getFolder
For each subFolders
FileFolder(otherPath)
Next
ebene = ebene + 1 '<----Hier entsteht das Problem*Siehe
unten
else
ebene = ebene -1 '<---------- " ---------
end if
end Function
In der ShowFolder Funktion kann ich ja sch�n die ebene rauf und
runterz�hlen. Nur in der FileFolder - Funktion klappt das nicht so wie ich
mir das vorgestellt habe mit dem runterz�hlen....
Ich bin da schon ganz durcheinander...
Mansur
> -----Urspr�ngliche Nachricht-----
> Von: Claudius Ceteras [mailto:[EMAIL PROTECTED]]
> Gesendet: Freitag, 2. November 2001 15:29
> An: AspGerman Kaffeehaus
> Betreff: [aspdecoffeehouse] RE: [aspdecoffeehouse] Rekursiv - Hab mich
> verz�hlt :-)
>
>
> >
> > Wie kann ich da vorgehen, damit mir die Ebenen korrekt hoch
> > und wieder runtergez�hlt werden?
> >
>
> Show 0,0
>
> Sub show(parentID, indent)
> show element with id = parentID
>
> for each child where parent = parentID
> show child.parent, indent+1
> next
> End sub
>
> Claudius
>
>
> | [aspdecoffeehouse] als [EMAIL PROTECTED] subscribed
> | http://www.aspgerman.com/archiv/aspdecoffeehouse/ = Listenarchiv
> | Sie k�nnen sich unter folgender URL an- und abmelden:
> | http://www.aspgerman.com/aspgerman/listen/anmelden/aspdecoffeehouse.asp
>
| [aspdecoffeehouse] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdecoffeehouse/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdecoffeehouse.asp
