Petit pb de recuperation de donnees dans textbox

Résolu
arigatoo Messages postés 5 Date d'inscription mercredi 25 mai 2005 Statut Membre Dernière intervention 19 août 2006 - 18 août 2006 à 07:36
arigatoo Messages postés 5 Date d'inscription mercredi 25 mai 2005 Statut Membre Dernière intervention 19 août 2006 - 19 août 2006 à 08:30
Bonjour !
je suis debutant en vb
et je realise actuellement une appli
mon pb après une requete qui me retourne une ligne avec plusieurs champs
je voudrais faire afficher la donnée retournée du premier champ dans  un textbox et ainsi de suite pour chaques champs
merci voici mon code actuel
'Connexion … la base



Connexion =




"Data Source=.\SQLEXPRESS;AttachDbFilename=|DataDirectory|\DBEleves.mdf;Integrated Security=True;User Instance=True"

ConnexionOle =




New
SqlConnectionConnexionOle.ConnectionString = Connexion

ConnexionOle.Open()

ds =


New
DataSet


'requette

da =




New
SqlDataAdapter(

"SELECT Mois.ID_Eleves,Mois.ID_Mois,Mois.Annee,Mois.Mois,Mois.[1] FROM Mois WHERE(Mois.Id_Eleves = '"
+

Me
.DataGridView1.CurrentCell.Value.ToString +

" ')"
, ConnexionOle)da.Fill(ds,


"Mois"
)

dv = ds.Tables(


"Mois"
).DefaultViewConnexionOle.Close()

'affichage

ID_ElevesTextBox.Text = dv(
"Mois.ID_Eleves"
).ToStringID_MoisTextBox.Text = dv(


"Mois.ID_Mois"
).ToStringAnneeTextBox.Text = dv(


"Mois.Annees"
).ToStringMoisTextBox.Text = dv(


"Mois.Mois"
).ToString_1TextBox.Text = dv(


"Mois.[1]"
).ToString

erreur retournée La conversion de la chaîne "Mois.ID_Eleves" en type 'Integer' n'est pas valide.
je pense que c'est une erreur d'ecriture de code je ne doit pas l'ecrire de la bonne façon
merci d'avance pour vos reponses



soleilou pluie

3 réponses

arigatoo Messages postés 5 Date d'inscription mercredi 25 mai 2005 Statut Membre Dernière intervention 19 août 2006
18 août 2006 à 16:48
j'ai resolu mon pb merci quand même


 


A+



soleilou pluie
3
troxsa Messages postés 553 Date d'inscription jeudi 28 novembre 2002 Statut Membre Dernière intervention 2 octobre 2016 1
18 août 2006 à 17:43
Salut


Pourrais tu au moins donner la solution,  si d'autre personne ce trouve dans le meme cas de figure que toi, ils auront une reponse toute suite :)

Cordialement,
http://www.troxsa.info/
Le site qui ne parle qu'un seul langage, visual basic 2005
3
arigatoo Messages postés 5 Date d'inscription mercredi 25 mai 2005 Statut Membre Dernière intervention 19 août 2006
19 août 2006 à 08:30
Bonjour


effectivement TroXsa j'aurais du y penser à la partager merci de me l'avoir rappelé
la voici 

'selection dans la table mois








Dim
strreq

As



String
"SELECT Mois.ID_Eleves,Mois.ID_Mois,Mois.Annee,Mois.Mois,Mois.[1] FROM Mois WHERE(Mois.Id_Eleves '"
+ ID_ElevesTextBox.Text +

" ')"

ConnexionOle.Open()







Dim
oCommand

As



New
SqlCommand(strreq, ConnexionOle)da =


New
SqlDataAdapter(oCommand)oCommand.Connection = ConnexionOle

ds1 =


New
DataSetda.Fill(ds1,


"Mois"
)dtable = ds1.Tables(


"Mois"
)ConnexionOle.Close()


'affichage






If
RowNumber < 0

Then



Exit



Sub






If
RowNumber > dtable.Rows.Count - 1

Then



Exit



Sub

ID_ElevesTextBox.Text = dtable.Rows(RowNumber).Item(




"ID_Eleves"
).ToStringID_MoisTextBox.Text = dtable.Rows(RowNumber).Item(


"ID_Mois"
).ToStringAnneeTextBox.Text = dtable.Rows(RowNumber).Item(


"Annee"
).ToStringMoisTextBox.Text = dtable.Rows(RowNumber).Item(


"Mois"
).ToString_1TextBox.Text = dtable.Rows(RowNumber).Item(


"1"
).ToString







soleilou pluie
0