Bonjour,
j'ai une requête SQL
Code : Sélectionner tout - Visualiser dans une fenêtre à part
MySql = "SELECT * FROM ..."
que j'exécute avec le code

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
MySql = "SELECT * FROM ..." 
Set rs = cnx.Execute(MySql)
Ensuite j'efface le contenu de ma table ACCESS avec la requête

Code : Sélectionner tout - Visualiser dans une fenêtre à part
DoCmd.RunSQL "DELETE * FROM T_TMP "
Ma question est la suivante :
J'ai envie de remplir ma table T_TMP qui contient 27 colonnes avec tous les enregistrements de la requête SQL rexécuté avec le rs ci-dessus. Le souci c'est que 27 colonnes c'est beaucoup; càd que je ne pourrai pas mettre :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
If rs.EOF Then Exit Sub
   rs.MoveFirst
While Not (rs.EOF)
 
DoCmd.RunSQL "INSERT INTO T_TMP (col1, col2...,col27) VALUES ('" + rs.Fields(1) + "','" + rs.Fields(2) + "'...'" + rs.Fields(27) + "')"
    rs.MoveNext
Wend
il doit y avoir des solution avec des fld.name que je ne MAITRISE PAS malheureusement...
HELP PLZ