ERRO AO CARREGAR RELATORIO NO VISUAL REPORTX

MOREIRA 08/03/2010 21:57:26
#336351

estou usando o visual reportx pra gerar os relatórios (COPIA REGISTRADA)
se colocar uma determinada data que nao existe em uma consulta sql, exibe esse erro,
erro nao previsto:3021
aplication-defined or object-defined error

deveria exibir a mensagem, nao ha dados para exibir.

mas colocando a data existente funciona normalmente

obs: usando o BD MYSQL

Public Sub Config()
On Error GoTo Trataerro
Set RstRelat = New ADODB.Recordset
Sql = [Ô]Select * From Tbl_Vendas Where DtVenda = [ô][Ô] & Format(Frm_VendaDiaria.TxtDtAtual, [Ô]yyyy-mm-dd[Ô]) & [Ô][ô][Ô]
RstRelat.Open Sql, Conexao, 3
[ô]Associa o recordset ao relatorio
Set Relatorio.Recordset = RstRelat
[ô] Inicia a geração do relatório.
Relatorio.Ativar
[ô] Fecha o recordset
RstRelat.Close
Set RstRelat = Nothing
[ô] Retira o formulário de relatorio da memória
Unload Me
Exit Sub
Trataerro:
MsgBox Err.Description, vbCritical, [Ô]Erro no Sistema[Ô]
End Sub