Thread Win32::Process Explorer starten (2 answers)
Opened by mephir at 2009-04-06 13:51

Gast mephir
 2009-04-06 13:51
#120314 #120314
Hallo,
ich habe folgendes Problem: Mit Win32::Process werden Programme gestartet. Beim Start und beim Beenden dieser muss ein Eventlog erstellt werden.

Wichtig ist, dass das Script warten muss, bis das Programm beendet wurde. Das funktioniert auch wunderbar - außer beim Explorer. Das Script läuft nach dem Start einfach weiter (erstellt einen "beendet"-Log und beendet sich selbst). Bei allen anderen Programmen wird "aufs Ende" gewartet.

Momentan sieht der Aufruf so aus:
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

my $process;
my $path = "C:\\Windows\\explorer.exe";
my $app = "explorer ";
my $args = "";
if(Win32::Process::Create($process, $path, $app.$args, 1, NORMAL_PRIORITY_CLASS, ".") == 0)
{
        ErrorReport();
}
else
{
        $process->Suspend();
        
        # Create start event log
        # system("EVENTCREATE....");
        
        $process->Resume();
        $process->Wait(INFINITE);
        
        # Create stop event log
        # system("EVENTCREATE....");
}



Gruß und Danke
Last edited: 2009-04-06 13:54:40 +0200 (CEST)

View full thread Win32::Process Explorer starten