Hola, por favor si alguien sabe como solucionar un problema que estoy teneiendo al querer desplegar los datos en el viewer del cristal
Mi codigo es el siguiente:
Dim formula As String
Dim rstDatos As ADODB.Recordset
'Ejecuta store procedure de proceso nómina
'-----------------------------------------
sSql = "EXEC proceso_nomina1 " & g_empresa & ",'" & mes & "'"
Set rstConsulta = New ADODB.Recordset
rstConsulta.Open sSql, cnConexion
formula = "{INV_EMPRESA.COD_EMP} = " & g_empresa ' 'FARMASALUD'"
formula = formula & " And " & "{NOMI_CUENTAS_EMP.CEMP_MES} = '" & mes & "'"
CrystalReport1.SelectionFormula = formula
CRViewer1.ReportSource = CrystalReport1
CRViewer1.Refresh
CRViewer1.ViewReport
El proble que tengo es que el mometo del despliegue me sale un error '430' en tiempo de ejecución que dice:
Esta clase no admite Automatización o no admite la interfaz esperada.
Please, agradezco su ayuda escribanme al correo
[email protected]