LetoDB: Client/Server for [x]Harbour

[Maurizio]

Hello Jose

1021 is a error of the index CDX .
Maybe you create the index with the alias ?
index on test->NUME tag ID_NUME to 'client.cdx'
if so change it in
index on field->NUME tag ID_NUME to 'client.cdx'

MAurizio
www.nipeservice.com

Try this

Code: Select all

#include "FiveWin.ch"
//----------------------------------------------------------------------------//
function Main()
Local aDbf := {}

    REQUEST LETO
    RDDSETDEFAULT( "LETO" )
 
    IF leto_Connect( "//192.168.0.43:2812/fwh/" ) == -1
         MsgInfo( "Can't connect to server ..." )
    else 
         MsgInfo("Connect")
    ENDIF
    
    aDbf  := { { "FirstName", "C", 20, 0 }, ;
             { "LastName",  "C", 20, 0 }, ;
             { "Age",       "N",  3, 0 }, ;
             { "Date",      "D",  8, 0 }, ;
             { "Rate",      "N",  6, 2 }, ;
             { "Student3",    "D",  1, 0 } }
   
    dbCreate( "//192.168.0.43:2812\fwh\TEST.DBF", aDbf )
    USE "//192.168.0.43:2812\fwh\TEST" new
    DBAPPEND()
    field->firstname := "CCCCCCCCCCCCCC"    
    DBAPPEND()
    field->firstname := "AAAAAAAAAAAAAA"    
    DBAPPEND()
    field->firstname := "BBBBBBBBBBBBBB"    
    dbgotop()     
    BROWSE() 
    USE 


return nil