J'ai créer un formulaire qui m'affiche les enregistrements d'une table. Je voudrais créer un bouton sur ce formulaire qui a pour action de copier l'enregistrement courant dans une autre table ayant la même structure
Sur ton Bouton tu mets : Private Sub Commande9_Click() Dim strSQL As String strSQL = "Insert into Table2 select * from Table1 where ChampId =" & Me.ChampId & ";" CurrentDb.Execute strSQL 'copie tous les champs End Sub
Sur ton Bouton tu mets :
Private Sub Commande9_Click()
Dim strSQL As String
strSQL = "Insert into Table2 select * from Table1 where ChampId =" &
Me.ChampId & ";"
CurrentDb.Execute strSQL 'copie tous les champs
End Sub
Sur ton Bouton tu mets : Private Sub Commande9_Click() Dim strSQL As String strSQL = "Insert into Table2 select * from Table1 where ChampId =" & Me.ChampId & ";" CurrentDb.Execute strSQL 'copie tous les champs End Sub
A+ Eric
Alain
Pourquoi ca ne marche jamais quand j'essaie ?? Dans le code ci-dessous j'obtiens pour toute réponse "erreur de compilation" ! J'ai évidemment remplacé table 1 et table 2 par le nom de mes tables
action de copier l'enregistrement courant dans une autre table ayan la même structure.
Mais je n'arrive pas a le coder Merci pour votre aid Philipp
Bonjou
Sur ton Bouton tu mets : Private Sub Commande9_Click( Dim strSQL As Strin strSQL = "Insert into Table2 select * from Table1 where ChampId =" & Me.ChampId & "; CurrentDb.Execute strSQL 'copie tous les champ End Su
A Eri
Pourquoi ca ne marche jamais quand j'essaie ??
Dans le code ci-dessous j'obtiens pour toute réponse "erreur de compilation" ! J'ai évidemment remplacé table 1 et table 2 par le nom de mes tables
action de copier l'enregistrement courant dans une autre table ayan
la même structure.
Mais je n'arrive pas a le coder
Merci pour votre aid
Philipp
Bonjou
Sur ton Bouton tu mets :
Private Sub Commande9_Click(
Dim strSQL As Strin
strSQL = "Insert into Table2 select * from Table1 where ChampId =" &
Me.ChampId & ";
CurrentDb.Execute strSQL 'copie tous les champ
End Su
Pourquoi ca ne marche jamais quand j'essaie ?? Dans le code ci-dessous j'obtiens pour toute réponse "erreur de compilation" ! J'ai évidemment remplacé table 1 et table 2 par le nom de mes tables
action de copier l'enregistrement courant dans une autre table ayan la même structure.
Mais je n'arrive pas a le coder Merci pour votre aid Philipp
Bonjou
Sur ton Bouton tu mets : Private Sub Commande9_Click( Dim strSQL As Strin strSQL = "Insert into Table2 select * from Table1 where ChampId =" & Me.ChampId & "; CurrentDb.Execute strSQL 'copie tous les champ End Su
A Eri
3stone
Salut,
"Alain"
Pourquoi ca ne marche jamais quand j'essaie ?? Dans le code ci-dessous j'obtiens pour toute réponse "erreur de compilation" ! J'ai évidemment remplacé table 1 et table 2 par le nom de mes tables.
Où est le problème alors ? Merci pour la réponse.
As tu coché la référence DAOxxx et placée devant ADO ?
-- A+ Pierre (3stone) Access MVP ----------------------------- http://users.skynet.be/mpfa -----------------------------
Salut,
"Alain"
Pourquoi ca ne marche jamais quand j'essaie ??
Dans le code ci-dessous j'obtiens pour toute réponse "erreur de compilation" ! J'ai évidemment
remplacé table 1 et table 2 par le nom de mes tables.
Où est le problème alors ? Merci pour la réponse.
As tu coché la référence DAOxxx et placée devant ADO ?
--
A+
Pierre (3stone) Access MVP
-----------------------------
http://users.skynet.be/mpfa
-----------------------------
Pourquoi ca ne marche jamais quand j'essaie ?? Dans le code ci-dessous j'obtiens pour toute réponse "erreur de compilation" ! J'ai évidemment remplacé table 1 et table 2 par le nom de mes tables.
Où est le problème alors ? Merci pour la réponse.
As tu coché la référence DAOxxx et placée devant ADO ?
-- A+ Pierre (3stone) Access MVP ----------------------------- http://users.skynet.be/mpfa -----------------------------
