[DAO] ALIMENTER UN LISTBOX AVEC UNE REQUÊTE SQL
klinux
Messages postés
4
Date d'inscription
jeudi 9 novembre 2000
Statut
Membre
Dernière intervention
16 juillet 2005
-
16 juil. 2005 à 13:01
cs_fring Messages postés 21 Date d'inscription mardi 5 juillet 2005 Statut Membre Dernière intervention 25 mars 2006 - 21 oct. 2006 à 13:13
cs_fring Messages postés 21 Date d'inscription mardi 5 juillet 2005 Statut Membre Dernière intervention 25 mars 2006 - 21 oct. 2006 à 13:13
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/32724-dao-alimenter-un-listbox-avec-une-requete-sql
https://codes-sources.commentcamarche.net/source/32724-dao-alimenter-un-listbox-avec-une-requete-sql
21 oct. 2006 à 13:13
11 mai 2006 à 14:00
10 mars 2006 à 04:36
4 févr. 2006 à 11:34
merci
tu peut m'aider comment avoir remplire le datgird a partir du requtte sql
31 juil. 2005 à 22:16
SVP aider moi. Visual Basic 6.0 seulement.
18 juil. 2005 à 19:32
Dans cet article sur msdn il est démontré qu'en effet la syntaxe ADO est légèrement différente de celle de DAO et RDO, et que DAO convient à de très petits projets -donc idéal pour les débutants qui découvrent un objet recordset.
J'étais surpris de lire que DAO ne suporte pas le DDL (donc ne supporte que le DML) ça aussi ça peut être bon à savoir.
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/html/vbconadocomparedwithrdodao.asp
18 juil. 2005 à 10:23
18 juil. 2005 à 08:23
Voilà un court extrait en ADO :
Dim oADO As ADODB.Connection
Dim oRS As ADODB.Recordset
Dim strPWD As String
Dim strSQL As String
Set oADO = New ADODB.Connection
'Dans le cas d'une DB avec un mot de passe
With oADO
.PROVIDER = "Microsoft.jet.oledb.4.0;Jet OLEDB:Database Password=" & strPWD
.Mode = adModeShareDenyNone
.ConnectionString = "D:\code\VB\DAO\TestBase.mdb"
.Open
End With
Set oRS = New ADODB.Recordset
strSQL = "SELECT nick FROM users ORDER BY nick"
With oRS
.CursorLocation = adUseClient
.Open strSQL, oADO, adOpenForwardOnly, adLockOptimistic
.Properties.Refresh
.MoveLast
.MoveFirst
Do While Not .EOF
List1.AddItem .Fields("Nick").value
.MoveNext
Loop
.Close
End With
oADO.Close
Set oRS = Nothing
Set oADO = Nothing
17 juil. 2005 à 06:18
16 juil. 2005 à 18:29
16 juil. 2005 à 16:55
Pour ce faire tu vas dans le menu Projet -> Références -> tu coches dans la liste 'Microsoft DAO 3.6 Object Library'
mythic_kruger > DAO est une technologie obsolète supplantée par ADO qui est bien plus puissant (mais pas aussi évident à manipuler). Certes DAO fonctionne toujours et son emploi est simple.
Je te conseille vivement de voir du côté de ADO et d'oublier DAO. Tout nouveau programme développé ne devrait plus utiliser DAO.
16 juil. 2005 à 13:01