Search Forum Home   Visual FoxPro  Cod, sintaxa si comenzi  Verificare tabe...  Verificare tabela deschisa    12/8/2010 9:40:02 AM danilea 212 posts Verificare tabela deschisa  (N/A) Buna ziua, Deschid cu VFP9,in fereastra de comenzi,o tabela: USE Cale\Tabela1. Intr-o aplicatie(*.EXE) vreau sa deschid aceeasi Cale\Tabela1. "Eroare 1705.File access is denied Cale\Tabela1". Am incercat sa fac o verificare astfel: TRY tabela_deschisa = .F. USE Cale\Tabela1 EXCLUSIVE ALIAS Tabela1 CATCH tabela_deschisa = .T. IF tabela_deschisa = .T. USE IN SELECT("cale\Tabela1") SELECT 0 use Cale\Tabela1 EXCLUSIVE alias Tabela1 ENDIF ENDTRY Chiar daca setez caile cu SET PATH...,aceeasi eroare. Multumesc.  12/8/2010 10:07:20 AM CLASSOFT 231 posts www.classoft.ro Re: Verificare tabela deschisa  (Romania)  Normal sa-ti dea eroarea. Fortezi  redeschirea tabelei in CATCH , USE Cale\Tabela1 EXCLUSIVE ALIAS Tabela1 , daca deja este deschisa tabela exclusiv, NU o mai poti deschide inca odata. Comanda IF  pe variabila tabela_deschisa = .T. nu-si are rostul,  dupa CATCH va fi  obligatoriu .T. dupa cum ai scris codul Ce vrei sa faci ? Indexare sau .. TRY     USE FURNIZOR EXCL IN 0     IF USED('FURNIZOR')         SELECT FURNIZOR        *INDEX ....     ENDIF CATCH     WAIT WINDOW 'Abandon indexare' ENDTRY  12/8/2010 7:42:13 PM Grigore Dolghin 3590 posts www.class-software.eu Re: Verificare tabela deschisa  (N/A) Nu e nevoie nici de If Used(), fiindca daca prima linie da eroare sare direct la catch: TRY    USE FURNIZOR EXCL IN 0    SELECT FURNIZOR    * INDEX... CATCH    WAIT WINDOW 'Abandon' ENDTRY Grigore Dolghin Visual FoxPro MVP 2006 - 2010 Class Software My blog  Page 1 of 1   Visual FoxPro  Cod, sintaxa si comenzi  Verificare tabe... Flat View Tree View Oldest To Newest Newest To Oldest