Ver Mensaje Individual
  #1 (permalink)  
Antiguo 27/06/2007, 01:09
Sanmix
 
Fecha de Ingreso: junio-2007
Mensajes: 5
Antigüedad: 16 años, 10 meses
Puntos: 0
Exclamación Impresion Informe Visual Basic 6 con Crystal

Hola!!

Soy nuevo en este foro y espero que me ayudeis en lo posible.

Mi problema es que en mi pc me imprime el informe de crystal con este código, pero en otro pc llega a este código y no hace nada, ni errores ni nada. He instalado el crystal en el pc que no va por si era del tema de librerias.

No se porque no se muetra la vista preliminar en el crystal, me falta algo del crystal para el visual o algo.

Este es el código (Tiene datos calculados y la ruta del informe rpt) :


With CrystalReport1
.Reset
.ReportSource = crptReport
.WindowShowPrintSetupBtn = True
.ReportFileName = App.Path & "\datos\ComDel.rpt"
.WindowState = crptMaximized
.PrinterSelect
.SQLQuery = "SELECT informes.id,Informes.Texto1,Informes.Texto2,Inform es.Numero3,Informes.Numero4,Informes.Numero5,Infor mes.Numero6,Informes.Numero7,Informes.Numero8,Info rmes.Numero9,Informes.Numero10,Informes.Numero11,I nformes.Numero12 From Informes ORDER BY informes.id"
.ParameterFields(0) = "mes;" & cmbMes.Text & ";TRUE"
.ParameterFields(1) = "delegado;" & cmbDelegados.Text & ";TRUE"
.ParameterFields(2) = "serie;" & cmbSeries.Text & ";TRUE"
.ParameterFields(3) = "MesCalculo;" & MesCalculado & ";TRUE"
.PrintReport
End With


Gracias de antemano chicos