Einfaches Beispiel aus einem "beliebigen" Projekt:
SQL = "SELECT ID, Vorname, Nachname, eMail FROM
Benutzer WHERE DatumClose >= GETDATE() OR DatumClose IS
NULL"
LiesDatenbank SQL,RS ' Function um Datensatz zu �ffnen
Do while not RS.eof
        ID = RS.Fields("ID")
        Vorname = RS.Fields("Vorname")
        Nachname = RS.Fields("Nachname")
        eMail = RS.Fields("eMail")
        If Not(Application("Benutzer" & ID) = "") Then
Response.Write(Vorname & " " & Nachname & ", " & eMail
& "2ist angemeldet<br>" & vbCrLf)
        RS.MoveNext
Loop

Die Schleife auf deine Bed�rfniss umformuliert:
Do while not RS.eof
        ID = RS.Fields("ID")
        Vorname = RS.Fields("Vorname")
        Nachname = RS.Fields("Nachname")
        eMail = RS.Fields("eMail")
        RS.MoveNext
If RS.Eof Then Response.Write("<!-- Dann machen wir was
anderst -->" & vbCrLf)
        If Not(Application("Benutzer" & ID) = "") Then
Response.Write(Vorname & " " & Nachname & ", " & eMail
& "2ist angemeldet<br>" & vbCrLf)

Loop


On 18 Feb 2002 at 10:44, Rainer V�lschow wrote:

> Andreas Roth schrieb:
> >
> > >
> > > gibt es noch anderere bzw. bessere M�glichkeiten ?
> > >
> >
> > Meistens liest man ja die Recordsetinhalte in Variablen
> > ein. Danach kannst du ja schon das Movenext machen und
> > schon vor der Ausgabe auf .eof pr�fen.
>
> �hm, ich mach so etwas nicht.... :-). Wie geht man vor ?
>
> Rainer
>
> | 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

Gru�,
Andreas Roth,
http://ed59.s5.domainkunden.de/vt/?4


| 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