OVH Cloud OVH Cloud

Ecrire dans une table indépendante

10 réponses
Avatar
Luis
Bonjour,
J'ai une case =E0 cocher dans un formulaire et j'aimerai=20
qu'au moment ou ^l'on clique la case =E0 cocher la=20
valeur "1" s'=E9crive dans une table ind=E9pendante du=20
formulaire.
J'ai d=E9j=E0 fais =E7a mais j'ai l'impression de jamais l'avoir=20
fait, car c'est le blanc.
Merci pour votre aide.
Luis

10 réponses

Avatar
Raymond [mvp]
Bonjour luis.

sur l'afterupdate de la case, tu lances l'exécution d'une requête
modification.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Luis" a écrit dans le message de
news:b85401c48923$136f52e0$
Bonjour,
J'ai une case à cocher dans un formulaire et j'aimerai
qu'au moment ou ^l'on clique la case à cocher la
valeur "1" s'écrive dans une table indépendante du
formulaire.
J'ai déjà fais ça mais j'ai l'impression de jamais l'avoir
fait, car c'est le blanc.
Merci pour votre aide.
Luis
Avatar
Buddy
Salut
Essaies ça

Dim strSQL As String
strSQL = "UPDATE NomTableIndependante SET TonChamp=1 WHERE Id=" & lngId &
";"
DoCmd.SetWarnings False
Docmd.RunSQL strSQL
DoCmd.SetWarnings True

Ouala
Bye
Buddy

"Luis" a écrit dans le message de
news:b85401c48923$136f52e0$
Bonjour,
J'ai une case à cocher dans un formulaire et j'aimerai
qu'au moment ou ^l'on clique la case à cocher la
valeur "1" s'écrive dans une table indépendante du
formulaire.
J'ai déjà fais ça mais j'ai l'impression de jamais l'avoir
fait, car c'est le blanc.
Merci pour votre aide.
Luis
Avatar
Bonjour Raymond,
C'est ce que j'avais essayé de faire, mais ça ne marche
pas.

UPDATE MaTable SET MaTable.ID = [MonChamp]*1 WITH
OWNERACCESS OPTION;

A moins que je sois dans le cirage.
Luis

-----Message d'origine-----
Bonjour luis.

sur l'afterupdate de la case, tu lances l'exécution d'une
requête

modification.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Luis" a écrit dans
le message de

news:b85401c48923$136f52e0$
Bonjour,
J'ai une case à cocher dans un formulaire et j'aimerai
qu'au moment ou ^l'on clique la case à cocher la
valeur "1" s'écrive dans une table indépendante du
formulaire.
J'ai déjà fais ça mais j'ai l'impression de jamais l'avoir
fait, car c'est le blanc.
Merci pour votre aide.
Luis


.



Avatar
Raymond [mvp]
Tu as dit que tu voulais mettre la valeur 1, pourquoi [MonChamp]*1
MaTable.ID ne serait pas la clé primaire par hasard, tout à fait par hasard
?

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


a écrit dans le message de
news:b8fc01c4892b$793a9d20$
Bonjour Raymond,
C'est ce que j'avais essayé de faire, mais ça ne marche
pas.

UPDATE MaTable SET MaTable.ID = [MonChamp]*1 WITH
OWNERACCESS OPTION;

A moins que je sois dans le cirage.
Luis
Avatar
Luis
Bonjour,
Oui, tu as raison MaTable.ID est la clé primaire.
Mais j'avais essayé ça et ça ne marche pas non plus:
UPDATE MaTable SET MaTable.id = [MonChamp]="1" WITH
OWNERACCESS OPTION;

Luis
-----Message d'origine-----
Tu as dit que tu voulais mettre la valeur 1, pourquoi
[MonChamp]*1

MaTable.ID ne serait pas la clé primaire par hasard, tout
à fait par hasard

?

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


a écrit dans le
message de

