trouvé ce que je recherchais
'**********************************************************************
'Manuscrit de Visual Basic ActiveX
'**********************************************************************
Force de fonction ()
Faibles objRs
Faible objConn
Faible strSql
Faible strHtml
Placer l'objConn = le CreateObject (« ADODB.Connection »)
objConn.Open « Provider=SQLOLEDB ; Point d'émission = (gens du pays) ; Trusted_Connection=yes ; Catalog=Northwind initial »
le strSql = « choisissent le compte (*) à partir de la table où la condition »
'--- //Method 1 : Using exécuter la méthode d'objet connexion
'--- Placer objRs=objConn.Execute (le strSql)
'--- //
'*** /// OU **** de ///
'//Method 2 : Using exécuter la méthode d'objet connexion
Placer les objRs = le CreateObject (« ADODB.Recordset »)
strSql d'objRs.Open, objConn
'/