OVH Cloud OVH Cloud

REQUETE MAJ

6 réponses
Avatar
Marie Annick ROULLAND
Bonjour à tous,

J'ai une base de données que je dois partager avec quelqu'un qui ne connaît
pas Acces, donc j'essaie de lui faire un menu tip top pour que ce soit
facile pour lui.........mais évidemment j'ai un problème car à un moment
j'ai besoin d'effectuer une requête Mise à Jour et je ne veux pas qu'il
sorte du menu, peut on faire un formulaire ou autre avec des questions pour
que la requête s'exécute sans qu'il ait besoin d'aller dans requête :
modifier.

Si quelqu'un peut m'aider ????

6 réponses

Avatar
jf_chapuis
Tu peux via du code lancer une requête MAJ par

Currentdb.execute "nomdetarequete".

Il suffit de mettre ton code derrière un événement
approprié (événement de formulaire, de contrôle)



-----Message d'origine-----
Bonjour à tous,

J'ai une base de données que je dois partager avec
quelqu'un qui ne connaît

pas Acces, donc j'essaie de lui faire un menu tip top
pour que ce soit

facile pour lui.........mais évidemment j'ai un problème
car à un moment

j'ai besoin d'effectuer une requête Mise à Jour et je ne
veux pas qu'il

sorte du menu, peut on faire un formulaire ou autre avec
des questions pour

que la requête s'exécute sans qu'il ait besoin d'aller
dans requête :

modifier.

Si quelqu'un peut m'aider ????


.



Avatar
Pierre CFI [mvp]
bonjour
oui bien sur, tu peux toujours créer un bouton qui execute la req

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Marie Annick ROULLAND" a écrit dans le message de news:
Bonjour à tous,

J'ai une base de données que je dois partager avec quelqu'un qui ne connaît
pas Acces, donc j'essaie de lui faire un menu tip top pour que ce soit
facile pour lui.........mais évidemment j'ai un problème car à un moment
j'ai besoin d'effectuer une requête Mise à Jour et je ne veux pas qu'il
sorte du menu, peut on faire un formulaire ou autre avec des questions pour
que la requête s'exécute sans qu'il ait besoin d'aller dans requête :
modifier.

Si quelqu'un peut m'aider ????




Avatar
Marie Annick ROULLAND
Oui , mais il faut modifier à chaque fois un numéro dans mise à jour, alors
je ne peux pas faire qu'une exécution, il faut d'abord renseigner le critère
MAJ....


"Pierre CFI [mvp]" a écrit dans le message de
news:
bonjour
oui bien sur, tu peux toujours créer un bouton qui execute la req

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Marie Annick ROULLAND" a écrit dans le
message de news:

Bonjour à tous,

J'ai une base de données que je dois partager avec quelqu'un qui ne
connaît


pas Acces, donc j'essaie de lui faire un menu tip top pour que ce soit
facile pour lui.........mais évidemment j'ai un problème car à un moment
j'ai besoin d'effectuer une requête Mise à Jour et je ne veux pas qu'il
sorte du menu, peut on faire un formulaire ou autre avec des questions
pour


que la requête s'exécute sans qu'il ait besoin d'aller dans requête :
modifier.

Si quelqu'un peut m'aider ????








Avatar
Pierre CFI [mvp]
.../...
le plus simple est de faire une req paramétrée exemple [saisir la valeur]
mais tu peux faire plus élaborée, dans un form, une zone de texte dans laquelle on saisit la valeur et un bouton qui lance la req en
tenant compte de cette donnée
tu sais faire çà ? donne le sql de ta req

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Marie Annick ROULLAND" a écrit dans le message de news:
Oui , mais il faut modifier à chaque fois un numéro dans mise à jour, alors
je ne peux pas faire qu'une exécution, il faut d'abord renseigner le critère
MAJ....


"Pierre CFI [mvp]" a écrit dans le message de
news:
bonjour
oui bien sur, tu peux toujours créer un bouton qui execute la req

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Marie Annick ROULLAND" a écrit dans le
message de news:

Bonjour à tous,

J'ai une base de données que je dois partager avec quelqu'un qui ne
connaît


pas Acces, donc j'essaie de lui faire un menu tip top pour que ce soit
facile pour lui.........mais évidemment j'ai un problème car à un moment
j'ai besoin d'effectuer une requête Mise à Jour et je ne veux pas qu'il
sorte du menu, peut on faire un formulaire ou autre avec des questions
pour


que la requête s'exécute sans qu'il ait besoin d'aller dans requête :
modifier.

Si quelqu'un peut m'aider ????












Avatar
Marie Annick ROULLAND
voilà le SQL, merci de m'aider.....


UPDATE Navires INNER JOIN (Motif INNER JOIN (Client INNER JOIN Vente ON
Client.[N°Client] = Vente.[N°_Client]) ON Motif.[N°MotifRégul] Vente.[N°_Motif]) ON Navires.[N°Navire] = Vente.[N°Navire] SET Vente.[N°
GERANCE] = "35"
WHERE (((Navires.Navire) Like [Quel Navire]) AND ((Vente.[Mois gérance])
Like [Quelle date]));
Avatar
Pierre CFI [mvp]
donc un form indépendant avec une zone de texte, nommée Txt_depart
un bouton
sur le clic du bouton

sub .......clic()
dim dep
dep = inputbox("Saisir le no du département")
if dep = "" then exit sub 'annulé
'// là on vérifie si num département
if val(dep) > 0 and val(dep) <= 95 then

else
msgbox "Erreur de département"
exit sub
end if
currentdb.execute "UPDATE Navires INNER JOIN (Motif INNER JOIN (Client INNER JOIN Vente ON
Client.[N°Client] = Vente.[N°_Client]) ON Motif.[N°MotifRégul] Vente.[N°_Motif]) ON Navires.[N°Navire] = Vente.[N°Navire] SET Vente.[N°
GERANCE] = '" & MeTxt_depart & "' WHERE (((Navires.Navire) Like [Quel Navire]) AND ((Vente.[Mois gérance]) Like [Quelle date]));"
'// tout sur une ligne
end sub
ta macro ne sert plus
--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Marie Annick ROULLAND" a écrit dans le message de news:
voilà le SQL, merci de m'aider.....


UPDATE Navires INNER JOIN (Motif INNER JOIN (Client INNER JOIN Vente ON
Client.[N°Client] = Vente.[N°_Client]) ON Motif.[N°MotifRégul] > Vente.[N°_Motif]) ON Navires.[N°Navire] = Vente.[N°Navire] SET Vente.[N°
GERANCE] = "35"
WHERE (((Navires.Navire) Like [Quel Navire]) AND ((Vente.[Mois gérance])
Like [Quelle date]));