Iniciar sesión
Crear cuenta
Crear cuentaCrear cuenta| Pregunta: | 57634 - ERROR EN VB 6 Y CRVIEWER XI |
| Autor: | Victor Gutierrez |
| Hola, lo que sucede es q uso VB y CR XI, (crviewer), ya hice el enlace del componente (crviewer.dll) y las referencias (Crystal Reports ActiveX Designer Run Time Library 11; Crystal ActiveX Report Viewer 11; Crystal Reports Designer Library 11). Funcionan, sin embargo al ejecutar las 2 o 3 primeras veces me muestra el reporte como debe ser, pero a la siguiente me vota el Error: Y para q me vuelva a funcionar tengo q cerrar el VB. " Error '-2147189563(80047cc5) en tiempo de Ejecución Basic Sintaxis is not supported en group or record selection formula " Tengo el sgte codigo: Private Sub Mostrar_Report() 'On Error Resume Next Dim Crystal As CRAXDRT.Application Dim Report As CRAXDRT.Report Set Crystal = New CRAXDRT.Application Set Report = New CRAXDRT.Report Screen.MousePointer = vbHourglass Crystal.LogOnServerEx "P2SODBC.dll", "Conecc", "PLANEAMIENTO", "sa", "clave" Set Report = Crystal.OpenReport(App.Path & "RptPrograma08.rpt", 1) Report.RecordSelectionFormula = "{@PeriodoSec} = '" & Right(CboANIO, 2) & "." & Left(CboMES, 2) & "." & Left(CboSECCION, 2) & "'" Report.DiscardSavedData CrysReportV.ReportSource = Report CrysReportV.ViewReport Do While CrysReportV.IsBusy DoEvents Loop CrysReportV.Zoom 100 Set Crystal = Nothing Screen.MousePointer = vbDefault End Sub Alguien podria ayudarme?? Gracias | |