topic-36457

Board index FiveWin para Harbour/xHarbour Conectar SQL SERVER

MGA

Posts: 1286

Joined: Mon Feb 25, 2008 02:54 PM

Conectar SQL SERVER
Posted: Thu Dec 13, 2018 02:10 PM

Amigos,

preciso conectar em um banco SQL SERVER, podem me indicar qual ferrramenta utilizar?

E se possível algum exemplo!

obrigado

ubiratanmga@gmail.com

FWH24.04
BCC7.3
HARBOUR3.2
xMate
Pelles´C
TDolphin

horacio

Posts: 1364

Joined: Wed Jun 21, 2006 12:39 AM

Re: Conectar SQL SERVER
Posted: Thu Dec 13, 2018 03:31 PM

Ado sin dudas ...

Saludos

Lailton

Posts: 231

Joined: Fri Jul 20, 2012 01:49 AM

Re: Conectar SQL SERVER
Posted: Fri Dec 14, 2018 06:10 PM

Boa tarde meu amigo,

HDO daqui umas semanas terá suporte a ODBC e voce podera conectar a qualquer banco de dados.
HDO é uma lib fantastica com suporte nativo a MySQL e SQLite que agora tera uma opcao de usar ODBC tambem com o mesmo codigo.

Se for algo que voce possa aguardar te aviso quando estiver pronto.

Se for algo de urgencia voce pode da uma olhada nos exemplos do harbour com hbodbc.

Abraço

Regards,

Lailton Fernando Mariano

jnavas

Posts: 492

Joined: Wed Nov 16, 2005 12:03 PM

Re: Conectar SQL SERVER
Posted: Sat Dec 15, 2018 02:54 AM

Code (fw): Select all Collapse

LOCAL aDsn:=OdbcDsnEntries()
LOCAL cDsn:=aDsn[1] ,cLogin,cPass,lFields:=.F.
LOCAL cTable:="Nombredelatabla"

 oODbc:=TODBC():New(cDsn, cLogin, cPass )

  IF !lFields
    oOdbc:lDateAsStr:=.T.
  ENDIF

  cSql   :="SELECT * FROM "+cTabla 

  oTable :=oOdbc:Query(cSql)
  aData  :=ACLONE(oTable:aFill())  
  aFields:=ACLONE(oTable:aFields)

Saludos
Juan Navas
www.datapronet.com
www.adaptapro.com
jnavas@adaptapro.com

FiveTech Support Forums

Continue the discussion