Page 1 of 1

Abrir varios ficheros dbf

Posted: Mon Jan 15, 2007 12:06 pm
by AndresZaragoza
Buenas al foro.
Tengo la necesidad de tener abiertas más de un dbf a la vez. En VFP para abrir un nuevo fichero, se selecciona un área de tabajo libre y se abre pudiendo tener un sinfin de ficheros abiertos a la vez. Se hace con SELECT 0.

En FiveWin como se hace esto??

Esto no abre la tabla provincias:

FUNCTION AbrirFicheros
Request DbfCdx
Request DbfFpt
RddSetDefault ('DbfCdx')
Request Hb_Lang_PLWIN
Request Hb_CodePage_PLWIN

**********
* Clientes
**********
IF .NOT. USED("Efth010")
USE (CurDir()+"\Efth010") NEW
ELSE
SELECT Efth010
ENDIF

INDEX ON CprvCod TO CODIGO ADDI
INDEX ON CprvNom TO FISCAL ADDI
INDEX ON CprvOme TO COMERCIAL ADDI

Efth010->( OrdSetFocus( "CODIGO" ) )
Efth010->( DbGoTop() )


**********
* Provincias
**********
IF .NOT. USED("Efth003")
SELECT 0
USE (CurDir()+"\Efth003") NEW
ENDIF
RETURN nil

Gracias de antemano.

Ya está .

Posted: Mon Jan 15, 2007 12:33 pm
by AndresZaragoza
Disculpad era un problema mio