I have a form in Access and I want to open a Windows Command window. I created a command button to open this window as follows:
Private Sub cmdShowCommandWindow_Click()
Dim MyAppId As Double
MyAppId = Shell("command.com", 1)
I would like to have the window load a string into the command line.
Dim xstr as string
xstr = ping mycomputer
I want this string to show up in the command window when it opens and then execute it leaving the command windo open to show the ping command replying.
> Ping mycomputer