vond wat ik zocht
'**********************************************************************
'Visueel BasisManuscript ActiveX
'**********************************************************************
De Leiding van de functie ()
Schemerige objRs
Schemerige objConn
Schemerige strSql
Schemerige strHtml
Reeks objConn = CreateObject („ADODB.Connection“)
objConn.Open „Provider=SQLOLEDB; Gegevens (lokale) Source=; Trusted_Connection=yes; Aanvankelijke Catalog=Northwind“
strSql = „Uitgezochte telling (*) van lijst waar voorwaarde“
'--- //Method 1: Het gebruiken voert Methode van het Voorwerp van de Verbinding uit
'--- Vastgestelde objRs=objConn.Execute (strSql)
'--- //
'*** /// OF /// ****
'//Method 2: Het gebruiken voert Methode van het Voorwerp van de Verbinding uit
Reeks objRs = CreateObject („ADODB.Recordset“)
objRs.Open strSql, objConn
'/