1 2 3 4 5
| sql1 = "INSERT INTO " + Resultat_comptage_boucle + "(Nom_boucle, Nom_collecteur_boucle, Date_comptage, Heure_comptage, Unite_observation, Nombre_debit, Nombre_debit_PL, Nombre_vitesse, Nombre_taux_occupation, Campagne_de_mesure, Commentaires, Validite) "
sql2 = "SELECT Nom_boucle, Nom_collecteur_boucle, Date_comptage, Heure_comptage, Unite_observation, Nombre_debit, Nombre_debit_PL, "
sql3 = "Nombre_vitesse, Nombre_taux_occupation, Campagne_de_mesure, Commentaires, Validite FROM " + nomtable + ";"
sql = sql1 + sql2 + sql3
DoCmd.RunSQL sql |
Partager