Base beenden. CloseVetoException

Antwort erstellen


BBCode ist eingeschaltet
[img] ist ausgeschaltet
[url] ist eingeschaltet
Smileys sind ausgeschaltet

Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: Base beenden. CloseVetoException

Re: Base beenden. CloseVetoException

von F3K Total » Sa, 26.01.2013 20:07

Hi,
ich hatte auch schon geforscht, darum auch meine Nachfrage. Jetzt habe ich diesen Code:

Code: Alles auswählen

sub close_DB (event)
    oform = event.source.model.parent
    oconnection = oform.activeconnection
    sqlStatement = oconnection.createstatement
    ssql = "Shutdown Compact"
    sqlStatement.execute(SSql)
    ocomponent = stardesktop.currentcomponent.parent'Databasedocument ist .parent von Formulardokument
    with ocomponent
        if .isModified then .store
        .close(true)
    end with
    ocomponentsenumeration = stardesktop.components.createenumeration
    if ocomponentsenumeration.hasmoreelements = false then stardesktop.terminate' nix weiter offen
end sub
Er darf nicht dem Dokument zugeordnet sein, sondern muß unter "meine Makros" stehen.
Ausgelöst von einem Button auf einem Formular der Datenbank.

Funzt.

Gruß R

Re: Base beenden. CloseVetoException

von F3K Total » Sa, 26.01.2013 17:42

Hi,
habe den Code gerade ausprobiert.
Wenn Du nur eine Base Datei geöffnet hast und diese dann aus dem Formular schliesst, schau mal in Deinen Task-Manager. Ich vermute da bleibt auch bei Dir ein soffice.bin und ein soffice.exe stehen?

Gruß R

Re: Base beenden. CloseVetoException

von F3K Total » Sa, 26.01.2013 15:51

PeterP hat geschrieben:hat sich erledigt
Und würdest Du uns auch mitteilen, wieso?
R

Re: Base beenden. CloseVetoException

von DPunch » Sa, 26.01.2013 12:27


Nach oben