Hyperlink zum Öffnen einer Datei aus Feld heraus
Verfasst: Sa 5. Jan 2019, 18:57
Ich konnte bisher keine direkte Lösung zum Anlegen eines Hyperlinks aus einem Feld heraus finden. Ich habe nur eine indirekte über die Makroprogrammierung gefunden:
Ein Formular zu der DB-Tabelle mit dem Assistenten erstellt.
Den BASIC-Code in einem Modul eines Formulars gespeichert [Formular>Bearbeiten>Extras>Makros>Makros verwalten>OpenOffice.org Basic...>[Formularname]>Neu]
Eine Schaltfläche auf dem Formular erstellt und das Makro dem Ereignis "Beim Auslösen" zugewiesen.
[die Namen des Formulars, und des Textfeldes müssen natürlich an die bei Euch genutzten Namen angepasst werden]
[/i]
Ich habe in der angehängten Datenbank das Formular Bauteile. In diesem Formular befindet sich die Spalte Zeichnung/Doku Datei
. Die angegebenen Dateien würde ich gerne durch anklicken aus einem Verzeichnis öffnen lassen. Ich konnte den oben angegebenen Pfad [Formular>Bearbeiten>Extras>Makros>Makros verwalten>OpenOffice.org Basic...>[Formularname]>Neu] in Base nicht finden.
Ein Formular zu der DB-Tabelle mit dem Assistenten erstellt.
Den BASIC-Code in einem Modul eines Formulars gespeichert [Formular>Bearbeiten>Extras>Makros>Makros verwalten>OpenOffice.org Basic...>[Formularname]>Neu]
Eine Schaltfläche auf dem Formular erstellt und das Makro dem Ereignis "Beim Auslösen" zugewiesen.
[die Namen des Formulars, und des Textfeldes müssen natürlich an die bei Euch genutzten Namen angepasst werden]
Code: Alles auswählen
oForm = ThisComponent.Drawpage.Forms.getByName( "MainForm" )
oFeld = oForm.getByName( "txthyperlink" )
starten = createUnoService("com.sun.star.system.SystemShellExecute")
starten.execute( ConvertToUrl( oFeld.getString() ), "", 0)
Ich habe in der angehängten Datenbank das Formular Bauteile. In diesem Formular befindet sich die Spalte Zeichnung/Doku Datei
. Die angegebenen Dateien würde ich gerne durch anklicken aus einem Verzeichnis öffnen lassen. Ich konnte den oben angegebenen Pfad [Formular>Bearbeiten>Extras>Makros>Makros verwalten>OpenOffice.org Basic...>[Formularname]>Neu] in Base nicht finden.