Discussion :

[gueguen23]

Bonjour...c'est la première fois que je depose un post mais j'ai l'habitude de consulter ce forum pour m'aider...

Tout d'abord, sachez que j'ai consulté tous les posts sur le forum et d'autres encore à ce sujet...j'ai beau suivre le code lettre par lettre, ca ne fonctionne pas.
Voici ma fonction qui permet de remplir ma listbox..à partir d'une table Access.

Sub RemplirListBoxNtrav1()

Dim sSQL As String
Dim drNtrav As OleDbDataReader
Dim cmdSelect As OleDbCommand = New OleDbCommand

OuvrirConnexion()

sSQL = "SELECT N° type travaux, Lib type travaux"
sSQL &= " FROM NATURE TRAVAUX"

With cmdSelect
.Connection = cnBdD
.CommandType = CommandType.Text
.CommandText = sSQL
drNtrav = .ExecuteReader
End while


While drNtrav.Read()
ListBoxNtrav1.Items.Add(drNtrav!N__type_travaux)
ListBoxNtrav1.Items.Add(drNtrav!Lib_type_travaux)
End While

drNtrav.Close()

FermerConnexion()
End Sub

Alors, ca beug sur "drNtrav = .ExecuteReader" et ca m'affiche "Une exception non gérée du type "System.Data.oledb.oledbException" s'est produite dans system.data.dll"

J'ai essayé differentes façons d'ecrire mon code par rapport à ce que j'ai lu sur le net et j'ai aussi le book Visual Basic.NET de chez Micro Application pour m'aider.....mais toujours en vain..
D'ailleurs, j'ai le même soucis avec les combobox. Mais cela figurera dans un autre post.
Je vous remercie d'avance pur votre aide.[/b]

[Noodles]

T'aurais pas un peu plus de détails sur ton exception?, genre le message d'erreur?

[gueguen23]

Non désolé...c'est le seul message d'erreur...
Je sais juste que mon "drNtrav" a une valeur nothing...
C'est tout ce que j'ai...

[Noodles]

Même en débuggant tu peux pas aller voir le message de l'exception?

Moi ce qui me semble bizarre, c'est les noms de tes champs dans ta requête...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

sSQL = "SELECT N° type travaux, Lib type travaux"

C'est des noms de champs ca?

En même temps je connais pas Access mais ca me semble louche...

[_51]

t'es sur de ta requete ?
il me semble que sous access les noms de tables contenant des espaces ou caracteres speciaux doivent etre entre crochet.

[gueguen23]

Oui ce sont des bien des noms de champ...il n'y a aucun problème sous Access...par contre en VB.NET, je sais qu'il interprète differamment les espaces...

Sinon j'ai donc mis entre crochets mes champs et ma table...je n'ai plus la même erreur...
il bug désormais sur cette ligne :
ListBoxNtrav1.Items.Add(drNtrav!N__type_travaux)

Et, j'ai ce message :
Une exception non gérée du type "System.IndexOutOfRange.Exception" s'est produite dans System.data.dll
Informations complementaires: N__type_travaux

Peut-etre est-ce un problème de syntaxe suite aux espaces et aux caractères speciaux comme °...
J'ai lu dans un post qu'il fallait les remplacer par des " mais ca ne fonctionne pas.
En tout cas merci de votre aide.

[gueguen23]

Ca y est ....ca fonctionne!
J'ai seulement renommé tous mes champs de ma base Access en supprimant les espaces et les caractères speciaux...et ca marche....
Merci beaucoup pour votre aide...