von komma4 » Fr, 01.07.2011 06:15
MrSir hat geschrieben:Ich hoffe Ihr könnt mir helfen.
Schwierig.
Welche OOo-Version?
Welches Betriebssystem?
Welches Datenbank (
embedded HSQLDB? Diese Angabe steht in der Statuszeile der ODB)
Der Bericht wird erstellt, wenn Du manuell in der ODB doppelt klickst?
Folgendes finde ich in meiner Krabbelkiste dazu:
Code: Alles auswählen
' http://www.oooforum.org/forum/viewtopic.phtml?t=65111
' Hvanderven
' Sat Nov 03, 2007 7:33 am
sub OpenReportCalender( oEv as variant )
OpenReport( getReportsTC, getConnectionTC, "Calender" )
end sub
function OpenReport( reportContainer as variant, oConnection as variant, _
sReportName as string) as variant
Dim aProp(1) As New com.sun.star.beans.PropertyValue
aProp(0).Name = "ActiveConnection"
aProp(0).Value = oConnection
aProp(1).Name = "OpenMode"
aProp(1).Value = "open"
OpenReport=reportContainer.loadComponentFromURL(sReportName,"_blank",0,aProp())
end function
Hilft das weiter?
[quote="MrSir"]Ich hoffe Ihr könnt mir helfen.[/quote]
Schwierig.
Welche OOo-Version?
Welches Betriebssystem?
Welches Datenbank ([i]embedded[/i] HSQLDB? Diese Angabe steht in der Statuszeile der ODB)
Der Bericht wird erstellt, wenn Du manuell in der ODB doppelt klickst?
Folgendes finde ich in meiner Krabbelkiste dazu:
[code]' http://www.oooforum.org/forum/viewtopic.phtml?t=65111
' Hvanderven
' Sat Nov 03, 2007 7:33 am
sub OpenReportCalender( oEv as variant )
OpenReport( getReportsTC, getConnectionTC, "Calender" )
end sub
function OpenReport( reportContainer as variant, oConnection as variant, _
sReportName as string) as variant
Dim aProp(1) As New com.sun.star.beans.PropertyValue
aProp(0).Name = "ActiveConnection"
aProp(0).Value = oConnection
aProp(1).Name = "OpenMode"
aProp(1).Value = "open"
OpenReport=reportContainer.loadComponentFromURL(sReportName,"_blank",0,aProp())
end function [/code]
Hilft das weiter?