I've made a COBOL-programgenerator in Access 2003. Now I want to compile the generated sources by a COBOL-compiler. Therefor I must open a DOS-box and give several command.

My problem is, how can I open a DOS-box using Access 2003 VBA.

You would need to start like this:

'==========================
Set objShell = WScript.CreateObject("WScript.Shell")
objShell.Run("%comspec% /k ping /?"), 1, True
'==========================

This script opens Cmd.Exe, and Command.Exe (depending on which version you have) and then runs Ping Info. The /k keeps the window open, and to make it close automatically, you would use /c.

Create your code, then put it in a batch file, then use this code and call the batch file, probably using /c.


mmcdonal