<div>
There's an answer on the new Microsoft MSDN Code Site<br />
<br />
<a href="http://msdn.microsoft.com/code" rel="ugc nofollow">http://msdn.microsoft.com/code</a><br />
The best way is using the API<br />
<br />
i.e.<br />
<br />
AllocConsole<br />
FreeConsole<br />
CloseHandle<br />
GetStdHandle<br />
WriteConsole <br />
SetConsoleCtrlHandler<br />
<br />
The example wraps this up in a class wrapper, so it's easy to manipulates<br />
<br />
You'll find this in Code Exapmles\Visual Studio, Tools &amp;&nbsp;Lanuages\Visual Basic\Console Window<br />
<br />
Simon
</div>


There's an answer on the new Microsoft MSDN Code Site

http://msdn.microsoft.com/code [http://msdn.microsoft.com/code]
The best way is using the API

i.e.

AllocConsole
FreeConsole
CloseHandle
GetStdHandle
WriteConsole
SetConsoleCtrlHandler

The example wraps this up in a class wrapper, so it's easy to manipulates

You'll find this in Code Exapmles\Visual Studio, Tools & Lanuages\Visual Basic\Console Window

Simon

<div>
OK. I see i didn't explain myself well. The code you showed me indeed created a console which accepts keyboard and mouse input but I wanted to control a REAL DOS window. I want to be able to run a certain DOS App and then send key input to it (from inside my program) for example: I would open a DOS window and my program would type &quot;DIR&quot; and then the Enter key and then the DOS window would show the results.<br />
<br />

</div>


OK. I see i didn't explain myself well. The code you showed me indeed created a console which accepts keyboard and mouse input but I wanted to control a REAL DOS window. I want to be able to run a certain DOS App and then send key input to it (from inside my program) for example: I would open a DOS window and my program would type "DIR" and then the Enter key and then the DOS window would show the results.



<div>
<div class="content wysiwyg-content">
What I want to do is be able to send key clicks (type as though i am using the keyboard) to a DOS window. The following code works with Windows programs but besides opeing the DOS window and doing some wierd things, did not work:<br />
<br />
Private Sub Command1_Click()<br />
Dim ReturnValue, I<br />
ReturnValue = Shell(&quot;C:\command.com&quot;, 1) &nbsp; <br />
'MsgBox ReturnValue<br />
AppActivate ReturnValue &nbsp; &nbsp;' Activate<br />
SendKeys &quot;X&quot;, True<br />
<br />
<br />
End Sub
</div>
</div>


What I want to do is be able to send key clicks (type as though i am using the keyboard) to a DOS window. The following code works with Windows programs but besides opeing the DOS window and doing some wierd things, did not work:

Private Sub Command1_Click()
Dim ReturnValue, I
ReturnValue = Shell("C:\command.com", 1)   
'MsgBox ReturnValue
AppActivate ReturnValue    ' Activate
SendKeys "X", True


End Sub

Controlling a DOS window from inside VB

Visual Basic is Microsoft’s event-driven programming language and integrated development environment (IDE) for its Component Object Model (COM) programming model. It is relatively easy to learn and use because of its graphical development features and BASIC heritage. It has been replaced with VB.NET, and is very similar to VBA (Visual Basic for Applications), the programming language for the Microsoft Office product line.