Migration difficile Access97 vers 2002
MJ69
-
Utilisateur anonyme -
Utilisateur anonyme -
Bonjour,
Après avoir converti ma base access97 en access 2002, presque tout fonctionne sauf une procédure evenementielle qui est ci-dessous:
et sur la troisième ligne, Access réponds "operation non autorisée pour ce type d'objet"
Private Sub Choisir_le_Client_GotFocus()
Set bd = CurrentDb()
Set B_L_Tempo = bd.OpenTable("B L Tempo")
Set Détail_B_L_Tempo = bd.OpenTable("Détail B L Tempo")
Do Until B_L_Tempo.EOF
B_L_Tempo.Delete
B_L_Tempo.MoveNext
Loop
Do Until Détail_B_L_Tempo.EOF
Détail_B_L_Tempo.Delete
Détail_B_L_Tempo.MoveNext
Loop
DoCmd.SetWarnings False
DoCmd.OpenQuery "CREER T B L Tempo", acNormal, acEdit
DoCmd.OpenQuery "CREER T Détail B L Tempo", acNormal, acEdit
Me![Choisir le Client].Dropdown
End Sub
Merci d'avance
MJ
Après avoir converti ma base access97 en access 2002, presque tout fonctionne sauf une procédure evenementielle qui est ci-dessous:
et sur la troisième ligne, Access réponds "operation non autorisée pour ce type d'objet"
Private Sub Choisir_le_Client_GotFocus()
Set bd = CurrentDb()
Set B_L_Tempo = bd.OpenTable("B L Tempo")
Set Détail_B_L_Tempo = bd.OpenTable("Détail B L Tempo")
Do Until B_L_Tempo.EOF
B_L_Tempo.Delete
B_L_Tempo.MoveNext
Loop
Do Until Détail_B_L_Tempo.EOF
Détail_B_L_Tempo.Delete
Détail_B_L_Tempo.MoveNext
Loop
DoCmd.SetWarnings False
DoCmd.OpenQuery "CREER T B L Tempo", acNormal, acEdit
DoCmd.OpenQuery "CREER T Détail B L Tempo", acNormal, acEdit
Me![Choisir le Client].Dropdown
End Sub
Merci d'avance
MJ
A voir également:
- Migration difficile Access97 vers 2002
- Migration windows 7 vers windows 10 - Accueil - Mise à jour
- Clavier qwerty vers azerty - Guide
- Vers quelle adresse web renvoie ce lien - Guide
- Envoyer vers - Guide
- Migration windows 10 vers windows 11 gratuit - Guide
3 réponses
bonjour
D'une version a une autre le VBA n'est pas le meme.
Pose la question sur le forum programmation vba
D'une version a une autre le VBA n'est pas le meme.
Pose la question sur le forum programmation vba