cs_JMO
Messages postés1854Date d'inscriptionjeudi 23 mai 2002StatutMembreDernière intervention24 juin 2018
-
5 avril 2015 à 10:57
cs_JMO
Messages postés1854Date d'inscriptionjeudi 23 mai 2002StatutMembreDernière intervention24 juin 2018
-
5 avril 2015 à 11:48
Bonjour le Forum,
Je créé, dans un DataSet, deux tables issues de deux fichiers Excel.
Private da As OleDb.OleDbDataAdapter Private ds As DataSet = New DataSet
Dim MyConnexionCGN As OleDbConnection = New OleDbConnection _ (ConnectingExcel(MyFileCGN, "HDR=YES")) Dim MyQueryCGN As String = " SELECT * " & _ " FROM [Informations_CGN$] WHERE [Job] IS NOT NULL " & _ " ORDER BY [Environnement] ASC, [Application] ASC, [Job] ASC" MyConnexionCGN.Open() da = New OleDb.OleDbDataAdapter(MyQueryCGN, MyConnexionCGN) da.Fill(ds, "CGN") MyConnexionCGN.Close()
Dim MyConnexionPDP As OleDbConnection = New OleDbConnection _ (ConnectingExcel(MyFilePDP, "HDR=YES")) Dim MyQueryPDP As String = " SELECT * " & _ " FROM [Jobs$] WHERE [Job] IS NOT NULL " & _ " ORDER BY [Environnement] ASC, [Application] ASC, [Job] ASC" MyConnexionPDP.Open() da = New OleDb.OleDbDataAdapter(MyQueryPDP, MyConnexionPDP) da.Fill(ds, "PDP") MyConnexionPDP.Close()
Dans un premier temps, je souhaiterai :
- extraire les items [Environnement], [Application] et [JOB] qui sont dans chaque row de ma table (PDP) et qui ne sont pas dans ma table (CGN).
L'exemple de MSDN suggère une query au lieu de passer pas des boucles For ... Next.