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
