Bonjour, Je vous expose mon probleme, Je veux créer une gestion d'agence de voyage en VB.NET (j'utilise Visual Basic 2005). https://i27.servimg.com/u/f27/11/81/45/98/forum11.jpg J'aimerai que quand je clique sur un index (2) le Label en bas de la page (1) se mete à jour en fonction de sur quoi j'ai cliquez. Le texte doit s'afficher en fonction de ce que j'ai rentrer dans une base de donnée access. Je suis obligé de vous demandez ici car le prof ne sait absolument pas comment faire ^^. Voila merci d'avance. Voila le code que j'ai taper jusqu'a maintenant : Imports System.Data Imports System.Data.OleDb Public Class Form2 Private MyConnexion As OleDb.OleDbConnection Private Sub FormCategorie_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load MyConnexion = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data source=" + _ "C:\Users\Noir\Desktop\APPDONNEE\voyages2004.mdb") MyConnexion.Open() End Sub Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Try Dim Mycommand As OleDb.OleDbCommand = MyConnexion.CreateCommand() Mycommand.CommandText = "SELECT CodeVoyage, Destination, Duree, Prix FROM tVoyages" Dim myReader As OleDbDataReader = Mycommand.ExecuteReader() ListView1.Items.Clear() Do While myReader.Read() Dim ListView As New ListViewItem ListView.Text = myReader.GetString(0) ListView.SubItems.Add(myReader.GetString(1)) ListView.SubItems.Add(myReader.GetInt16(2)) ListView.SubItems.Add(myReader.GetValue(3)) ListView1.Items.Add(ListView) Loop myReader.Close() Catch ex As Exception MsgBox(ex.Message) End Try End Sub Private Sub ListView1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListView1.SelectedIndexChanged Try Dim Mycommand As OleDb.OleDbCommand = MyConnexion.CreateCommand() Mycommand.CommandText = "SELECT Description FROM tVoyages WHERE " Dim myReader As OleDbDataReader = Mycommand.ExecuteReader() Do While myReader.Read() Label1.Text = "" Label1.Text = myReader.GetString(0) Loop myReader.Close() Catch ex As Exception MsgBox(ex.Message) End Try End Sub End Class PS : Désolé pour la longeur.

Est-ce que cette requete : SELECT Description FROM tVoyages WHERE COD_VOYAGE='5' A un sens dans ta base ? Je veux dire, existe t-il un enregistrement pour COD_VOYAGE = 5 ?

Oui ça il n'y a aucun problème.

Bah c'est pas grave je vais cgercher encore un peu. En tout cas merci beaucoup de ton aide. Bonne journée.

Probleme de Listview en VB.NET - Page 2

Réponse 21 / 24
Scalpweb Messages postés 1483 Statut Membre 43

Est-ce que cette requete :

SELECT Description FROM tVoyages WHERE COD_VOYAGE='5'

A un sens dans ta base ?

Je veux dire, existe t-il un enregistrement pour COD_VOYAGE = 5 ?
0
Réponse 22 / 24
kirin54

Oui ça il n'y a aucun problème.
0
Réponse 23 / 24
Scalpweb Messages postés 1483 Statut Membre 43

Alors là je bloque...
0
Réponse 24 / 24
kirin54

Bah c'est pas grave je vais cgercher encore un peu.
En tout cas merci beaucoup de ton aide. Bonne journée.
0

Discussions similaires

fonction substring en vb

[VB.NET] Afficher dans une listview

verifier une valeur dans listview en vb.net

[VB.NET] Sélection ligne entière ListView

[vb net] ouvrir fichier excel

Forum Framework .NET

Newsletters

Actu du jour

Voir un exemple