OVH Cloud OVH Cloud

Probleme avec access 2002

2 réponses
Avatar
Achile
Bonjour,

J'utilise un objet data pour integrer une base de donne access dans mon
programme vb. Au chargement du programme, je configure mon objet data:
Data1.DatabaseName = "c:\prog\placenet.mdb"
Data1.RecordSource = "placenet"
Mais quand je lance mon .exe, j ai une erreur lié à access:
"La classe n'est pas enregistré."
Quelle est la cause de cette erreur ?

merci d'avance

2 réponses

Avatar
Eddie
Bonjour,
Je ne connais pas la manière que tu utilises. Je fais
comme suis:

Public Sub main()
' j'ajoute les deux références ci-dessous à mon projet
'Microsoft Access 10.0 Object Library
'Microsoft DAO 3.6 Object Library
Dim db As Database
Dim rs As Recordset

Set db = OpenDatabase("MaBase.mdb")
Set rs = db.OpenRecordset("MaTable")

' J'ajoute un enregistrememnt

rs.AddNew
rs!MonChampTxt1 = "UneValeur"
rs.Update

'je ferme tout
rs.Close
Set rs = Nothing
db.Close

End Sub
J'espère que cela pourra te dépanner
Tu peux toujours visiter le forum Access.

A+

-----Message d'origine-----
Bonjour,

J'utilise un objet data pour integrer une base de donne


access dans mon
programme vb. Au chargement du programme, je configure


mon objet data:
Data1.DatabaseName = "c:progplacenet.mdb"
Data1.RecordSource = "placenet"
Mais quand je lance mon .exe, j ai une erreur lié à


access:
"La classe n'est pas enregistré."
Quelle est la cause de cette erreur ?

merci d'avance


.



Avatar
Achile
merci beaucoup, ca marche tres bien.
par contre j'ai une erreur à cause des champ vide avec ta méthode:
"invalid us of null" sur cette ligne: "FSAVClient.Text = rs3!client"
y a t-il une propriété a changer pour que les champ vide soit accepter ?

"Eddie" a écrit dans le message de
news:003001c3cbd5$a8ee2dc0$
Bonjour,
Je ne connais pas la manière que tu utilises. Je fais
comme suis:

Public Sub main()
' j'ajoute les deux références ci-dessous à mon projet
'Microsoft Access 10.0 Object Library
'Microsoft DAO 3.6 Object Library
Dim db As Database
Dim rs As Recordset

Set db = OpenDatabase("MaBase.mdb")
Set rs = db.OpenRecordset("MaTable")

' J'ajoute un enregistrememnt

rs.AddNew
rs!MonChampTxt1 = "UneValeur"
rs.Update

'je ferme tout
rs.Close
Set rs = Nothing
db.Close

End Sub
J'espère que cela pourra te dépanner
Tu peux toujours visiter le forum Access.

A+

-----Message d'origine-----
Bonjour,

J'utilise un objet data pour integrer une base de donne


access dans mon
programme vb. Au chargement du programme, je configure


mon objet data:
Data1.DatabaseName = "c:progplacenet.mdb"
Data1.RecordSource = "placenet"
Mais quand je lance mon .exe, j ai une erreur lié à


access:
"La classe n'est pas enregistré."
Quelle est la cause de cette erreur ?

merci d'avance


.