Erreur d'execution 2046 avec RunCommand

Tikam - 23 mars 2001 à 11:49
 Saintache - 6 juil. 2001 à 13:55
Bonjour,
je développe une application en VBA/access, et la procédure suivante
me génère une erreur au niveau de mes lignes de codes "RunCommand"
ce source est censé controler un formulaire qui est lui même
dépendant d'une table access(la base mélange tables access et tables odbc)
si quelqu'un a déjà vécu ce blocage.....merci d'avance
voici le code:

Public Sub controler(intPersonne As Integer)

Call Activite(intPersonne) 'appel de procédure
If blnActif = False Then
Call contrat(intPersonne) 'appel de procédure
blnCumul = Cumul(intPersonne) 'appel d'une fonction If blnActif False Or blnCumul True Then
' annulation

RunCommand (acCmdUndo)
MsgBox "saisie interdite "
Else
' sauvegarde

RunCommand (acCmdSaveRecord)
MsgBox "saisie sauvegardée"

End If
Else
blnCumul = Cumul(intPersonne) 'appel de fonction
If blnCumul = True Then
' annulation
RunCommand acCmdUndo 'niveau de l'erreur

MsgBox "saisie interdite "
Else
' sauvegarde
RunCommand (acCmdSaveRecord) 'niveau de l'erreur

MsgBox "saisie sauvegardée"

End If
End If
End Sub

et voici l'erreur:
"erreur d'execution 2046
la commande "annuler n'est pas disponible pour l'instant
cause possibles:
base de donnée en lecture seule
ou
le type d'objet auquel s'aplique l'action n'est pas sélectionné pour l'instant
ou ne se trouve pas dans le mode actif.
n'utilisez que les commandes ou actions actuellement accessibles
pour cette base de donnée"

Précisions: la base n'est pas en lecture seule et
le record que j'essaie de sauver ou d'anuler dépend d'une table access
basique
mon formulaire lui contient des contrôles qui vont piocher dans
des tables attachées.

1 réponse

J'ai égalementle même problème, merci de mefaire savoir si et comment vous avez résolu celui-ci
0
Rejoignez-nous