ADODB über ResultSet Keys iterieren

[Eisbär]

Hallo Philip

Leider ist mein ASP in der Zwischenzeit (ich hab das mal kurz für ein Projekt gelernt und wieder vergessen, da ich ASP ***hasse*** - Kein OOP, pfui) ziemlich verkommen und ich hab einfach nix 'gscheites finden können:

... es gibt schlimmeres ... ;-)

Es geht darum das ResultSet einer SQL - Abfrage auszugeben (muss ein Remote-DB-Interface basteln)... Entschuldigt die fast-newbie-Frage, aber kann mir wer sagen, wie ich über die Keys des Resultsets iteriere?

' Create DB-Connection
Set db = Server.CreateObject("ADODB.Connection")
db.Open "DSName", "User", "Pwd"

' Create Recordset
Set rs_AP = Server.CreateObject("ADODB.RecordSet")
SQL_AP = "SELECT ID, Vorname, Nachname FROM Ansprechpartner WHERE Gruppe=" & GroupID
rs_AP.open SQL_AP, db, adOpenDynamic

'... weiter im Code ...

' Recordset iterieren
<%
    rs_AP.MoveFirst
    do Until rs_AP.EOF

' Ausgabe der Felder im aktuellen Record
        response.write rs_AP("Vorname") & " " & rs_AP("Nachname") & "<br>

'... weiter im Code ...

rs_AP.MoveNext
    loop
%>

'... weiter im Code ...

' Connection schliessen
<%
rs_AP.close
db.close
rs_AP = nothing
db = nothing
%>

Ich hoffe das hilft ...

Grüsse
Eisbär