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. 🤗

[gelöst] ThisComponent.getURL() funktioniert nicht über Schaltfläche am Formular

Alles zur Programmierung im LibreOffice.
Antworten
teuff
! Supporter - Spende !
Beiträge: 11
Registriert: Di 26. Mär 2013, 20:13

[gelöst] ThisComponent.getURL() funktioniert nicht über Schaltfläche am Formular

Beitrag von teuff » Fr 24. Mär 2023, 01:09

Hallo,
Ich brauche den aktuellen Pfad meiner Base-Datei. Mit thisComponent.getUrl() lässt er sich abrufen, wenn ich das Makro im Code mit F5 starte. Wenn ich die Prozedur jedoch über eine Schaltfläche vom Formular aus aufrufe, erhalte ich nur einen Leerstring. Ich muss ein bestimmtes Directory programmgesteuert auslesen können.

Die Beispielprozedur funktioniert wie gesagt nur vom Editor aus. Kennt jemand das Phänomen und gibt es Abhilfe?

Code: Alles auswählen

Sub Grundordner_ermitteln
	' Kompletten Pfad mit GetCurrentFolder auslesen
	' Pfad parsen, mit ReDim letzte 2 Elemente (Dateiname + Ordner) entfernen
	Dim sPfadName as String
	Dim sParts() as Variant
	Dim sUrl as String
	sUrl = thisComponent.getURL()   
	sPfadName = sUrl 'GetCurrentFolder()
	sParts() = Split(sPfadName, "/")
	ReDim Preserve sParts(0 to UBound(sParts) - 2)
	sPfadName = Join(sParts, "/")
	MsgBox(sPfadName)
End Sub
Grüße,
teuff
Zuletzt geändert von teuff am Fr 24. Mär 2023, 01:52, insgesamt 1-mal geändert.

bmk
Beiträge: 27
Registriert: Do 2. Nov 2017, 22:00

Re: ThisComponent.getURL() funktioniert nicht über Schaltfläche am Formular

Beitrag von bmk » Fr 24. Mär 2023, 01:17

Hallo teuf,

vermutlich muss es thisComponent.Parent.geturl lauten, da thisComponent in diesem Fall die Schaltfläche ist.

Gruß bmk

teuff
! Supporter - Spende !
Beiträge: 11
Registriert: Di 26. Mär 2013, 20:13

Re: ThisComponent.getURL() funktioniert nicht über Schaltfläche am Formular

Beitrag von teuff » Fr 24. Mär 2023, 01:40

Vielen Dank, das ist die Lösung. Jetzt funkioniert es wie gewünscht.
Grüße, teuff

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