cdx and area
Posted: Tue Aug 19, 2008 4:51 pm
I need to use two dbf in a program
on palm
Can I use cdx ?
Can i Use two areas ?
Why this sample not run ?
on palm
Can I use cdx ?
Can i Use two areas ?
Why this sample not run ?
- Code: Select all Expand view
#include "FWCE.ch"
REQUEST DBFCDX, DBFFPT
External ordkeyno, ordkeycount,ordcreate
function Main()
local oWnd
RddSetDefault( "DBFCDX" )
Select 1
if ! Db_Open( "customer", "customer" )
RETURN NIL
endif
Select 2
if ! Db_Open( "customer2", "customer2" )
RETURN NIL
endif
DEFINE WINDOW oWnd TITLE "MyApp"
select 1
browse()
select 2
browse()
ACTIVATE WINDOW oWnd
return nil
FUNCTION Db_Open(cdbf, cAlias )
use &cDbf ALIAS &cAlias index &cDbf
RETURN .t.