nachtrag

[Jens Menke]

Set cnn= Server.CreateObject("ADODB.Connection")
Set rst = Server.CreateObject("ADODB.Recordset")

cnn.open "DSN-Eintrag"

sql = "Deine SQL Abfrage"

set rst = cnn.execute(sql)

while not rst.eof
  response.write(rst(1)) 'Gibt die 2. Spalte aus
wend

Hm.. ich machs immer so :

SQL    = "SELECT * FROM Database ORDER BY XXX ; "
Set db = Server.CreateObject("ADODB.Recordset")
db.open SQL,"DSN=DSN-Name;UID=User",1,1
while not ...

Aber du scheinst es denn ja zu wissen wie es geht...
Also stellte sich nun wieder die Frage was du nun eigentlich
wissen wolltest...

*grübel*
Jens