SQLMIX

165 views
Skip to first unread message

Riza F. Levi

unread,
Sep 19, 2020, 5:57:17 PM9/19/20
to ModHarbour
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 ---------------------------



Reply all
Reply to author
Forward
0 new messages