Public Function connect(var)

Hej.

Jeg sidder lidt fast i denne funktion.

public function connect(var)
   
    const adopenforwardonly = 0
    const adlockreadonly = 1
    const adcmdtext = 1
   
    'Åbn forbindelsen til databasens
    dim cn, cnstr
    set cn = server.CreateObject("adodb.connection")
    cnstr = "Provider=Microsoft.Jet.OLEDB.4.0;"
    cnstr = cnstr & "Data Source=" & server.MapPath("db/mydb.mdb") & ";"
    cn.connectionstring = cnstr
    cn.open
   
    'Åbn recordset
    set rs = server.CreateObject("adodb.recordset")
    rs.open var, cn, adopenforwardonly, adlockreadonly, adcmdtext
end function

Kommer med fejl: Microsoft JET Database Engine (0x80040E10)
Der er ikke angivet nogen værdi for en eller flere krævede parametre.

ved "rs.open"

Men hvis jeg skriver en statisk sql string i stedet for "var", efter "rs.open", virker det fint nok.

Grunden til at spørger, er fordi i stedet for, heletiden at skrive en connection, ville jeg bruge connect("SQL String"). Men som i kan høre, har det skabt mig problemer!

Kan nogen hælpe?