Dear All,

I just bought FWPPC and try an example but the USE command to open database file (DBFCDX) doesn't work. What is my mistake? The error message is "Open error; Stack Call; DbUseArea(0)"

Best regards
Dutch

Dutch,

What FWPPC sample are you testing ?

Please notice that you have to specify the CurDir():

USE ( CurDir() + "\Customer" ) VIA "DBFCDX"

Dear Antonio,

This is my first test prg.

include "Fwce.ch"

--------------
FUNCTION MAIN()

LOCAL oWnd, oBmp

LOCAL cVar1 := SPACE( 20 ) 
LOCAL cVar2 := SPACE( 20 )

// HB_LANGSELECT( "ESWIN" )
SET DELETED ON
SET DATE TO BRITISH
SET SOFTSEEK ON
SET CENTURY ON
SET EPOCH TO 2000

Request DbfCdx
Request DbfFpt
RddSetDefault ('DbfCdx')

Use (CURDIR()+"\CCRTBL") VIA "DBFCDX" NEW

DEFINE WINDOW oWnd

@ 1, 1 SAY "Table No. :"; 
       SIZE 70, 20

@ 1, 10 GET cVar1; 
        SIZE 70, 20

@ 80,15 BTNBMP FILENAME CURDIR() + "\Open.bmp" ; //     'Open' ;
    SIZE 60, 40 ;
    ACTION MsgInfo('Open Table : '+rtrim(cVar1) )

@ 80,90 BTNBMP FILENAME CURDIR() + "\Exit.bmp" ; //     'Open' ;
    SIZE 60, 40 ;
    ACTION if(MsgYesNo('Exit Program','Select Options'), oWnd:End(), )

ACTIVATE WINDOW oWnd

DbCloseAll()
RETURN NIL

Best regards,
Dutch

Dear Antonio,

I'm missing a database file in emulator path. Sorry, It works fine now.

Best regards,
Dutch

Dutch,

Glad to know its working fine