ADO Acces username fouten!

[harolda1980]

 Connectionstring = "W:\VERMAAT - INSTAT\"
        strSQL = "SELECT tblArtikel.* FROM tblArtikel"
        strProvider = "Microsoft.Jet.OLEDB.4.0"
        strCnn = Connectionstring & "\dbinkoop.mdb"
        Set cnnartikelen = New ADODB.Connection
        cnnartikelen.Provider = strProvider
        cnnartikelen.Open strCnn, "UID=Harold;PWD=Vermaat"

Hoe komt het dat de users als onbekend terugkomt terwijl ik hem wel in mijn Database zie staan. want de foutmelding komt al bij CNNartikelen.open

 

[OctaFish]

Connectionstring = "W:\VERMAAT - INSTAT\"
strCnn = Connectionstring & "\dbinkoop.mdb"
Misschien doordat je twee slashes achter elkaar combineert.

 

[harolda1980]

Ja die heb ik veranderd! Maar krijg nog altijd de melding ongeldige gebruikersnaam en of wachtwoord!

 

[OctaFish]

Stopt de procedure nog steeds op dezelfde plek?

 

[harolda1980]

Jup, hij hangt nog steeds op die regel!

 

[OctaFish]

Probeer 'm eens zo:

    ' Open a connection using the Microsoft Jet provider
    Dim Cnnartikelen As ADODB.Connection
    ConnectionString = "W:\VERMAAT - INSTAT\dbinkoop.mdb"
    Set Cnnartikelen = New ADODB.Connection
    Cnnartikelen.Provider = "Microsoft.Jet.OLEDB.4.0"
    Cnnartikelen.Open ConnectionString, "Harold", "Vermaat"

 

[harolda1980]

Ik krijg nu deze foutmelding!