Bonjour,
Je n'arrive pas à me connecter à la base de données que j'ai créé sur access 2000
Mon code tout simple :
Private Sub Ajout_Livre_Click()
Set connect = New Connection
connect.Open "Provider = Microsoft.Jet.OLEDB.4.0;" & "Data Source = C:\Program Files\EasyPHP1-7\www\access\bd.mdb;"
Dim rs As Recordset
Set rs = New Recordset
rs.Open "livre", connect, adOpenKeyset, adLockOptimistic
With rs
.AddNew
rs("titre_livre" ) = t1.Value
rs("nom_livre" ) = t2.Value
rs("prenom_livre" ) = t3.Value
rs("nom_collection" ) = t4.Value
.Update
End With
rs.Close
Set rs = Nothing
End Sub
Quand je clique sur le bouton ca me marque ceci :
Erreur d'exécution 2147467259 (80004005)
La base de données à été placé par l'utilisateur Admin sur GRIMORG-I61TYTE dans un état l'empéchant d'etre ouverte ou verouillé.
En meme temps je vois qu'il y a un fichier Access.Lockfile.9 dans le meme dossier que ma base que je ne peut supprimmer.
Message édité par guerre de troy le 22-08-2006 à 16:26:49
---------------
www.guerre-de-troy.com jeu de rôle en ligne