Clipper/FiveWin - Es posible conectar FiveWin con SQL, como?

 
Vista:

Es posible conectar FiveWin con SQL, como?

Publicado por Incognito (1 intervención) el 13/01/2006 19:50:31
Saludos Expertos en Clipper/FiveWin

me ha nacido una inquietud importante, ya que anteriormente yo programa en esa magnifica herramienta -Clipper- y me dejaba mucha plata:
Es posible conectar FiveWin con una DB SQL Server, si es asi como?

Gracias por su pronta y amable respuesta...
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Es posible conectar FiveWin con SQL, como?

Publicado por Gabriel Pascual (48 intervenciones) el 15/01/2006 03:23:29
FiveWin posee 3 clases para conexion de datos via ODBC

TRddODBC que te permite manejar las tablas SQL como si fueran archivos DBF

TODBC, que te permite manejar conexiones via ODBC con cualquier gestor de base de datos relaciones.

TDbOdbc que gestiona comandos SQL via ODBC para recuperar datos de cualquier servidor de datos.

Adicionalmente si trabajas con FiveWin (x)Harbour, o incluso con el xHarbour solito, puedes hacer uso de ADO para conectarte con SQL:

FUNCTION Main()
LOCAL oConexionAdo := TOLEAUTO():New("adodb.connection")
LOCAL oComando := TOLEAUTO():New("adodb.command")
LOCAL oRecordset
LOCAL aDatos := {}
oConexionAdo:Open("Provider=Advantage.OLEDB.1;User ID=adssys;Data Source=c:\fwapps\klm\agentperformance.add;Persist Security Info=False;ServerType=ADS_LOCAL_SERVER")
oComando:ActiveConnection(oConexionAdo)
oComando:CommandText := "Select * from agents order by iatacode"
oRecordSet := oComando:Execute()
DO WHILE .NOT. oRecordSet:Eof()
AADD(aDatos,oRecordset:Fields(0):value)
oRecordSet:MoveNext()
ENDDO
MsgList(aDatos)
RETURN (.T.)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar