Insertion de plusieurs enregistrements dans une table sql server

Dim cnx As New DataClasses1DataContext // connection à la base de données cnx
 
Dim Table1 AsTable1 = New Table1() //déclarations des tables
Dim Table2 AsTable2 = New Table1()
...
req3=From x in cnx.Table1 select x from Table1 where Condition... // requete de recuperation

For each x in req3 //Parcours de la requete pour enregistrer dans la Table2

     Table2.champ1= x1 //Affectation des enregistrements récupérer par req3 dans la Table2
     Table2.champ1= x2
     Table2.champ1= x3
     Table2.champ1= x4

Next

  cnx.Table.InsertAllOnSubmit(Table3) //insertion des données
  cnx.submitchanges