ASP kodundaki hata?

<%
Set baglanti=Server.CreateObject("Adodb.Connection")
baglanti.open "provider=Microsoft.Jet.Oledb.4.0; Data Source="& Server.MapPath("kariyervt.mdb")

Set rs=Server.CreateObject("Adodb.Connection")
rs.open "Select * from Kisiler",baglanti,1,3

Response.Write( rs("adi"))
%>

yukarıdaki satırlarda veri tabanında bulunan kisiler tablosunda "adi" sutunda bulunan veriyi yazdırmaya çalışığımda aşağıdaki hatayı alıyorum sizce kodda eksik olan ne?


Hata Tipi:
Microsoft VBScript çalışma hatası (0x800A01C2)
Hatalı bağımsız değişken numarası veya geçersiz özellik ataması: 'rs'
/videolar/default.asp, line 8

adi diye bir alan olmayabilir mi?

bir de
response.write rs("adi")

şeklinde dene

rs Adodb.Connecton olarak okuma yapmaz recordset olmalı