OpenOffice.info

[quote]Die Url eines Ordners auf einem Rechner beginnt mit : file:////<ordner>/<sub>. Zumindest auf einem Linux System. Auf einem Windows System wird ein "C:/Patienten/Herr Schmidt damit zu "File:////C:/Patienten/Herr Schmidt".[/quote]

Hinweis, richtig ist:
Die Url eines Ordners auf einem Rechner beginnt mit : file:[color=#FF0000]///[/color]<ordner>/<sub>. Zumindest auf einem Linux System. Auf einem Windows System wird ein "C:/Patienten/Herr Schmidt damit zu "File:[color=#FF0000]///[/color]C:/Patienten/Herr[color=#FF0000]%20[/color]Schmidt".

[quote]Man möge mich verbessern.
[/quote]
gerade getan ;-)


Gruß
Stephan

Liebe Leute,
das Makro funktioniert einwandfrei. Vielleicht als Tipp für den unbekannten anony123. Neben der Einstellung der Makrosicherheit ist noch zu beachten:
Die Url eines Ordners auf einem Rechner beginnt mit : file:////<ordner>/<sub>. Zumindest auf einem Linux System. Auf einem Windows System wird ein "C:/Patienten/Herr Schmidt damit zu "File:////C:/Patienten/Herr Schmidt". Man möge mich verbessern.
Mit freundlichem Gruß
Gerd

Hallo,
genau das tut die Schaltfläche, wenn du Makros zuläßt.
Damit das Makro laufen darf, stellst du unter [color=#0000FF][b]Extras/Einstellungen/Openoffice/Sicherheit/Makrosicherheit[/b][/color] mindestens die Stufe [color=#0040FF][b]Mittel[/b][/color] ein, dann wirst du beim Öffnen von Dokumenten gefragt, ob du Makros ausführen möchtest.

Gruß R

Hallo,
du musst die Datei lokal speichern. Habe sie gerade selbst nochmal heruntergeladen, sie ist völlig in Ordnung.
R

Sub S_Set_URL_to_Button
    oForm = ThisComponent.Drawpage.Forms.getbyname("MainForm")
    oButton = oForm.getbyName("Schaltfläche 1")
    sUrl = oForm.Columns.getbyName("sURL").getstring
    oButton.TargetURL = sUrl
End Sub

Hallo,
das ist einfach, wenn man weiß wie es geht.
Das folgende Makro ist an das Ereignis [color=#0040FF][b]nach dem Datensatzwechsel[/b][/color] des strukturellen Formulares [color=#0040FF][b]MainForm[/b][/color] gebunden.[code]Sub S_Set_URL_to_Button
oForm = ThisComponent.Drawpage.Forms.getbyname("MainForm")
oButton = oForm.getbyName("Schaltfläche 1")
sUrl = oForm.Columns.getbyName("sURL").getstring
oButton.TargetURL = sUrl
End Sub[/code]Es ließt die Spalte [color=#0040FF][b]sURL[/b][/color] des aktuellen Datensatzes aus und trägt den Pfad in die Eigenschaft [color=#0040FF][b]URL[/b][/color] der [color=#0040FF][b]Schaltfläche 1[/b][/color] ein. [color=#0040FF][b]URL[/b][/color] ist nur verfügbar, wenn die Aktion der Schaltfläche auf [color=#0040FF][b]Dokument/Webseite öffnen[/b][/color] eingestellt ist. Beispiel anbei.
Gruß R