VB6 e access 2010, tem dados mas recordset vazio

Boa tarde.

meu problema é o seguinte.

utilizo vb6 e uma base de dados access. funcionando bem até agora.

durante uma consulta composta por duas tabelas, a execucao da query no VB6 está retornando vazia, quando na realidade existe dados a serem retornados.

consulta:

Select c.dsc_conta, b.num_banco, b.nom_banco, c.num_agencia, c.num_conta, c.handle From cad_conta as c ,cad_banco b Where c.dsc_conta Like 'B*' and b.handle=c.han_banco ORDER BY nom_banco, num_conta

	 

	função que consulta

Set con = New ADODB.Connection
Set rsTemp = New ADODB.Recordset

retorno = "OK"

con.Open "Provider=Microsoft.ACE.OLEDB.12.0; Data Source=D:\Marcos\MVA\mva.accdb; Persist Security Info=False;"
rsTemp.Open Sql, con, adOpenKeyset, adLockBatchOptimistic

Debug.Print rsTemp.RecordCount 'apenas para ver se houve retorno
roda_sql = New ADODB.Recordset
Set roda_sql = rsTemp

sempre ela vem vazia, quando na verdade, ao executar essa consulta no access eu obtenho linhas de retorno.

alguem passou por isso?