Hola a todos,
Alguien a usado esta libreria para acceder a Oracle ? Algun ejemplo o ayuda con el tema ?
Gracias !
Carlos.
cConnStr := "Provider=MSDASQL.1;Password ="+aVar[2]+";Persist Security Info=False;"+;
"User ID="+aVar[1]+";Data Source=Oracle"
oCn := FW_OpenAdoConnection( cConnStr )
IF oCn = NIL
MsgStop( "Usuario no válido, verifique!!","Error al conectar")
RETURN nil
ENDIF
oRs := TOleAuto():New("ADODB.Recordset")
oRs:Open("SELECT * FROM USUARIOS WHERE USUARIO='"+ALLTRIM(aVar[1])+"'",oCn)
cNombre := oRs:Fields("NOMBRE"):Value
Return to FiveWin para Harbour/xHarbour
Users browsing this forum: Horizon, Julio Cepeda and 88 guests