>_try = 0 >*- > stErr = ON("ERROR") > ON ERROR do goApp.GRESKA1() with "DATA\TIP_O", ERROR() && or only RETRY > DO WHILE _try < 5 > SELECT 0 **************** *** USED("DATA\TIP_O") this is incorrect, because you should to put a AliasName, not a filename **************** > if !USED("DATA\TIP_O") > USE DATA\TIP_O in 0 ALIAS TIPOO EXCL && L1 > SELECT TIPOO && L2 > else > MESSAGEBOX( "TABLE PUT IN USE AT: " + str(_try) ) > exit > endif > IF !USED("TIPOO") > MESSAGEBOX( "TABLE NOT YET USED AT TRY:" + str(_try) ) && L3 > _try = _try + 1 > loop > ELSE > MESSAGEBOX("TABLE PUT IN USE AT FIRST CALL!") && L4 > EXIT > ENDIF > ENDDO > ON ERROR &stErr >*...................... > SELECT TIPOO > USE > CLOSE DATABASES > > >TIA, gojko > >PS >(all spaces are "eated" so in preview text is not well looking as I see it while writing ?) I have not understood the problem that you have, but you can consider this. <PRE> IF !USED("TIPOO") stErr = ON("ERROR") ON ERROR do goApp.GRESKA1() with "DATA\TIP_O", ERROR() && or only RETRY FOR _try=1 TO 5 SELECT 0 USE DATA\TIP_O ALIAS TIPOO EXCL && L1 IF USED() EXIT ENDIF MESSAGEBOX( "TABLE NOT YET USED AT TRY:" + str(_try) ) && L3 NEXT ON ERROR &stErr MESSAGEBOX( "TABLE OPEN AT TRY:" + str(_try) ) && L3 ENDIF *...................... SELECT TIPOO USE CLOSE DATABASES