Wie sende ich "Strg+C" an ein bestimmtes CMD / Programm?

  • VB.NET

Es gibt 8 Antworten in diesem Thema. Der letzte Beitrag () ist von mnemonik.

    Wie sende ich "Strg+C" an ein bestimmtes CMD / Programm?

    Servus Leute,


    vor einige Zeit habe ich euch gefragt, wie man über CMD einem Konsolenprogramm (z.B. youtube-dl, ffmpeg usw.) ein Befehl senden und auslesen kann.
    CMD/ Console während der Eingabeausführung ablesen

    Gerade
    stehe ich wieder auf dem Schlauch und komme nicht weiter. Und zwar, nachdem ich die Arbeit der Konsolenanwendung gestartet habe, möchte ich die Arbeit stoppen. Dafür muss man dasselbe CMD-Fenster finden und "Strg+C" drucken. Ich komme aber nicht drauf, wie das gemacht werden kann.

    Meine Probleme:
    - es wird kein CMD-Fenster erstellt (.CreateNoWindow = True)
    - wie kann ich CMD überhaupt ansprechen wenn ich den Fenster-Title nicht weis (ist von Befehl, OS Sprache, childwindows usw. abhängig)

    P.S.: Wenn der Process gekilled wird, wird die Ausgabedatei beschädigt.

    aber wie soll ich den InputStream wieder umgeleiten? Da ich die Eingabe über Knopfdruck mache, ist die Funktion beendet. Somit verliert sich der Fokus. Weis nicht mehr wie ich den CMD wieder finden und ansprechen soll.


    VB.NET-Quellcode

    1. Shrinker = New Process
    3. With Shrinker.StartInfo
    4. .FileName = "cmd"
    5. .RedirectStandardError = True
    6. .RedirectStandardInput = True
    7. .RedirectStandardOutput = True
    8. .CreateNoWindow = True
    9. .UseShellExecute = False
    10. End With
    12. Shrinker.Start()
    13. Shrinker.StandardInput.WriteLine(" Hier soll der cmd-Code sein ")


    Folgendes funktioniert aber CMD ist immer wärend der Programmabreit zu sehen :(


    VB.NET-Quellcode

    1. Code wie oben...
    3. .CreateNoWindow = False
    5. ...


    und

    VB.NET-Quellcode

    1. Dim MyCMD = Process.GetProcessesByName("cmd")
    2. If MyCMD.Count = 0 Then
    3. Else
    4. SetWindowPos(MyCMD.First.MainWindowHandle, New IntPtr(hWndInsertAfter.BehindTopMost), -1, -1, -1, -1, uFlags.SWP_NOMOVE Or uFlags.SWP_NOSIZE Or uFlags.SWP_SHOWWINDOW)
    5. SendKeys.Send("^{C}")
    6. End If

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „mnemonik“ ()

    mnemonik schrieb:

    SendKeys.Send("^{C}")
    geht an das Fenster mit dem Fokus.
    Entweder Du gibst dem CMF-Fenster den Fokus oder Du sendest per PInvoke.SendMessage().
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

    So, ich habe tatsächlich FAST geschafft das Problem zu lösen! "Elegant" kann man die Lösung nicht nennen, aber es funktioniert)

    So sieht mein Code jetzt aus:

    Spoiler anzeigen


    VB.NET-Quellcode

    1. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    5. '------------------------------------------ Console-Programm im CMD stroppen --------------------------------
    6. If "Bedingung wann das Programm gestoppt wird" Then
    8. 'CMD einblenden
    9. Dim intptrs() As IntPtr = MyCMDProcess.ToArray
    10. For i = 0 To intptrs.Length - 1
    11. If ShowWindow(intptrs(i), ShowWindowCommands.ShowDefault) Then
    12. MyCMDProcess.Remove(intptrs(i))
    13. End If
    14. Next
    16. 'CMD in Vordegrund setzen
    17. Dim MyCMD = Process.GetProcessesByName("cmd")
    18. If MyCMD.Count = 0 Then
    19. Else
    20. SetWindowPos(MyCMD.First.MainWindowHandle, New IntPtr(hWndInsertAfter.BehindTopMost), -1, -1, -1, -1, uFlags.SWP_NOMOVE Or uFlags.SWP_NOSIZE Or uFlags.SWP_SHOWWINDOW)
    21. SendKeys.Send("^{C}")
    22. End If
    24. 'CMD wieder ausblenden
    25. For Each pp As Process In Process.GetProcessesByName("cmd")
    26. If ShowWindow(pp.MainWindowHandle, ShowWindowCommands.Hide) Then
    27. MyCMDProcess.Add(pp.MainWindowHandle)
    28. End If
    29. Next
    31. 'CMD killen
    32. Download_Process.StandardInput.WriteLine("taskkill /im cmd.exe /t /f")
    33. Exit Sub
    34. End If
    37. '------------------------------------------ Hauptprogramm --------------------------------
    39. Download_Process = New Process
    41. With Download_Process.StartInfo
    42. .FileName = "cmd"
    43. .RedirectStandardError = True
    44. .RedirectStandardInput = True
    45. .RedirectStandardOutput = True
    46. .CreateNoWindow = False
    47. .UseShellExecute = False
    48. End With
    50. Download_Process.Start()
    51. Download_Process.StandardInput.WriteLine("CMD Befehl")
    52. Download_Process.StandardInput.WriteLine("exit")
    54. Download_Process.BeginErrorReadLine()
    55. Download_Process.BeginOutputReadLine()
    57. For Each pp As Process In Process.GetProcessesByName("cmd")
    58. If ShowWindow(pp.MainWindowHandle, ShowWindowCommands.Hide) Then
    59. MyCMDProcess.Add(pp.MainWindowHandle)
    60. End If
    61. Next
    63. End Sub
    66. '-------------------------- cmd in Vordergrund (DLL)-----------------------------
    67. <System.Runtime.InteropServices.DllImport("user32.dll", SetLastError:=True)> _
    68. Public Shared Function SetWindowPos(ByVal hWnd As IntPtr, ByVal hWndInsertAfter As IntPtr, ByVal X As Integer, ByVal Y As Integer, ByVal cx As Integer, ByVal cy As Integer, ByVal uFlags As UInteger) As Boolean
    69. End Function
    70. Enum uFlags As UInteger
    71. SWP_NOMOVE = &H2
    72. SWP_NOSIZE = &H1
    73. SWP_SHOWWINDOW = &H40
    74. End Enum
    75. Enum hWndInsertAfter As Integer
    76. BehindTopMost = -2
    77. End Enum
    79. '-------------------------- cmd ein/ausblenden (DLL)-----------------------------
    81. Private MyCMDProcess As New List(Of IntPtr)
    83. <DllImport("user32.dll", SetLastError:=True, CharSet:=CharSet.Auto)> _
    84. Private Shared Function ShowWindow(ByVal hWnd As IntPtr, ByVal nCmdShow As ShowWindowCommands) As Boolean
    85. End Function
    87. Enum ShowWindowCommands As Integer
    88. Hide = 0
    89. ShowDefault = 10
    90. End Enum




    Leider funktioniert das Ausblenden nach dem Start des Programms nur ein Mal, warum auch immer. Womöglich kann mir jemand weiter helfen?

    @mnemonik Wozu genau brauchst Du die Prozedur SetWindowPos()? Mach das alles mit ShowWindow().
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

    *unnötiges Zitat entfernt*

    Weil ich nicht wirklich weiß, wie man das macht!) Alle Teile des Codes, die für mich als Amateur Neuland sind, suche ich im Internet und stelle sie 1 zu 1 in mein Programm ein. Da bin ich schon froh, wenn ich den Code-Teil richtig eingebaut habe. :)

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Marcus Gräfe“ ()

    @mnemonik Dann solltest Du Dir zumindest die Beschreibung von Microsoft ansehen Frau Google: MSDN SetWindowPos, damit Du weißt, worum es geht.
    Nichts ist schlimmer als ein pseudo-eigener Code, von dem man nichts versteht :!:
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

Facebook
Telefonspende