Script soll sich nur einmal starten lassen

Get-CimInstance Win32_Process -ComputerName XXXXXX -Filter "Name = 'blablub.exe'"  

# status file
$statusfile = "\\server.domain.tld\share\status.tok"  
# maximum time a process is allowed to run
$maxwaitseconds = 1800

$erroractionpreference = 'Stop'  
# check if file exists
if (Test-Path $statusfile -PathType leaf){
  # if file last modified older than x seconds, delete file
  if ((Get-Item $statusfile).LastWriteTime -lt (get-date).AddSeconds(-$maxwaitseconds)){
      Remove-Item $statusfile -force
  }else{
     # other script still running, exit script
     exit
  }
}

# set statusfile
"User '$env:USERNAME' running process on machine '$env:COMPUTERNAME'" | set-content $statusfile  

try{
    # run actions here
    $cmd = start-process "D:\Pfad\zum\Programm.exe" -PassThru  
    # check process continously while running
    $start = get-date
    while(!$cmd.HasExited){
        write-host "Waiting for process to finish ..."  
        # if process runs longer than x seconds, forcefully end process and throw error
        if(((get-date)-$start).TotalSeconds -ge $maxwaitseconds -or !$cmd.Responding){
            $cmd | stop-process -Force
            throw  "Process did not finish in time or did not respond, process killed!"  
        }
        sleep 1
    }
    write-host "Worker finished."  
}catch{
    # write error
    write-host $_.Exception.Message -F Red
}finally{
    # remove status file
    Remove-Item $statusfile -force
}

Function CreateLckFile() { 
            $null = New-Item -ItemType "file" -Path $lckFile;   
            # Fix NTFS Tunnellig
            $(Get-Item -Force $lckFile).CreationTime = $(Get-Item -Force $lckFile).LastWriteTime; 
            }

Function LckTimeDiff() {
            $lckFileCreationTime = $((Get-Item $lckFile).CreationTime)
            $Diffobj = $(Get-Date) - $lckFileCreationTime
            [int]$Script:DiffInMin = [int]$Diffobj.TotalMinutes
            }

Function LckAndStart() {  
    if (! (Test-path -path $lckFile)) {
        CreateLckFile
        ............   
        Remove-Item $lckFile -Force
    } else { 
        LckTimeDiff                            
        IF ($DiffInMin -gt 10 ) {                            
            WriteLog "Alte Lck vorhanden"  
            Remove-Item $lckFile -Force   
            CreateLckFile
            ........
            } 

    }

'################### Check if MSI is running START###################  
Dim ActiveInstall, strComputer, ProcessCommandLine, Answer, WshShell

ActiveInstall = 1
Set WshShell = WScript.CreateObject("WScript.Shell")  
do while ActiveInstall = 1
  
	strComputer = "."  
	Set objWMIService = GetObject("winmgmts:" _  
	& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")  

	Set colProcessList = objWMIService.ExecQuery _
	("Select * from Win32_Process")  

	ActiveInstall = 0

	For Each objProcess in colProcessList
		'wscript.echo objProcess.CommandLine  
		ProcessCommandLine = objProcess.CommandLine

		If Instr(1, ProcessCommandLine, "msiexec.exe") > 0 Then  
			If NOT Instr(1, ProcessCommandLine, "/V") > 0 Then  
				'wscript.echo "Prozess gefunden! " & ProcessCommandLine  
				ActiveInstall = 1

				'Answer = WshShell.Popup("MSIEXEC.exe in use, waiting 10 Secounds before trying to continue....", 10, "Info", 0 + 64)  
				Wscript.echo (Time) & " MSI Found - waiting 5 Secounds"  
				Wscript.sleep 5000 

			End If
		End If
	Next
loop
'###################### Check if MSI is running END################  

If Instr(1, objProcess.CommandLine, "Gesuchte.exe") > 0 Then  
wscript.echo "Prozess gefunden! " & objProcess.CommandLine  
objProcess.Terminate()
End If