Opkald til database

Hi!

Jeg skal have erstatten denne :

' Skaber DSNLess forbindelse til DBen
strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("search.mdb")
Set myConn = Server.CreateObject("ADODB.Connection")
myConn.Open strDSN

Til denne :

    Set myConn=Server.CreateObject("ADODB.connection")
    oSQL.connectionstring="DSN=AGI"
    oSQL.Open

Men er lidt i tvivl omkring navnene, den melder fejl :

Microsoft VBScript runtime (0x800A01A8)
Object required: 'oSQL'

Håber i kan hjælpe

/Bruhn