>IF NOT THISFORM.vfpcompressionut1.createzipfile() >>>
>>THISFORM.waitMode( .T. ) >>WAIT WINDOW "Backup en cours ...." NOWAIT >>*-- Put here a acTivex for waiting ? >> >>IF THISFORM.vfpcompressionut1.createzipfile() = .F. >> Goapp.cReturnParametres( LAST_LECT_BACKUP_3510 , 'M' , THISFORM.listback.VALUE ) >> THISFORM.uretval = NO_BACKUP_REALISED >>ELSE >> >> THISFORM.uretval = IDOK >>ENDIF >>THISFORM.waitMode( .F. ) >> >>>>