das ist alles korrekt, wenn ich die erste while schleife weglasse (ist nur
ne erweiterung, damit die verschiedenen ebenen der navigation andere
grafiken haben) dann sieht das ergebnis im browser so aus:

Nachrichten
        Wirtschaft 
        Politik 
        Sport 
Mitarbeiter 
Sitemap 
Dokumentation 

also musses wohl gehen, oder? 
 

-----Urspr�ngliche Nachricht-----
Von: Rainer V�lschow [mailto:[EMAIL PROTECTED]]
Gesendet: Freitag, 26. April 2002 14:32
An: ASP Diskussionsliste fuer Anfaenger
Betreff: [aspdebeginners] Re: AW: Re: AW: Re: AW: Re: MoveFirst


Hallo Mirco,

�berpr�fe mal bitte ob die SQL-Anweisung ein Ergebniss zur�ckgibt.
Erweitere dein oDataF.Open um ",3 ,3" und frage dann die Anzahl mit
"response.write(oDataF.Recordcount) ab". Au�erdem stelle sicher, das dieses
Script mit <!-- #include file="...... " --> eingebunden wird.

Rainer 

Rainer

"Stege, Mirco" schrieb:
> 
> Nein ... das Script ist nur eine Maske die in einer anderen Seite
aufgerufen
> wird die wiederum die DB Anbindung, etc. includiert ;) aber thx... ich
glaub
> echt es ist hoffnungslos ... Ferndiagnose ist halt schwer bei solch
> komplexen Scripten ... was mir wirklich Angst macht ... dass dieses mein
> Script im Prinzip noch �berhaupt nicht komplex ist -argh- ... :/
> 
> -----Urspr�ngliche Nachricht-----
> Von: Rainer V�lschow [mailto:[EMAIL PROTECTED]]
> Gesendet: Freitag, 26. April 2002 14:22
> An: ASP Diskussionsliste fuer Anfaenger
> Betreff: [aspdebeginners] Re: AW: Re: AW: Re: MoveFirst
> 
> mu� nicht zuvor ein:
> - Set oDBConn = Server.CreateObject("ADODB.Connection")
> und
> - oDBConn.open "[DB-Connection-String oder DNs-Name]", "[Login]",[Passwd]"
> 
> gemacht werden ?
> 
> Rainer
> 
> "Stege, Mirco" schrieb:
> >
> > Also Bei:
> >
> > "Do Until oDataF.EOF.eof loop"
> > "Do While not oDataF.EOF loop"
> > "Do While not oDataF.BOF loop"
> >
> > kommen die selben Fehler
> > ("
> > ADODB.Recordset error '800a0bcd'
> > Either BOF or EOF is True, or the current record has been deleted.
> Requested
> > operation requires a current record.
> >
> > /index.asp, line 0
> > ")
> >
> > :((
> >
> > -----Urspr�ngliche Nachricht-----
> > Von: Rainer V�lschow [mailto:[EMAIL PROTECTED]]
> > Gesendet: Freitag, 26. April 2002 14:08
> > An: ASP Diskussionsliste fuer Anfaenger
> > Betreff: [aspdebeginners] Re: AW: Re: MoveFirst
> >
> > Hallo Mirco,
> >
> > was passiert eigentlich wenn du anstelle von "While Not oDataF.EOF Wend"
-
> > Schleife, "Do Until oDataF.EOF.eof loop" oder "Do While not oDataF.EOF
and
> > oDataF.BOF loop"  - Schleife einbaust ?
> >
> > Rainer
> >
> > Markus Sandke schrieb:
> > >
> > > Aye, das kann jedem mal passieren :)))
> > >
> > > -----Urspr�ngliche Nachricht-----
> > > Von: Stege, Mirco [mailto:[EMAIL PROTECTED]]
> > > Gesendet: Freitag, 26. April 2002 13:41
> > > An: ASP Diskussionsliste fuer Anfaenger
> > > Betreff: [aspdebeginners] AW: Re: MoveFirst
> > >
> > > Ahhhhh, endlich kommt etwas ... also ich habe bisher keine Code
> > > mitgeschickt, weil ich nicht glaube, dass ihr damit etwas anfangen
k�nnt
> > ...
> > > ist zuviel ... aber nagut ...
> > > warum ich die ganze zeit frage?
> > > Es handelt sich um ein Problem bei der unten im Code ersten
aufgef�hrten
> > > Schleife ... wenn ich sie mittels Kommentarzeichen rausnehme,
> funktioniert
> > > das Script einwandfrei ... wenn ich sie drin lasse wird die Schleife
> > > ausgef�hrt ... aber alles danach ist nicht mehr zu sehen ... wenn ich
> dann
> > > zwischen die Schleifen ein .MoveFirst einbaue ... funktionieren alle
> Teile
> > ,
> > > jedoch wird vom letzten Teil nur die H�lfte dargestellt (-argh- ...
> > > entschuldigt die Rechtschreibfehler) dann erscheint der allseits so
> > bekannte
> > > und geliebte Fehler "Either BOF or EOF ... is true ... bla"
> > >
> > > Code:
> > >
> > > sLangID = Request.QueryString("sLangID")
> > > nUrsprung = 1
> > > nCount = 0
> > > ReDim arrNavID(nCount)
> > >
> > > Sub BuildChildTree(nOrigin, nDepth, nCounter)
> > >         Dim oDataF
> > >
> > >         Response.Write("<table cellspacing='0' cellpadding='0'
> > border='0'>")
> > >
> > >         Set oDataF = Server.CreateObject("ADODB.RecordSet")
> > >         sSqlF = "select NavigationID, NavigationText from
> CS_V_Navigation
> > > where ParentID = " & nOrigin & " and IsVisible = 'Y' and LanguageID =
'"
> &
> > > sLangID & "' and NavigationID in (select distinct NavigationID from
> > > CS_Presentation p, CS_Category c where p.CategoryID = c.CategoryID and
> > > c.ReadRight in(" & Session("strUserRights") & ") and
> > > p.PresentationPurposeID=" & PP_HOMEPAGE & ") order by SortNr"
> > >         oDataF.CursorLocation = CInt(adOpenStatic)
> > >         oDataF.Open sSqlF, oDBConn
> > >
> > >         While Not oDataF.EOF
> > >                 ReDim Preserve arrNavID(nCount)
> > >                 arrNavID(nCount) = CInt(oDataF("NavigationID"))
> > >                 i = UBound(arrNavID)
> > >                         For x = 0 to UBound(arrNavID)
> > >                                 Response.Write arrNavID(x)
> > >                         Next
> > >                 nCount = nCount + 1
> > >                 oDataF.MoveNext
> > >         Wend
> > >
> > >         While Not oDataF.EOF
> > >                 nCounter = nCounter + 1
> > >                 Response.Write("<tr><td>")
> > >                 For i = 1 To nDepth -1
> > >                         If i = nDepth -1 Then
> > >                                 'If CInt(i) = CInt(nNavID) Then
> > >                                         Response.Write("<img
> > > src='/images/lastdepth.gif' align='top' width='20' height='20'
> vspace='0'
> > > hspace='0'>")
> > >                                 'Else
> > >                                 '       Response.Write("<img
> > > src='/images/nextdepth.gif' align='top' width='20' height='20'
> vspace='0'
> > > hspace='0'>")
> > >                                 'End If
> > >                         Else
> > >                                 Response.Write("<img
> > > src='/images/straight.gif' align='top' width='40' height='20'
vspace='0'
> > > hspace='0'>")
> > >                         End If
> > >                 Next
> > >                 If CInt(oDataF("NavigationID")) = CInt(nUrsprung) Then
> > >                         oData.MoveNext
> > >                 ElseIf CInt(oDataF("NavigationID")) = CInt(nNavID)
Then
> > >                         Response.Write(oDataF("NavigationText"))
> > >                 Else
> > >                         Response.Write("<a href='/index.asp?nNavID=" &
> > > oDataF("NavigationID") & "&sLangID=" & sLangID & "'>" &
> > > oDataF("NavigationText") & "</a>")
> > >                 End If
> > >                 nNewDepth = nDepth + 1
> > >                 BuildChildTree oDataF("NavigationID"), nNewDepth,
> nCounter
> > >                 Response.Write("</tr>")
> > >                 oDataF.MoveNext
> > >         Wend
> > >         oDataF.Close
> > >         Response.Write("</table>")
> > > End Sub
> > >
> > > BuildChildTree 0, 1, 0
> > >
> > > K�nnt ihr damit etwas anfange? -argh- ... mist ... langsam glaub ich
ich
> > > habe wirklich den falschen Beruf ... baut mich mal auf ;) So Spr�che
> wie:
> > > "Das kann jedem mal passieren w�ren perfekt" ;))
> > >
> > > Gruss Mirco
> > >
> > > -----Urspr�ngliche Nachricht-----
> > > Von: Rainer V�lschow [mailto:[EMAIL PROTECTED]]
> > > Gesendet: Freitag, 26. April 2002 13:33
> > > An: ASP Diskussionsliste fuer Anfaenger
> > > Betreff: [aspdebeginners] Re: MoveFirst
> > >
> > > Hallo Mirco,
> > >
> > > - Bist du sicher, da� movefirst die durchlaufrichtung umkehrt ?
> > > - Hast du auch nicht moveprevious verwendet ?
> > > - Bist du sicher ob die SQL-Anweisung auch einer Ergebniss zur�ck
> liefert
> > ?
> > > Denn
> > > wenn das Recordset leer ist, kommt diese Fehlermeldung.
> > > - Poste dochmal einen Code-Ausschnitt, denn mit unserer Glaskugel
allein
> > > k�nnen
> > > wir dir nur schwer helfen, da die Ursache mannigfaltig sein kann.
> > >
> > > Rainer
> > >
> > > "Stege, Mirco" schrieb:
> > > >
> > > > Kann mir wirklich niemand helfen?
> > > >
> > > > Wenn ich MoveFirst schreibe, obwohl der Cursor schon am Listenanfang
> > > steht,
> > > > ist dann die Durchlaufrichtung (mit adOpenDynamic) umgekehrt?
> > > >
> > > > Wenn ich in meinem Script n�mlich nach dem Select Statement ein
> > > > Objekt.MoveFirst einsetze, dann kommt auf einmal der Fehler Either
Eof
> > > oder
> > > > Bof ... usw.
> > > >
> > > > Ist doch im prinzip unlogisch oder nicht?
> > > >
> > > > mfG Mirco
> > > >
> > > > | Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
> > > > | [aspdebeginners] als [EMAIL PROTECTED] subscribed
> > > > | http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
> > > > | Sie knnen sich unter folgender URL an- und abmelden:
> > > > |
> http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
> > >
> > > | Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
> > > | [aspdebeginners] als [EMAIL PROTECTED] subscribed
> > > | http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
> > > | Sie knnen sich unter folgender URL an- und abmelden:
> > > |
http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
> > >
> > > | Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
> > > | [aspdebeginners] als [EMAIL PROTECTED] subscribed
> > > | http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
> > > | Sie knnen sich unter folgender URL an- und abmelden:
> > > |
http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
> > >
> > > | Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
> > > | [aspdebeginners] als [EMAIL PROTECTED] subscribed
> > > | http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
> > > | Sie knnen sich unter folgender URL an- und abmelden:
> > > |
http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
> >
> > | Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
> > | [aspdebeginners] als [EMAIL PROTECTED] subscribed
> > | http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
> > | Sie knnen sich unter folgender URL an- und abmelden:
> > | http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
> >
> > | Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
> > | [aspdebeginners] als [EMAIL PROTECTED] subscribed
> > | http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
> > | Sie knnen sich unter folgender URL an- und abmelden:
> > | http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
> 
> | Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
> | [aspdebeginners] als [EMAIL PROTECTED] subscribed
> | http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
> | Sie knnen sich unter folgender URL an- und abmelden:
> | http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
> 
> | Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
> | [aspdebeginners] als [EMAIL PROTECTED] subscribed
> | http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
> | Sie knnen sich unter folgender URL an- und abmelden:
> | http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp

| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [EMAIL PROTECTED] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp

| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp

Antwort per Email an