OpenOffice.info

Hallo,
die Vorschläge, wie man einen Bericht aus einem Formular aufrufen kann, waren sehr hilfreich.... bei mir funktioniert es so ganz gut.
Allerdings bleibt nach dem Aufruf des Berichtes, auch wenn ich OO komplett geschlossen habe, lck-Datei bestehen.
Beim Versuch, diese zu löschen, sagt mir Vista, daß löschen nicht möglich ist, weil die Datei noch in einem anderen Programm geöffnet ist.
Es sieht also so aus, als ob beim Aufruf des Drucks aus einem Formular eine 2 Instanz meiner Anwendung (Datenbank) geöffnet wird, die dann nicht mehr freigegeben wird. Ist das Problem bekannt?
Wie kann ich das lösen?
Danke für Eure Hilfe bereits im Voraus.
Gruß eBayer

Hallo markus ,danke für deine antwort, ich habe dein code in makro feld eingefügt, dateiname geändert ,sowie den report bericht. leider zeigt er eine fehlermeldung an wie folg aussieht = Basic laufzeitfehler es ist eine exception aufgetreten
typ com.sun.sun.container No such element exception
message obst&gemüse

Zeile DB=Context.getByName( "Fisch")

eingabe fehler bei den datenbankname
gruss whoopy84

sub ClickBericht_oefnnen
Dim Context AS Object
   Dim Conn As Object
   Dim DB As Object
   Dim ReportDoc As Object
   Dim Args(1) As New com.sun.star.beans.PropertyValue
   Dim ReportName As String
   
   ReportName = "Berichtname"
   Context=CreateUnoService("com.sun.star.sdb.DatabaseContext")
   DB=Context.getByName("Datenbankname")
   Conn=DB.getconnection("","")
   Args(0).Name="ActiveConnection" : Args(0).Value=Conn
   Args(1).Name="OpenMode" : Args(1).Value="open"
   ReportDoc=DB.DatabaseDocument.ReportDocuments.loadComponentFromURL(ReportName,"_self",2,Args) REM << BASIC-Laufzeitfehler.
   ReportDoc.CurrentController.Frame.ContainerWindow.setFocus()
   End Sub

Hallo Whoopy,
versuch mal der Schaltfläche ein Makro zu hinterlegen. z.B. so wie folgendes

[code]sub ClickBericht_oefnnen
Dim Context AS Object
Dim Conn As Object
Dim DB As Object
Dim ReportDoc As Object
Dim Args(1) As New com.sun.star.beans.PropertyValue
Dim ReportName As String

ReportName = "Berichtname"
Context=CreateUnoService("com.sun.star.sdb.DatabaseContext")
DB=Context.getByName("Datenbankname")
Conn=DB.getconnection("","")
Args(0).Name="ActiveConnection" : Args(0).Value=Conn
Args(1).Name="OpenMode" : Args(1).Value="open"
ReportDoc=DB.DatabaseDocument.ReportDocuments.loadComponentFromURL(ReportName,"_self",2,Args) REM << BASIC-Laufzeitfehler.
ReportDoc.CurrentController.Frame.ContainerWindow.setFocus()
End Sub
[/code]
Im Makro noch den Berichtname und den Datenbankname anpassen.

Gruss Markus

Guten Morgen,
ich möchte gerne eine Schaltfläsche im Formular aktivieren! Die Schaltfläsche soll beim anklicken automatisch den Bericht öffnen ! wer kann helfen gruss whoopy84 :D