Typo fix:

My previous message should've read #define SW_SHOW_MAXIMIZED 3

#define SW_SHOW_NORMAL 1
#define SW_SHOW_MINIMIZED 2
#define SW_SHOW_MAXIMIZED 3
oShell = createobject("WScript.Shell")
oShell.Run("winrar a -o+ bb.rar",SW_SHOW_NORMAL,.T.)

BTW, Ransome, please do not start two threads for the same subject. One should be enough.

Thx.

>>>>>>>>>>>>>>
>However, The program switch to next line, before the first line run completed.
>How can I program to do that the wait window preform after the run command completely done.
>>>>>>>>>>>>>>
>
>You can use WSH:
>

>#define SW_SHOW_NORMAL 1
>#define SW_SHOW_MINIMIZED 2
>#define SW_SHOW_MAXIMIZED 1
>oShell = createobject("WScript.Shell")
>oShell.Run("winrar a -o+ bb.rar",SW_SHOW_NORMAL,.T.)
>