Qui peut me dire d ou peu provenir cette erreur?
j ai fai un package pour l install de mon appli et qd je
lance mon aplli il me marque ca
et comme j utilise DAO et Access dasn mon appli, ca
plante tout.....
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Bonjour,
J'ai eu le même problème et, après des tas de recherches, un contournement m'a été donné par un ingénieur Microsoft.
Il possible d'utiliser le morceau de code suivant (tiré de Q238401) :
Option Explicit Private db As DAO.Database Private rs As DAO.Recordset Dim sPath As String
Private Sub Form_Load()
sPath = "C:Program FilesMicrosoft OfficeOfficeSamplesNorthwind.mdb" Set db = DBEngine(0).OpenDatabase(sPath) Set rs = db.OpenRecordset("Customers") Set Data1.Recordset = rs
End Sub
On voit que les paramètres DataBaseName et DataSource ne sont pas passés au contrôle Data, mais seulement le recordset créé dans le code.
J'espère que ceci vous aidera.
Gilbert Bonamy ()
Bonjour,
J'ai eu le même problème et, après des tas de recherches,
un contournement m'a été donné par un ingénieur Microsoft.
Il possible d'utiliser le morceau de code suivant (tiré
de Q238401) :
Option Explicit
Private db As DAO.Database
Private rs As DAO.Recordset
Dim sPath As String
Private Sub Form_Load()
sPath = "C:Program FilesMicrosoft
OfficeOfficeSamplesNorthwind.mdb"
Set db = DBEngine(0).OpenDatabase(sPath)
Set rs = db.OpenRecordset("Customers")
Set Data1.Recordset = rs
End Sub
On voit que les paramètres DataBaseName et DataSource
ne sont pas passés au contrôle Data, mais seulement le
recordset créé dans le code.
J'ai eu le même problème et, après des tas de recherches, un contournement m'a été donné par un ingénieur Microsoft.
Il possible d'utiliser le morceau de code suivant (tiré de Q238401) :
Option Explicit Private db As DAO.Database Private rs As DAO.Recordset Dim sPath As String
Private Sub Form_Load()
sPath = "C:Program FilesMicrosoft OfficeOfficeSamplesNorthwind.mdb" Set db = DBEngine(0).OpenDatabase(sPath) Set rs = db.OpenRecordset("Customers") Set Data1.Recordset = rs
End Sub
On voit que les paramètres DataBaseName et DataSource ne sont pas passés au contrôle Data, mais seulement le recordset créé dans le code.