cara eu uso outro meio de programação em ADO
uso o seguinte comando
dim Comando as new adodb.command
dim rs as new adodb.recordset
with comando
.activeconncetion = cnn ' tem q ter uma conexao criada e aberta
.commandtype = adcmdtext
.commandtext = "SELECT * FROM Tabela WHERE Campo = '" & text1.text & "';"
set rs = .execute
end with
para criar a conexão, use o seguinte esquema
'num módulo
public cnn as new adodb.connection
'abrir a conexao, uso access, m asexistem vários outros provedores q eu não conheço!!
cnn.connectionstring = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source = C:myDB.mdb"
cnn.open