voilà bonjour à tous je suis tres debutante en vb et voici mon probleme
dans le form1 j'ai un bouton "AFFICHER" qui affiche les etudiants à partir d'une bd access moi je veux qu'il m'affiche les etudiante dans un autre form
donc j'ai mis
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Private Sub Command5_Click()
Form2.Show
End Sub
maintenant je veux savoir ce que je dois mettre dans le FORM2
et voilà le code que je veux integrer dans le FORM2
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
16
17
18
19
20
21
22
Private Sub afficher_Click()
'creer une connection
Set cn = New Connection
cn.Open "DSN=base"
Dim rs As New Recordset
Set rs.ActiveConnection = cn
rs.Open "select [code_e],[nom_e],[prenom_e],[adress],[tel],[date_nais],[lieu_nais],[code_sess],[code_op],[code_dep] from etudiant"
Do While Not rs.EOF
code.AddItem rs("code_e")
nom.AddItem rs("nom_e")
prenom.AddItem rs("prenom_e")
adresse.AddItem rs("adress")
telephone.AddItem rs("tel")
date_nais.AddItem rs("date_nais")
lieu_nais.AddItem rs("lieu_nais")
code_sess.AddItem rs("code_sess")
code_op.AddItem rs("code_op")
code_dep.AddItem rs("code_dep")
 
rs.MoveNext
Loop
rs.Close
merci d'avance