try this

Code:
cn.open ("Provider=Microsoft.Jet.OLEDB.4.0;" & _
        "Data Source=C:\Tour\Tour.mdb;" & _
        "Jet OLEDB:Database Password=Password;")