Duda en CrystalReports

Hola Omar te paso una funcion simple para imprimir el crystal Rport:

Sub Imprime(ByVal ds As DataSet)
Dim MiRep As New rptPrueba
Dim dfdoCustomers As New
CrystalDecisions.Shared.DiskFileDestinationOptions
Dim szFileName As String
szFileName = "documento.pdf"
MiRep.SetDataSource(ds.Tables(0))
CRV.ReportSource = MiRep 'CRC= crystaReportViewer
dfdoCustomers.DiskFileName = "rutadonde lo quieres" & szFileName

With MiRep
.ExportOptions.ExportDestinationType CrystalDecisions.Shared.ExportDestinationType.DiskFile
.ExportOptions.ExportFormatType CrystalDecisions.Shared.ExportFormatType.PortableDocFormat
.ExportOptions.DestinationOptions = dfdoCustomers
.Export()
End With

'javascript para abrir el pdf en ventana nueva. OJO si utilizas el
request.aplicationpath es que la ruta donde guardaste
'el informe es igual
Dim enlace As String = Request.ApplicationPath & szFileName
Response.Write("<script
language='JavaScript'>javascript:Form1:window.open('" & _
enlace & _
"','_blank','resizable=1,Top=0,Left=0,scrollbars=yes')</script>")
End Sub

Si utilizas parametros o subreports o sigue sin funcionarte deja un mensaje
despues de leer esta señal PIIIIIIIII. ;)
Bueno q eso, q al final lo hechamos a andar
Ta Luego.


"Omar Morentín López" escribió en el mensaje
news:

Hola Bati,
si tengo instalado el acobat, y como mencione, con los ejemplos
que baje funciona perfectamente, pero cuando hago yo mi
propio reporte me da el error que mencioné.

"Bati" escribió en el mensaje
news:
> Hola Omar.
> Tendras instalado el Acrobat, no?
> Si es asi bajate la ultima ver. del acrobat si no tambien
>
> "Omar Morentín López" escribió en el mensaje
> news:
> > Gracias por tu respuesta Ernesto,
> > efectivamente eso es lo que estoy intentando hacer, generar el
> > archivo en CrystalReports y después intento exportarlo a PDF,
> > pero lo curioso es que he bajado ejemplos de la pagina
> > de Bussines Objectes en el siguiente link
> >
>

http://support.businessobjects.com/...ndexq4> > > los ejemplos funcionan bien, pero cuando intento hacer mi propio
reporte

> > y lo intento exportar con el mismo código de los ejemplos me dice:
> > "Imposible conectar" y ya no puedo avanzar porque no se a que se
> > deba este error.
> >
> > "Nestus" escribió en el mensaje
> > news:%23$
> > > Que tal Omar¡¡¡¡
> > >
> > > Mira efectivamente la opcion de Archivo -> Imprimir pues no es muy
buena
> > > para que se impriman tus reportes, lo mejor para que se impriman tus
> > > reportes es exportarlos a PDF, XLS u otro formato, yo te

recomendaria

> PDF
> > > por que los abriria directamente en el explorador y pues alli ya le
> > podrias
> > > dar imprimir.
> > >
> > > Saludos
> > >
> > > Ernesto
> > >
> > > "Omar Morentín López" escribió en el mensaje
> > > news:
> > > > Hola,
> > > > he creado un reporte en crystal reports y me lo muestra en

pantalla

> todo
> > > > bien,
> > > > pero lo que ahora necesito es poner un boton que diga imprimir y

que

> me
> > lo
> > > > mande
> > > > directo a la impresora, es decir no quiero que el usuario lo

imprima

> > desde
> > > > el menu
> > > > Archivo->imprimir del explorardor.
> > > > Gracias de antemano por sy ayuda.
> > > >
> > > >
> > >
> > >
> >
> >
>
>

Hola Bati,
Muchas gracias por el código que me pasaste
ya pude exportar el reporte a PDF, solo que
ahora no se como utlizar el javascript que me dijiste,
la verdad es soy completamente nuevo en esto
de desarrollar paginas web y no se nada de como
usar javascripts, de todas maneras mil gracias por
tu ayuda.

