>Thank you very much Sergey...
>
>your answer is the solution as usually.
>
>is there a way to catch the error codes it says it returns?

Try

oShell = Createobject("wscript.shell")
lnRetCode = oShell.Run(FULLPATH("CreateCD.exe") + " " + lcParam ,1, .T.)