mostrar datos en una dbgrid

[pilar_tellez]

Hola a todos necesito ayuda pa mostrar informacion en un dbgrid, que es infomacion de dos tablas en access, una de empresa y otra donde sale comunas.

donde empresa tiene:
id_rut
id_comu
razon_social

comuna tiene:
id_comuna
nom_comuna

en el formulario tengo un data1 y un dbgrid1 en donde quiero que se muestren los datos de razon social y nombre de la comuna en mi grilla.

para eso en tiempo de ejecucion puse el siguiente codigo:

form_load

carga_base(llama o carga la base de dato)
Data1.DatabaseName = App.path & "\negocios.mdb"
carga_grilla


carga_grilla()
Data1.DatabaseName = App.path & "\quimica.mdb"
Data1.RecordSource = "SELECT empresa.razon_social, comuna.nom_comuna" + _
"FROM tipo INNER JOIN (comuna INNER JOIN empresa ON comuna.id_comuna = empresa.id_comuna) ON tipo.id_tipo = empresa.id_tipo;"
DBGrid1.DataSource = Data1
Data1.Refresh


y me aparece un error que dice:

ERROR 430 EN TIEMPO DE EJECUCION, ESTA CLASE NO ADMITE AUTORIZACION O NO ADMITE LA INTERFAZ ESPERADA

trabajo con DAO, please si alguien sabe por favor ayuda.....