WatchDirectory critical error

[Ahk_fan]

Hallo ,

hänge gerade an einem Problem:
Critical Error...

2021-06-15 23_23_47.png (22.07 KiB) Viewed 642 times

Funktion: In der Gui wird über ActiveX eine Explorer-Fenster eingeblendet, per Drag&Drop kann in das verknüpfte Temp-Verzeichnis eine beliebige Datei bzw. Email aus Outlook gezogen werden. Per WatchDirectory wird die Änderung registriert und die Auswahl zur weiteren Verarbeitung soll angezeigt werden (kopieren, verschieben, drucken usw.)
Normalerweise läuft bei mit die Funktion WatchDirectory so auf einem Sever und überwacht Verzeichnisse, was auch gut funktionert. Ich wollte es jetzt für diesen Fall anwenden, aber irgendwie komme ich nicht weiter.

hier gibt es was aktuelles, aber für V2
https://www.autohotkey.com/boards/viewtopic.php?t=81650

Hat jemand eine Idee?

[Ahk_fan]

Hab es jetzt auf WatchFolder geändert, jetzt geht es:
https://autohotkey.com/boards/viewtopic.php?t=8384

Ich wäre trotzdem an einer möglichen Lösung interessiert.

Code: Select all

#Include %A_ScriptDir%\WatchFolder.ahk
SetBatchLines, -1
Critical

WatchFolders := A_ScriptDir "\temp"
If !FileExist(WatchFolders )
	FileCreatedir, %WatchFolders%
Gui,add, text, ,hier die Daten ablegen
Gui,Add, ActiveX, w350 h200 vEX, Shell.Explorer
ComObjConnect(EX, EX_events)
	EX.Navigate(A_ScriptDir "\temp")
Gui, show, , test
WatchFolder(WatchFolders, "MeineFunktion", , Watch := 1)
return

GuiClose:
ExitApp

Doing:
msgbox, was zu tun
return

class EX_events
{

}

MeineFunktion(path, changes) {
    for k, change in changes
        ; 1 means new file was added
        if (change.action = 1) {
            gosub Doing
            return
        }
}

[just me]

Moin,

für WatchDirectory() ist @HotKeyIt der richtige Ansprechpartner. Der in der Fehlermeldung gezeigte Code ist höchstwahrscheinlich 32-Bit-Code.