Forum: VB.NET |
Thema:
AW: AW: AW: tif nach pdf konvertieren |
Von:
Thomas Golla (
04.08.2006 09:56) |
Ich habe hier mal was "hingeklatscht" :-)
Vielleicht hilft es dir ja weiter.
Dim myReport As New CR_dynImg
Dim DiskOpts As CrystalDecisions.Shared.DiskFileDestinationOptions = New CrystalDecisions.Shared.DiskFileDestinationOptions
myReport.ExportOptions.ExportDestinationType = CrystalDecisions.[Shared].ExportDestinationType.DiskFile
myReport.ExportOptions.ExportFormatType = CrystalDecisions.[Shared].ExportFormatType.PortableDocFormat
Dim mytable As New DataTable
mytable.Columns.Add(New DataColumn("imgColumn", GetType(System.Byte())))
Dim drow As DataRow
drow = mytable.NewRow
Dim fs As New System.IO.FileStream("BildPfad", IO.FileMode.Open, System.IO.FileAccess.Read)
Dim image(fs.Length) As Byte
fs.Read(image, 0, fs.Length)
fs.Close()
drow(0) = image
mytable.Rows.Add(drow)
DiskOpts.DiskFileName = "c:\test.pdf"
myReport.ExportOptions.DestinationOptions = DiskOpts
myReport.SetDataSource(mytable)
myReport.Export()
LG
Tom
Betreff |
Von |
Datum |
|
|
Ralf
Ziola
|
07.08.2006 08:48 |
|
  |
AW: AW: AW: AW: AW: tif nach pdf konvertieren
Hi Ralf,<br><br>CR_dynImg ist der von mir erstellte CrystalReport. <br>MyReport wäre sprechender gewesen, sorry.<br><br>Falls du ein lauffähiges Beispiel brauchst poste deine EMail-Adresse und ich schicke dir... |
 |
 |
 |
|
|
Thomas
Golla
|
07.08.2006 09:04 |
|
|
Ralf
Ziola
|
07.08.2006 09:06 |
|
|
Ralf
Ziola
|
07.08.2006 16:34 |
|
|
Antworten
Vorsicht bei der Eingabe: Die Zeichen ' oder -- sind nicht erlaubt!