Sendkeys zu CMD

[Montaxx]

Moinsen,

ich bin gerade dabei ein tool zu schreiben.
Ich benutze VB 2005 Express Edition


so, undzwar will ich das sich CMD öffnet mit einem Klick auf den Button. Das tuht es auch...
Jez will ich aber, das gleichzeitig ein Text an das Fenster gesendet wird.
Das tuh ich mit SendKeys.Send ("Text")
Aber wen ich jez auf den Button klicke, öffnet sich 4-5 mal CMD und in i-einem steht das drin ^^

wie löse ich dieses Problem ?
Auserdem möchte ich auch, das mit sendkeys auch der inhalt von TextBox1 mitgesendet wird, und auf ENTER gedrückt wird...

Hier der Source Code:

Public Class frmMain

    Private Sub cmdStart_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdStart.Click
        Shell("c:\WINDOWS\System32\cmd.exe")
        SendKeys.Send("perl phpkit161.pl ")
    End Sub

    Private Sub PHPKit161_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PHPKit161.Click
        SendKeys.Send("perl phpkit161.pl ")
    End Sub
End Class

Bitte um Hilfe per Teamviewer

MFG

Montaxx

[helloworld123]

also das mit der textbox machst du so:

Public Class frmMain 

    Private Sub cmdStart_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdStart.Click 
        Shell("c:\WINDOWS\System32\cmd.exe") 
        SendKeys.Send("perl phpkit161.pl " & textbox.text) 
    End Sub 

    Private Sub PHPKit161_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PHPKit161.Click 
        SendKeys.Send("perl phpkit161.pl ") 
    End Sub 
End Class

das & textbox.text ist neu

[Lemontree]

aber wieso machste das mit sendkeys? mit /c kannst du direkt an die konsole schreiben