Hi!
/*
* $Id: test1.prg 12948 2009-11-20 12:45:41Z vszakats $
*/
#include "hbrddsql.ch"
REQUEST SDDODBC, SQLMIX
PROC main()
RDDSETDEFAULT( "SQLMIX" )
SET( _SET_DATEFORMAT, "yyyy-mm-dd" )
? "Connect:", RDDINFO( RDDI_CONNECT, { "ODBC", "DBQ=" +
hb_DirBase() + "\..\..\..\hbodbc\tests\test.mdb;Driver={Microsoft Access
Driver (*.mdb)}" } )
? "Use:", DBUSEAREA( .T.,, "select * from test", "test" )
? "Alias:", ALIAS()
? "DB struct:", HB_VALTOEXP( DBSTRUCT() )
INKEY( 0 )
BROWSE()
INDEX ON FIELD->SALARY TO salary // problem in this line
DBGOTOP()
BROWSE()
DBCLOSEAREA()
RETURN
Return of function dbstruct()
DB struct: {{"F", "C", 20, 0}, {"L", "C", 20, 0}, {"S", "C", 30, 0},
{"C", "C",
30, 0}, {"S", "C", 2, 0}, {"Z", "C", 10, 0}, {"H", "@", 19, 0}, {"M",
"L", 1, 0}
, {"A", "I", 10, 0}, {"S", "I", 10, 0}, {"N", "C", 70, 0}}
Best regards,
Itamar M. Lins Jr.
_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour
