Filtrage structure avec requette sql
Bonjour,
J'utilise la structure suivante :
Code:
1 2 3 4 5 6 7 8 9
|
Public Structure Categorie
Public code_categorie As String
Public code_sscategorie As String
Public libelle As String
End Structure
Public les_categories As New List(Of Categorie)
Public les_categories_a_creer As New List(Of Categorie) |
J'utilise la requette sql suivante pour récupérer toutes les catégories de niveau 1 ( sans code_sous_catégorie).
Code:
1 2
|
select caption,supplierid,xx_code from itemfamily where coalesce(xx_code,0)<>0 |
Mon problème est que je voudrais filtrer les catégories dont le xx_code n'existe pas dans la base de données.
la liste "les_categories " est remplis avec toutes les catégorie qui sont présent dans un fichier qui m'est envoyer toutes les jours.
Le xx_code correspond au code_categorie de la structure.
j'utilise le code suivant, mais il ne fonctionne pas il me crée des catégories qui existent déjà.
Avez-vous une idée de comment faire pour que je ne crée que les catégories qui n'existent pas dans la base de données ?
les catégories a créé seront stocker dans une autre structure afin de faire un autre trie dedans.
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27
|
If result_sql.Count > 0 Then
Dim code_categorie As String
Dim une_categorie_a_creer As New Categorie
For Each row As DataRowView In result_sql
code_categorie = row("xx_code")
For i = 0 To les_categories.Count - 1
ajout = True
If les_categories.Item(i).code_categorie = code_categorie And les_categories.Item(i).code_sscategorie = "" Then
ajout = False
End If
If ajout Then
une_categorie_a_creer.code_categorie = code_categorie
une_categorie_a_creer.code_sscategorie = les_categories.Item(i).code_sscategorie
une_categorie_a_creer.libelle = les_categories.Item(i).libelle
les_categories_a_creer.Add(une_categorie_a_creer)
une_categorie_a_creer = Nothing
Exit For
End If
Next
Next
end if |