news:b8fc01c4892b$793a9d20$
Bonjour Raymond,
C'est ce que j'avais essayé de faire, mais ça ne marche
pas.

UPDATE MaTable SET MaTable.ID = [MonChamp]*1 WITH
OWNERACCESS OPTION;

A moins que je sois dans le cirage.
Luis


.



Avatar
Raymond [mvp]
Tu ne pense pas que ta requête serait plutôt de ce genre:
UPDATE MaTable SET MaTable.MonChamp = 1
WHERE MaTable.Numéro = [Formulaires]![Formulaire1]![Numéro]
WITH OWNERACCESS OPTION;

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Luis" a écrit dans le message de
news:b93801c4892e$e9bd1340$
Bonjour,
Oui, tu as raison MaTable.ID est la clé primaire.
Mais j'avais essayé ça et ça ne marche pas non plus:
UPDATE MaTable SET MaTable.id = [MonChamp]="1" WITH
OWNERACCESS OPTION;
Avatar
Luis
Re-bonjour,
Oui tu as raison, mais pourquoi une
erreur de compilation
Attendu fin d'instruction
Et
SET en surbrillance
Luis
-----Message d'origine-----
Tu ne pense pas que ta requête serait plutôt de ce genre:
UPDATE MaTable SET MaTable.MonChamp = 1
WHERE MaTable.Numéro = [Formulaires]![Formulaire1]!
[Numéro]

WITH OWNERACCESS OPTION;

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Luis" a écrit dans
le message de

news:b93801c4892e$e9bd1340$
Bonjour,
Oui, tu as raison MaTable.ID est la clé primaire.
Mais j'avais essayé ça et ça ne marche pas non plus:
UPDATE MaTable SET MaTable.id = [MonChamp]="1" WITH
OWNERACCESS OPTION;



.



Avatar
Raymond [mvp]
comme je l'ai indiqué ça doit fonctionner. tu as dû faire une erreur à
quelque part.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Luis" a écrit dans le message de
news:bb4b01c48931$d5a88350$
Re-bonjour,
Oui tu as raison, mais pourquoi une
erreur de compilation
Attendu fin d'instruction
Et
SET en surbrillance
Luis
Avatar
Luis
Re-Bonjour Raymond,
Quand on est aveugle et bête on ne change pas!!!
Je t'explique pourquoi ça bogue, j'avais mis la requête
dans le code au lieu de mettre la commande de la requête.
Tout fonctionne maintenant.
Merci Raymond.
Luis
-----Message d'origine-----
Tu ne pense pas que ta requête serait plutôt de ce genre:
UPDATE MaTable SET MaTable.MonChamp = 1
WHERE MaTable.Numéro = [Formulaires]![Formulaire1]!
[Numéro]

WITH OWNERACCESS OPTION;

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Luis" a écrit dans
le message de

news:b93801c4892e$e9bd1340$
Bonjour,
Oui, tu as raison MaTable.ID est la clé primaire.
Mais j'avais essayé ça et ça ne marche pas non plus:
UPDATE MaTable SET MaTable.id = [MonChamp]="1" WITH
OWNERACCESS OPTION;



.



Avatar
Luis
Bonjour,
J'ai instruction SQL non valide.
Luis
-----Message d'origine-----
Salut
Essaies ça

Dim strSQL As String
strSQL = "UPDATE NomTableIndependante SET TonChamp=1
WHERE Id=" & lngId &

";"
DoCmd.SetWarnings False
Docmd.RunSQL strSQL
DoCmd.SetWarnings True

Ouala
Bye
Buddy

"Luis" a écrit dans
le message de

news:b85401c48923$136f52e0$
Bonjour,
J'ai une case à cocher dans un formulaire et j'aimerai
qu'au moment ou ^l'on clique la case à cocher la
valeur "1" s'écrive dans une table indépendante du
formulaire.
J'ai déjà fais ça mais j'ai l'impression de jamais l'avoir
fait, car c'est le blanc.
Merci pour votre aide.
Luis


.