Discussion :

[bestofbasile]

Bonjour,

J'ai une base de donnée toute simple sur accès 2007.
J'ai une Table "Etablissement." et une table "Controle_Fichiers"

Je souhaite lorsque je clique sur un bouton dans un formulaire, créer dans la table "Controle_Fichiers" autant d'enregistrement que d'établissements présent dans la 1ere table, tout en forcant les autres champs

Voici rapidement la structure des deux tables:

Table Etablissement:

Numéroetab
Libelleetab

Table Controle_Fichiers:

Numéroetab
Libelleetab
DateIntegration
StatusIntegration

Je pensait faire ca avec une requette d'ajout mais je ne sais pas le faire.
Si vous pensez que la requette d'ajout n'est pas la meilleur solution, je suis a l'écoute de vos propositions.

J'espére avoir été clair.

Merci d'avance pour votre aide.

[Taoueret]

Sur click sur ton bouton de formulaire, tu peux définir une procédure VBA

Dans cette procédure, tu peux écrire ta requête d'insert :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
 
public Sub monBouton_Click()
     dim rs as recordset
     dim sql as string
 
     'definition d'un pointeur vers ta table Etablissement
     set rs = currentdb.openRecordset("Etablissement")
 
     'tu parcours tous tes enregistrements de Etablissements et pour chaque, tu insère un enregistrement dans Controle_fichiers
     While not rs.EOF
          sql= "insert into Controle_Fichiers(Numéroetab,Libelleetab,DateIntegration) values (" &rs!Numéroetab &",'" &rs!Libelleetab &"'," &date() &")"
 
          'execution de la requete
          docmd.runSQL(sql)
 
          'passage à l'enregistrement suivant
          rs.movenext
     wend
     rs.close
end Sub

[bestofbasile]

je vais tester ca et je te tient au courrant

Merci Beaucoup