"Bati" escribió en el mensaje
news:OlKpAi%

Hola Omar te paso una funcion simple para imprimir el crystal Rport:

Sub Imprime(ByVal ds As DataSet)
Dim MiRep As New rptPrueba
Dim dfdoCustomers As New
CrystalDecisions.Shared.DiskFileDestinationOptions
Dim szFileName As String
szFileName = "documento.pdf"
MiRep.SetDataSource(ds.Tables(0))
CRV.ReportSource = MiRep 'CRC= crystaReportViewer
dfdoCustomers.DiskFileName = "rutadonde lo quieres" & szFileName

With MiRep
.ExportOptions.ExportDestinationType > CrystalDecisions.Shared.ExportDestinationType.DiskFile
.ExportOptions.ExportFormatType > CrystalDecisions.Shared.ExportFormatType.PortableDocFormat
.ExportOptions.DestinationOptions = dfdoCustomers
.Export()
End With

'javascript para abrir el pdf en ventana nueva. OJO si utilizas el
request.aplicationpath es que la ruta donde guardaste
'el informe es igual
Dim enlace As String = Request.ApplicationPath & szFileName
Response.Write("<script
language='JavaScript'>javascript:Form1:window.open('" & _
enlace & _
"','_blank','resizable=1,Top=0,Left=0,scrollbars=yes')</script>")
End Sub

Si utilizas parametros o subreports o sigue sin funcionarte deja un

mensaje

despues de leer esta señal PIIIIIIIII. ;)
Bueno q eso, q al final lo hechamos a andar
Ta Luego.


"Omar Morentín López" escribió en el mensaje
news:
> Hola Bati,
> si tengo instalado el acobat, y como mencione, con los ejemplos
> que baje funciona perfectamente, pero cuando hago yo mi
> propio reporte me da el error que mencioné.
>
> "Bati" escribió en el mensaje
> news:
> > Hola Omar.
> > Tendras instalado el Acrobat, no?
> > Si es asi bajate la ultima ver. del acrobat si no tambien
> >
> > "Omar Morentín López" escribió en el mensaje
> > news:
> > > Gracias por tu respuesta Ernesto,
> > > efectivamente eso es lo que estoy intentando hacer, generar el
> > > archivo en CrystalReports y después intento exportarlo a PDF,
> > > pero lo curioso es que he bajado ejemplos de la pagina
> > > de Bussines Objectes en el siguiente link
> > >
> >
>

http://support.businessobjects.com/...ndexq4> > > > los ejemplos funcionan bien, pero cuando intento hacer mi propio

reporte
> > > y lo intento exportar con el mismo código de los ejemplos me dice:
> > > "Imposible conectar" y ya no puedo avanzar porque no se a que se
> > > deba este error.
> > >
> > > "Nestus" escribió en el mensaje
> > > news:%23$
> > > > Que tal Omar¡¡¡¡
> > > >
> > > > Mira efectivamente la opcion de Archivo -> Imprimir pues no es muy
> buena
> > > > para que se impriman tus reportes, lo mejor para que se impriman

tus

> > > > reportes es exportarlos a PDF, XLS u otro formato, yo te
recomendaria
> > PDF
> > > > por que los abriria directamente en el explorador y pues alli ya

le

> > > podrias
> > > > dar imprimir.
> > > >
> > > > Saludos
> > > >
> > > > Ernesto
> > > >
> > > > "Omar Morentín López" escribió en el mensaje
> > > > news:
> > > > > Hola,
> > > > > he creado un reporte en crystal reports y me lo muestra en
pantalla
> > todo
> > > > > bien,
> > > > > pero lo que ahora necesito es poner un boton que diga imprimir y
que
> > me
> > > lo
> > > > > mande
> > > > > directo a la impresora, es decir no quiero que el usuario lo
imprima
> > > desde
> > > > > el menu
> > > > > Archivo->imprimir del explorardor.
> > > > > Gracias de antemano por sy ayuda.
> > > > >
> > > > >
> > > >
> > > >
> > >
> > >
> >
> >
>
>