BITTE helfen Sie uns HEUTE mit einer SPENDE
Helfen Sie das LibreOffice Forum zu erhalten!

❤️ DANKE >><< DANKE ❤️

> KEINE WERBUNG FÜR REGISTRIERTE BENUTZER!<
Ihre Spende wird für die Deckung der laufenden Kosten sowie den Erhalt und Ausbau 🌱 des LibreOffice Forums verwendet.
🤗 Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet. 🤗

Datei/Ordner öffnen Makro

Base ermöglicht es Ihnen, Ihre Daten in einer Datenbank direkt mit LibreOffice zu bearbeiten.
Antworten
sschultewolter
Beiträge: 1
Registriert: Fr 8. Mai 2020, 23:31

Datei/Ordner öffnen Makro

Beitrag von sschultewolter » Fr 8. Mai 2020, 23:38

Hallo,

ich hatte folgendes Makro bereits in einer alten Libre/Openoffice Version am Laufen. Habe nun ein Update gefahren und nun funktioniert dieses nicht mehr.


Ich habe im Formular eine Schaltfläche, deren Pfad sich nach der Seriennummer (id) richtet.

Code: Alles auswählen

Sub S_oeffneOrdner
	oDoc = thisComponent
	oDrawpage = oDoc.drawpage
	oForm = oDrawpage.forms.getByName("Formular")
	oFeld1 = oForm.getByName("id")
	stText = oFeld1.Text
	stURL =  "\\192.168.99.2\kunden\" & stText & "\"
	oFeld2 = oForm.getByName("Schaltflaeche_Ordner")
	oFeld2.TargetURL = stURL
End Sub
Erhalte aber lediglich die Fehlermeldung

Code: Alles auswählen

"\\192.168.99.2\kunden\0402\" ist keine absolute URL, die zum Öffnen an eine externe Anwendung übergeben werden kann.
Das ganze habe ich genutz unter Windows 10 und Linux (wobei hier die stURL um file:/// ergänzt werden musste).
Linux Client: Libreoffice 5.1
Windows Clients: Libreoffce 6.3

gogo
Beiträge: 1072
Registriert: Sa 5. Feb 2011, 19:07

Re: Datei/Ordner öffnen Makro

Beitrag von gogo » Sa 9. Mai 2020, 07:43

.TargetUrl benutze ich eigentlich nicht - hab' im Moment auch keine Doku dazu im Kopf, aber wenn du nur den Pfad allein an's System schickst, wird dieses nix damit anfangen können (weil der Ordner-Pfad ja keine ausführbare Datei ist)

Also: shell("dolphin '/tmp/'") wenn Du KDE hast, sonst "dolphin" durch nemo, nautilus ... ersetzen, oder falls das OS wechselt:

Code: Alles auswählen

sUrl=convertToURL("/tmp/")

select case GetGUIType
case 1
	shell("explorer.exe " + sUrl)
case 2
	msgbox "Mac!"
case 4
	shell("dolphin " + sUrl)
case else
	msgbox "OS zu exotisch ..."
end select
... explorer.exe hab' ich nicht getestet ...
g
2008 LucidL./MaverickM./WinXP LibreOffice 3.3.2 > 02/13 LinuxMint13/Xubuntu > 09/13 Debian Wheezy+LO3.5.4.2 > 01/15 Debian Jessie KDE+LO4.3.3.2/Mint17 openbox auf USB+LO4.2.8.2 > 03/16 ArchLin & LO5.1+ff > 02/18 Kubuntu

Freischreiber
Beiträge: 755
Registriert: Fr 28. Mär 2014, 10:41

Re: Datei/Ordner öffnen Makro

Beitrag von Freischreiber » Sa 9. Mai 2020, 16:49

Hallo!

Ich hab so ein Makro auch, also unter Windows, und da ist um den URL-Aufbau herum noch ein convertToUrl(), also bei dir wäre das dann:

Code: Alles auswählen

stURL=convertToUrl("\\192.168.99.2\kunden\" & stText & "\")
Vielleicht ist es das ja...

Viele Grüße
Freischreiber

PS: Code korrigiert. Sorry.
Freischreiber nutzt seit 6/2023 LibreOffice Version: 7.2.7.2 (x64) unter Windows 10 und SplitDB mit HSQL 2.7.2.

An alle, die das LibreOffice-Forum nutzen:


Bitte beteiligen Sie sich mit 7 Euro pro Monat und helfen uns bei unserem Budget für das Jahr 2024.
Einfach per Kreditkarte oder PayPal.
Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet.

❤️ Vielen lieben Dank für Ihre Unterstützung ❤️

Antworten