>lcCmd=[Pkzip25 -add=update "]+slcZipName+ '" '+lcList+' >'+ForcePath('zip.log', ; > fullp(set('dire')))+chr(13)+chr(10) ; > +'exit '+chr(13)+chr(10) >=strtofile(lcCmd, curd()+'zipit.bat') > >cmdl=fullp(curd()+'zipit.bat') >lcThere=fullpath(".") >oProcess=NewObject('api_apprun','process', '', cmdl, lcThere, 'HID') >oProcess.LaunchAppAndWait >Release oProcess>