Visual Basic - Error en parametrizacion de clave

Hola a todos, tengo este pequeño problema, que es lo único que me hace falta para terminar un desarrollo que estoy realizando. El inconveniente es que este es el código para compactar la base de datos Access, pero necesito que la clave este parametrizda, lo cual lo hice, pero me marca error, si este mismo código lo corro, pero colocando la clave directamente, me corre de manera correcta, me podrían decir donde tengo el error.

De antemano muchas gracias.

------------------------------------------------------------------------------
Set cnn = New ADODB.Connection
sBase = "Covena1.mdb"
ClaveN = "hola"
ClaveA = "donado"

je.CompactDatabase "Data Source=" & sBase & ";" & "Jet OLEDB:Database Password=" & ClaveA & ";" & "Data Source=" & sDBTmp & ";" & "Jet OLEDB:Database Password=" & ClaveN & ";"

------------------------------------------------------------------------------------------------------------------

Al ponerla directo no le pones los apostrofes ? ' '

Intenta con apostrofes, sino, intenta ponerle un tipo a la variable.. osea :

Dim variable As String

Hay veces, muy raro, pero si me ah pasado que a fuerzas debes crear la variable

LAs dos ya las inente, las variables ya las tenia declarada como string, igual no funciona y los apostrofe los coloque pero sigue el mismo error, tu tendrás algún ejemplo que me puedas ofrecer. Estoy bastante apurada con este código. Tienes alguna idea de como pueda solucionarlo?

No te funciona asi :

je.CompactDatabase "Data Source=" & sBase & ";" & "Jet OLEDB:Database Password=" & ClaveA & ";" & "Data Source=" & sDBTmp & ";" & "Jet OLEDB:Database Password=" & ClaveN & ";"

Ponme como SI te funciona paraver que onda

Una cosa mas.. dice Antonio Corena y dices que eres chava ? Como es eso ?

Dice que el argumento no es opcional y marca en "CompactDatabase", que puedo hacer, como hago para que pueda cambiar la clave de access desde visual basic, he buscado en muchos foros y no he conseguido como.