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

Antwort per Email an