ADO Recherche + ListView

Question

Salut...

J'ai trouv&#233; un code sur le site mais il est en DAO et j'ai de la difficult&#233; &#224; la comprendre.....

J'aimerais savoir comment est-il possible de faire apparaitre ma feuille Access dans un listview au d&#233;marage du programme ???

De plus, comment est-il possible de faire une recherche simple. En d'autre mo j'ai une BD avec plein de Num&#233;ro de Dossier et j'aimerais faire une recherche uniquement dans la colonne Dossier et avoir l'information qui s'y rattache dans mes diff&#233;rent textbox et &#233;galement dans mon ListView

Je n'ai aucun prob. &#224; me connecter &#224; ma base et &#224; utiliser les bouton Suivant, Pr&#233;c&#233;dent. mais je suis incapable trouver le code pour un recherche

merci d'avance

jpleroisse · Answer

Voici une m&#233;thode pour remplir une Listview avec le champ Name de la table Publishers de la BDD Biblio.mdb.

n'oublie pas Projet / R&#233;f&#233;rences Microsoft Activex Data Objects 2.6 Library et Microsoft DAO 3.6 Object  Library.

Private Sub Form_Load()
Dim adoConnection As ADODB.Connection
Dim adoRecordSet As ADODB.Recordset
Set adoConnection = New ADODB.Connection
Set adoRecordSet = New ADODB.Recordset
Dim ConnectionString As StringConnectionString "Provider Microsoft.Jet.OLEDB.3.51;" & " Data Source = C:\Program files\Microsoft Visual Studio\vb98\Biblio.mdb"
adoConnection.Open ConnectionString
adoRecordSet.Open "Publishers", adoConnection
Do Until adoRecordSet.EOF


ListView1.ListItems.Add = adoRecordSet!Name
adoRecordSet.MoveNext
Loop
adoRecordSet.Close
adoConnection.Close


Set adoConnection = Nothing
Set adoRecordSet = Nothing
End Sub

jpleroisse

ADO Recherche + ListView

1 réponse

Discussions similaires