Stanley,
put below two lines into programs, do the program to shutdown the computer in your VFP application.
Chau, Moon

Declare integer ExitWindowsEx in user32 integer uFlags,integer dwReserved
lret = ExitWindowsEx(1+4,0) &&SHUTDOWN AND FORCE