bonjour,
encore besoin de vous 2 toutes petites questions
1)cette commande: strsql = "Delete from " & MaTable & " where N° = " &
MonNuméro
j'ai fais cette commenade pour efacer l'enregistrement en cours (sur lequel
je suis positionné)
est-ce correct?, je pense que la clause WHERE recherche à travers toute la
base non?
si une erreur, quel est la bonne syntaxe pour supprimer UNIQUEMENT
l'enregistrement sur lequel ont est postionné?
2) Question = "entrez le nom de la table."
MaTable = InputBox(Question, "Demande d'informations ")
On Error GoTo fin:
'on ouvre la table choisie
Set t1 = CurrentDb.OpenRecordset(MaTable)
je désirerai pouvoir ouvrir une table au choix à l'aide des boîtes
standard de dialogue de Windows, est-ce SHOWOPEN? si oui la méthode est-elle
la même qu'en VB6? faut-il insérer la réference COMMON DIALOG ?
viens d'essayer ta solution Eric, ne fonctionne pas!
Si, si, je te promets ca marche très bien ... t1.movefirst While not t1.eof t1.delete t1.movenext Wend
je peux te garantir que ca supprime tous les enregistrements de t1
Eric
Pascal
Salut eric, toutes mes excuses, cela fonctionne éffectivement très bien j'avais une petite erreur dans le code une condition mal écrite merci à toi Pascal
Pour 3 stones, je retiens le Dynaset, merci à toi également
Pascal
"Eric" a écrit dans le message de news:
Re Pascal
viens d'essayer ta solution Eric, ne fonctionne pas!
Si, si, je te promets ca marche très bien ... t1.movefirst While not t1.eof t1.delete t1.movenext Wend
je peux te garantir que ca supprime tous les enregistrements de t1
Eric
Salut eric,
toutes mes excuses, cela fonctionne éffectivement très bien
j'avais une petite erreur dans le code une condition mal écrite
merci à toi
Pascal
Pour 3 stones, je retiens le Dynaset, merci à toi également
Pascal
"Eric" <f_framZZ@hotmail.com> a écrit dans le message de
news:XnF9509B06711077fframZZhotmailcom@207.46.248.16...
Re Pascal
viens d'essayer ta solution Eric, ne fonctionne pas!
Si, si, je te promets ca marche très bien
...
t1.movefirst
While not t1.eof
t1.delete
t1.movenext
Wend
je peux te garantir que ca supprime tous les enregistrements de t1
Salut eric, toutes mes excuses, cela fonctionne éffectivement très bien j'avais une petite erreur dans le code une condition mal écrite merci à toi Pascal
Pour 3 stones, je retiens le Dynaset, merci à toi également
Pascal
"Eric" a écrit dans le message de news:
Re Pascal
viens d'essayer ta solution Eric, ne fonctionne pas!
Si, si, je te promets ca marche très bien ... t1.movefirst While not t1.eof t1.delete t1.movenext Wend
je peux te garantir que ca supprime tous les enregistrements de t1
