VB command prompt

[ericyeoh]

Guy, I have no idea how to use VB6.0 to open command prompt and type this string in the command prompt
Bin2text test.jpg test.text 200 vbCrLf

After that i want to drag this test.text entire character into a sting and display out in text box_change()

[gibra]

http://www.dreamincode.net/forums/showtopic17098.htm

[RobDog888]

You can pass the DOS commands directly. Then output the results to a file.

This example will pass the DIR command, enter C:\, and output the directory listing to the file C:\Dir.txt
The /K switch is to keep the DOS window open but you can change it to the /C to close it. Also, SW_HIDE to make
it totally transparent to the user.

Option Explicit

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Private Const SW_HIDE As Long = 0
Private Const SW_SHOWNORMAL As Long = 1

Private Sub Command1_Click()
    ShellExecute Me.hwnd, "Open", "C:\Windows\System32\CMD.exe", " /K Dir C:\  > C:\Dir.txt", "C:\", SW_SHOWNORMAL
End Sub

Note: you would want to use the GetSystemDirectory API to dynamically get the directory where the CMD.EXE program is located.

Another is to simply shell out your batch file like in the above example except instead of the DOS commands you place the file path to your batch file.

ShellExecute Me.hwnd, "Open", "C:\Windows\System32\CMD.exe", "C:\MyBatchFile.bat", "C:\", SW_SHOWNORMAL

A batch file is nothing more then a text file with the DOS commands in it.

Sample:

Dir C:\  > C:\Dir.txt