Adobe Acrobat - Speicherort der geöffneten Datei ermitteln

Post a reply


In an effort to prevent automatic submissions, we require that you complete the following challenge.
Smilies
:D :) ;) :( :o :shock: :? 8-) :lol: :x :P :oops: :cry: :evil: :twisted: :roll: :!: :?: :idea: :| :mrgreen: :geek: :ugeek: :arrow: :angel: :clap: :crazy: :eh: :lolno: :problem: :shh: :shifty: :sick: :silent: :think: :thumbup: :thumbdown: :salute: :wave: :wtf: :yawn: :facepalm: :bravo: :dance: :beard: :morebeard: :xmas: :HeHe: :trollface: :cookie: :rainbow: :monkeysee: :monkeysay: :happybday: :headwall: :offtopic: :superhappy: :terms: :beer:
View more smilies
BBCode is ON
[img] is OFF
[flash] is OFF
[url] is ON
Smilies are ON
Topic review
   

Expand view Topic review: Adobe Acrobat - Speicherort der geöffneten Datei ermitteln

Adobe Acrobat - Speicherort der geöffneten Datei ermitteln

Post by Johnny R » 04 Oct 2013, 00:25

Habt Ihr eine Idee, wie man unter AHK den vollständigen Speicherort einer in Adobe Acrobat (9 Pro) im Fokus befindlichen aktuell geöffneten Datei ermitteln kann? Googeln hat mir bei diesem Problem leider überhaupt nicht geholfen...

Geht das vielleicht ähnlich elegant wie hier mit Word?

EDIT:
Ich habs mit Adobe SDK etc. zusammengestöpselt:

Code: Select all

gApp    := ComObjCreate("AcroExch.App") 
gAvDoc  := gApp.GetActiveDoc
gPdDoc  := gAvDoc.GetPDDoc
JSO     := gPdDoc.GetJSObject
AktFile := JSO.Path
; Ergebnis: /A/AGG/Urteile/Ausgewählte Entscheidungen 2012.pdf
StringReplace, AktFile, AktFile,/,\, All ; Ersetzt Schrägstriche durch Backslashs.
StringLeft, Prüf, AktFile, 1
IF (Prüf="\") ; Entfernt den ersten Backslash
   AktFile := SubStr(AktFile, 2) ; String ab der 2. Stelle
StringLeft, Laufwerk, AktFile, 1 ; Ermittelt das Laufwerk
AktFile := Laufwerk . ":\" . SubStr(AktFile, 3) ; Setzt Laufwerk und weiteren Pfad zusammen.

Top