FiveTech Software tech support forums

Buenos dias estimados,
En esta oportunidad estoy trabajando con la libreria TDolphin e intentando establecer una conexion con una base de base alojada en un Microsoft SQL Server Express Edition. Alguien tiene experiencia con este tipo de conexion y si son compatibles, de otros comentarios en el foro lei que Dolphin trabaja con MySql y no con SQL Server... es esto real?.
Me gustaria consultarles si alguno trabajo con este tipo de arquitectura y si tiene alguna recomendacion, ya que hasta el momento no logro la conexion. La idea es, una vez conectado, utilizar un store procedure en la base y recibir la respuesta.


cServer :=192.168.3.121
cUser =Admin
cPassword =Qwer1234
nPort =1433
cDBName:='Pharmadispenser'

TRY
CONNECT oServer HOST cServer ;
USER cUser ;
PASSWORD cPassword ;
PORT nPort ;
FLAGS nFlags;
DATABASE cDBName

CATCH oError
MsgInfo("Error de Conexion con el Servidor....","Informacion")
oServer:=NIL
oSay:SetText("Robot no Conectado...")
lConnect:=.F.
RETURN .F.
END

oQry := oServer:Execute("CALL EnqueueDownload(@Barcode = '7795381000055',@UserId = 72,@nChute = 2)")

Muchas gracias, cualquier ayuda es siempre bienvenida.
Saludos Mariano

Mariano,

yo estoy siguiendo un hilo similar, donde hago esta pregunta.

Aparentemente no, habrá que tomar por otro camino, Laiton y Manuel
ofrecen una alternativa. Estoy informándome al respecto.

Saludos

Roberto

Estimado Roberto,
Despues de varias horas de configurar bien el SQL server logre conectarme a la base de datos sin inconvenientes. Debajo las lineas que utilizo por medio de conexion ADO.

TRY
oCn := FW_OpenAdoConnection( "MSSQL,192.168.3.121,PharmaDispenserB2_0,sa,Qwer1234", .F. )
if !empty(oCn)
oSay:SetText("CONECTADO al ROBOT")
lRta:=.T.
lConnect:=.T.
else
oSay:SetText("SIN CONEXION...")
lConnect:=.F.
lRta:=.F.
endif

CATCH
oSay:SetText("SIN CONEXION...")
lConnect:=.F.
lRta:=.F.
END



Saludos, espero sea de utilidad.
Mariano