CodeItBetter Programming Another VB Programming Blog

'System & API - How to Pass String To Dos Environment

Private Sub Main()
    'To open a DOS window
    Shell ("command.com"), vbNormalFocus
 
    'clear the clipboard
    Clipboard.Clear
 
    'Copy the string you want to pass to the Dos Environment, including the Enter key (Chr$(13) = Enter Key)
    Clipboard.SetText "Dir *.*" + Chr$(13)
 
    'set the focus to the Dos window. "MS-DOS Prompt"
    AppActivate "MS-DOS Prompt"
 
    'use the "SendKeys" function to send the string from the clipboard to the DOS Environment
    SendKeys "% ep", 1
End Sub