fix

initATLASAufschubkonten/frmStartOptions.vb

@@ -8297,9 +8297,23 @@ repeatRequest:
                             psi.CreateNoWindow = True
 
                             Using p As Process = Process.Start(psi)
-                                Dim output = p.StandardOutput.ReadToEnd()
+
-                                Dim err = p.StandardError.ReadToEnd()
+                                Dim outputTask = p.StandardOutput.ReadToEndAsync()
-                                p.WaitForExit()
+                                Dim errorTask = p.StandardError.ReadToEndAsync()
+
+                                If Not p.WaitForExit(60000) Then
+                                    Try
+                                        p.Kill()
+                                    Catch
+                                    End Try
+
+                                    Throw New TimeoutException("Der Prozess wurde nach 60 Sekunden beendet." & vbNewLine & "Filename: " & psi.FileName & vbNewLine & "Arguments: " & psi.Arguments)
+
+                                End If
+
+                                Dim output = outputTask.Result
+                                Dim err = errorTask.Result
+
 
                                 If output <> "" Then
                                     Dim tmpPath_Report = VERAG_PROG_ALLGEMEIN.DATENVERVER_OPTIONS.getTMPPath("MUSTANG-REPORT_" & rkObj & ".pdf", ".pdf", , False)