hola keria saber como poner un informe ke hice en crystal reports 8 en un formulario de visual basic.
salu2 y muchas gracias
| ||||
pregunta en el subforo de visual basic.
__________________ http://blog.tolaware.com.ar -> Blog de Java, Ruby y Linux |
| ||||
Cita: ya pregunte, hace 1 semana y nadie cotnesta...sino no ubiese puesto este post en esta seccion
Iniciado por TolaWare pregunta en el subforo de visual basic. salu2
__________________ LA MUERTE ESTÁ TAN SEGURA DE VENCER QUE NOS DA TODA UNA VIDA DE VENTAJA |
| ||||
lamentablemente no soy un programador asiduo de visual basic. SI lo fuera ya te hubiese ayudado. Fijate en google, quizas te salgo algo bueno Saludos
__________________ http://blog.tolaware.com.ar -> Blog de Java, Ruby y Linux |
| ||||
Pues si ya tienes tu .rpt listo solo basta con agregar el OCX (crystl32.ocx ) a tu VB6 y poner la ruta de tu .rpt para abrirlo, Te mando unas ligas que te podrá servir. http://www.elguille.info/vb/crystal/...DanielMaya.htm http://www.codeguru.com/forum/showth...&highlight=cdo Ahora que si estás usando parámetros checa ésta otra http://p2p.wrox.com/archive/crystal_.../2001-08/2.asp De paso te mando al subforo de vb6 movido desde foro de programacion Salu2
__________________ Nadie roba nada ya que en la vida todo se paga . . . Exentrit - Soluciones SharePoint & Net |
| ||||
El Crystal tiene que ser la version Developer, esa te trae los ocx necesarios para crear reportes desde vb, y es muy facil con eso, es un asistente. Salu2!
__________________ diegoz.com.ar |
| ||||
![]() Buenos Dias Este Código es el uso para invocar un Reporte de Cristal Report 8.0, Cita: Atte ReporteCR.Reset ReporteCR.WindowTitle = Nombre_Svr ReporteCR.Connect = vConnectString ReporteCR.WindowMaxButton = True: ReporteCR.WindowMinButton = True ReporteCR.WindowShowNavigationCtls = True: ReporteCR.ProgressDialog = True If OptEstado(0).Value = True Then ' Con parametros ReporteCR.ParameterFields(0) = "varTipo;" & vTipo & ";true" ReporteCR.ParameterFields(1) = "vTipoCade;" & Trim(Left(CboTipoPer.Text, 50)) & ";true" ReporteCR.ParameterFields(2) = "vFecIni;" & Trim(varFecIni) & ";true" ReporteCR.ParameterFields(3) = "vFecFin;" & Trim(varFecFin) & ";true" ReporteCR.ReportFileName = App.Path & "\RepAsistenciaOn.rpt" ElseIf OptEstado(1).Value = True Then ' sin parametros ReporteCR.ReportFileName = App.Path & "\RepAsistenciaOf.rpt" End If ReporteCR.WindowShowPrintSetupBtn = True ReporteCR.Destination = crptToWindow ReporteCR.WindowState = crptMaximized ReporteCR.PrintReport Jorge Diaz
__________________ Creo que todas las cosas suceden por algo, no es eso que los demas llaman 'Destino'. Definitivamente Dios no juega a los dados... |