Visual Basic

ATC wrote:

I have to execute an application (ie: c:\applications\task1.exe). I have to send some different commands and wait for the responses. Some responses are fast and has only few lines, some will take long time to execute but response every second with a dot until it completed

I would line to send command line through VB environment (might be with Shell (...) command?), but able to capture the responses without waiting it completed (to monitor its processes)

Anyone can show me how to do it?

Dim ps1 As New Process
ps1.StartInfo.FileName = "cmd.exe"
ps1.StartInfo.WindowStyle = ProcessWindowStyle.Normal
ps1.StartInfo.CreateNoWindow = False
ps1.StartInfo.UseShellExecute = False
ps1.StartInfo.RedirectStandardOutput = True
ps1.StartInfo.RedirectStandardInput = True
ps1.Start()

Dim s As String
Dim sIn As StreamWriter = ps1.StandardInput
Dim sOut As StreamReader = ps1.StandardOutput
sIn.AutoFlush = True

sIn.Write("dir /p" & System.Environment.NewLine)
s = sOut.ReadToEnd()
MessageBox.Show(s)

ATC wrote:

Thanks, I also hope so, but I got errors on Dim sIn As StreamWriter (not defined). might be I need add some kind of Import?

ATC wrote:

Thanks for the reply, however when I try to run as it is (without compiling error), it launches cmd (ms-dos window) empty then stays there forever until I close the ms-dos window then it shows the responses ( MessageBox.Show(s) )

I do not know why I have to close the ms-dos window manually, can we close it automatically?

manni_n wrote:

i made a c++ project long back.
now i am learning dot net..
i want to add an interface now on vb.net..
but i dont know how to add .cpp file in vb.net
can anybody help.?

Dim XmlDocObject As New XmlDocument
InitializeXml(XmlDocObject)

Private Sub InitializeXml(ByVal xmlDocument As XmlDocument)
    ' Do whatever you need to do to "xmlDocument"
    ' Do not "return" anything since you're modifying
    ' the original object.
End Sub