Call af sub med parametre giver fejl

Når jeg forsøger at kalde en subRoutine med parametre får jeg fejl.

Min sub ser sådan her ud:

Sub subDbConnOpen(driver,host,uid,pwd,db)
   
    Set Conn = Server.CreateObject("ADODB.Connection")
    Conn.Open = "driver={"& driver &"};server="& host &";uid="& uid &";pwd="& pwd &";database="& db &";"

End Sub


Og mit kald ser sådan her ud:

Call subDbConnOpen("MySql","localhost","uid","pwd","database")

Hvad skal jeg gøre for at få det til at virke ?