Problems connecting to a password protected database

[Clunietp]

'uses ADO 2.x
    Dim cn As Connection
    
    Set cn = New Connection
    
    cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Nwindnew.mdb;Jet OLEDB:Database Password=password;"