by Ahk_fan » 15 Jun 2021, 16:53
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
}
}
Hab es jetzt auf WatchFolder geändert, jetzt geht es:
[url]https://autohotkey.com/boards/viewtopic.php?t=8384[/url]
Ich wäre trotzdem an einer möglichen Lösung interessiert.
[code]
#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
}
}[/code]