Discussion :

[melancolie]

bonjour, je sors de vb6. je veux m'initier à VS 2010. comment je peux arranger ce code pour afficher dans des textbox les champs matricule, nom et prenom

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Public Class Form1
    Dim conn As ADODB.Connection
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        conn = New ADODB.Connection
        conn.CursorLocation = ADODB.CursorLocationEnum.adUseClient
        conn.Open("PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=C:\LOGICIELS DE GESTION HI\GESTCOM LEHI\GESTOCK.mdb;Jet OLEDB:Database Password=onohio;")
 
        Dim RK As New ADODB.Recordset
        RK.Open("SELECT * FROM PERSONNEL", conn)
        MATRICULE.Text = RK!Matricule
        NOM.Text=RK!Nom
        PRENOM.Text=RK!Prenom
    End Sub
End Class

je crois que la partie ci-dessous doit pas être correcte

Code :

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

1
2
3
MATRICULE.Text = RK!Matricule
        NOM.Text=RK!Nom
        PRENOM.Text=RK!Prenom

[bellak]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
private OleDbConnection Conn = new OleDbConnection();
private string BDDPath = "Chemin de la BDD";
private string ConnString;
 
this.ConnString = "Provider=Microsoft.Jet.OLEDB.4.0;" + "Data Source=" + this.BDDPath;
this.Conn.ConnectionString = this.ConnString;
 
string Sql = "SELECT ...";
OleDbDataAdapter ADAPT = new OleDbDataAdapter(Sql, Conn);
ADAPT.Fill(DTset, "table"); // la j'ai utilisé les dataset 
this.Conn.Close();

on peut pas mettre dans un textbox l'ensemble des enregistrements , si tu veux afficher que le premier :

Code :

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

1
2
3
4
 
MATRICULE.Text = DTset.Tables["table"].Rows[0]["matricule"]
NOM.Text=DTset.Tables["table"].Rows[0]["nom"]
PRENOM.Text=DTset.Tables["table"].Rows[0]["PRENOM"]