Vb 6

merci bonne apetit je serai conecter

merci beaucou

vous etes tjrs là

// Dans Connextion avec la base et ouverture de table dans form_load//
Private Sub Form_Load()

// CNN_BASE_FILIER cette variable de base est déclaer dans Option Explicit//
CNN_BASE_FILIER.Provider = "Microsoft.jet.oledb.3.51"
CNN_BASE_FILIER.ConnectionString = "C:\..........\Filiere_form.mdb"
CNN_BASE_FILIER.Mode = adModeReadWrite
CNN_BASE_FILIER.Open

With TABL4_BASE_FILIER // cette variable de table est déclaer dans Option Explicit//
.ActiveConnection = CNN_BASE_FILIER
.CursorLocation = adUseClient
.CursorType = adOpenDynamic
.LockType = adLockPessimistic
.Open "NIVE_FORM", , , , adCmdTable
End With

(((((( attendez la 3iemmepartie)))))

end sub //Fin form_load//

avant de completer est ce que vous avez compris

j'ai cru que vous avez parti

wi je suis la

vous etes tjrs là

// Déclarer l'entete dans Form quand il sera active***// exemple que je vous donne voila premiere partie
Private Sub Form_Activate()
liste_Etud.Caption = ""
gestion.Caption = "I.N.F.Pro: Liste des Stagiaires"

Grille_ETU.Enabled = False
Grille_ETU.ColWidth(0) = 100

Grille_ETU.ColWidth(1) = 1500
Grille_ETU.Row = 0
Grille_ETU.Col = 1
Grille_ETU.Text = "N°Inscription"

Grille_ETU.ColWidth(2) = 2000
Grille_ETU.Row = 0
Grille_ETU.Col = 2
Grille_ETU.Text = "Nom du stagiaire"

Grille_ETU.ColWidth(3) = 2000
Grille_ETU.Row = 0
Grille_ETU.Col = 3
Grille_ETU.Text = "Prénom du stagiaire"

Grille_ETU.ColWidth(4) = 2000
Grille_ETU.Row = 0
Grille_ETU.Col = 4
Grille_ETU.Text = "Niveau d'Etude"

Grille_ETU.ColWidth(5) = 2000
Grille_ETU.Row = 0
Grille_ETU.Col = 5
Grille_ETU.Text = "N° de F.Prof."

End Sub // Fin Form //

wi je sais

avez vous comment on ouvre une table de base de donnée