Hi all,
Is it possible to use sqlmix in mod harbour ?
Which dll needed ?
I try this following prg and not working :
#require "rddsql"
REQUEST DBFCDX, DBFFPT, SQLMIX
#define RDDI_CONNECTION 12
#define RDDI_CONNECT 1001
#define RDDI_DISCONNECT 1002
#define RDDI_EXECUTE 1003
#define DBU_SERVER 'localhost'
#define DBU_USER 'root'
#define DBU_PASS ''
#define DBU_DATABASE 'my_db'
RDDSETDEFAULT("SQLMIX")
nRET := RDDINFO( RDDI_CONNECT, { "MYSQL", DBU_SERVER, DBU_USER, DBU_PASS, DBU_DATABASE } )
if empty(nRET)
? 'Connection failed'
return
endif
lRET:=.t.
cQUERY := "select USER_CODE, PASSWORD, APP_CODE, DELETOR from tb_user where DELETOR='' and upper(USER_CODE)='"+upper(gUSER)+"'"
TRY
DbUseArea( .t., 'SQLMIX', cQUERY, 'TB_USER' )
CATCH oError
lRET:=.f.
END
// ---------------------------- end ---------------------------