Files
harbour-core/harbour/contrib/rddsql/sddodbc/tests/test1.prg
Viktor Szakats 73f9c62553 2009-11-20 13:44 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
* contrib/rddsql/rddsql.hbc
    + Added incpaths=. so now .ch file will be automatically found.

  * contrib/rddsql/sddmy/tests/test1.prg
  * contrib/rddsql/sddodbc/tests/test1.prg
  * contrib/rddsql/sddodbc/tests/test2.prg
    - Deleted explicit paths from #include directives.
      (after above .hbc change this isn't necessary)

  * contrib/rddsql/Makefile
    + Added to install .ch file.

  * contrib/rddsql/hbrddsql.ch
    + Added NOTE, that file is used also by C code.
    ! Added EOL at EOF.
2009-11-20 12:45:41 +00:00

24 lines
544 B
Plaintext

/*
* $Id$
*/
#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
DBGOTOP()
BROWSE()
DBCLOSEAREA()
RETURN