[Pytanie] Komendy w CMD

[Xyli]

Witam.

 

Piszę swój pierwszy program i mam taki problem, że nie wiem jak do cmd wpisać komendę, żeby program ją wpisał do cmd. Np. chcę, żeby wpisało mi cd C:\ i uruchomiło proces mpc.exe. WIem tylko tyle, że shella można uruchomić tak

Shell("cmd.exe")

 

Przeszukałem internet i nie znalazłem rozwiązania.

[SuicideRlz]

Chcesz interakcję z samym okienkiem czy po prostu uruchomić C:\mpc.exe?

[Xyli]

Chcę interakcję.

[SuicideRlz]

Nie wiem czy o to tobie chodzi...

Imports System.Diagnostics

Dim p As Process = New Process
p.StartInfo.FileName = "cmd.exe"
p.StartInfo.Arguments = "/K C:\mpc.exe"

p.Start()
p.WaitForExit() 'Jak nie chcesz czekac na zakonczenie, usun linijke; Zakonczenie = zamkniecie okna cmd
'Rob co chcesz

[Xyli]

Podkreśla mi Imports i pisze "Syntax error". To imports to gdzie mam dać?

 

@Edit

Z imports sobie poradziłem. A jak zrobić, żeby po wykonaniu komendy cmd się zamknął?

[SuicideRlz]

Zmień /K na /C.

[Xyli]

I jeszcze jedno. Chcę, żeby po wykonaniu komendy program sam wcisnął ENTER i dopiero się zamknął. Jak to zrobić?

[SuicideRlz]

SendKeys.Send("{ENTER}")

[Xyli]

Mam to dopisać między tym, tak?

p.StartInfo.Arguments = "/K C:\mpc.exe"

p.Start() 

[SuicideRlz]

Lepiej byś wyszedł z AutoIT, tam masz już zdefiniowane takie funkcje.

 

p.StartInfo.Arguments = "/C C:\mpc.exe"
p.Start()
Threading.Thread.Sleep(500)
SendKeys.Send("{ENTER}")