In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

FireBird

Foro de Xailer profesional en español
Responder
Martin del Angel[1]
Mensajes: 114
Registrado: Dom Dic 18, 2005 7:50 pm

FireBird

Mensaje por Martin del Angel[1] »

Hola !
Alguien a trabajado con Firebird y Xailer ?
Se puede conectar por medio de OLEDB ?
Ayuda Please !
Gracias
Christian
Mensajes: 290
Registrado: Mié Abr 23, 2008 10:18 pm

FireBird

Mensaje por Christian »

Yo trabajo con Interbase y funciona muy bien, antes trabajaba con ODBC
(tODBCDatasource) pero ahora lo hago con ADO, con OLEDB for ODBC. He bajado
el controlador ODBC de para FireBird (tiene un logo como un ave fenix).
"Martin del Angel" <martindelangel@msn.com> escribió en el mensaje
news:4638efdb$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Hola !
>
> Alguien a trabajado con Firebird y Xailer ?
>
> Se puede conectar por medio de OLEDB ?
>
> Ayuda Please !
>
>
>
> Gracias
>
Martin del Angel[1]
Mensajes: 114
Registrado: Dom Dic 18, 2005 7:50 pm

FireBird

Mensaje por Martin del Angel[1] »

Ya tengo instalado el controlador de ODBC y tengo el siguiente codigo y me
truena.
METHOD FormInitialize( oSender ) CLASS TForm1
LOCAL cConection:="DSN=DYMSACOMPRAS;Driver=Firebird/InterBase(r)
driver;"+;
" Dbname=C:REGISCOMPRASCOMPRAS.FDB;CHARSET=NONE;PWD=masterk ey;UID=SYSDBA; "+;
"Client=C:USB DRIVEREGISREGIS_COMPRASgds32.dll"
WITH OBJECT ::oAdoDataSource1
:cConnect := cConection
:lConnected:=.t. // truena aqui
end
WITH OBJECT ::oSQLQuery1
:oDataSource:=::oAdoDataSource1
:cSelect:='SELECT * FROM CUENTAS'
:lOpen:=.t.
end
WITH OBJECT ::oDBBrowse1
:oDataSet:=::oSQLQuery1
END
RETURN Nil
Si no es mucha molestia un ejemplo,
Gracias
"Christian" <christianassenza@yahoo.com.ar> wrote in message
news:[email=4638f69c@ozsrv2.ozlan.local...]4638f69c@ozsrv2.ozlan.local...[/email]
> Yo trabajo con Interbase y funciona muy bien, antes trabajaba con ODBC
> (tODBCDatasource) pero ahora lo hago con ADO, con OLEDB for ODBC. He
> bajado el controlador ODBC de para FireBird (tiene un logo como un ave
> fenix).
>
>
> "Martin del Angel" <martindelangel@msn.com> escribió en el mensaje
> news:4638efdb$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>> Hola !
>>
>> Alguien a trabajado con Firebird y Xailer ?
>>
>> Se puede conectar por medio de OLEDB ?
>>
>> Ayuda Please !
>>
>>
>>
>> Gracias
>>
>
>
Christian
Mensajes: 290
Registrado: Mié Abr 23, 2008 10:18 pm

FireBird

Mensaje por Christian »

Con este procedimiento inicializo el cConnect del ADODataSource y lo conecto
*----------------------------------------------------------- -------------------*
procedure InicializaBDADO(oBD,lAbrir)
*----------------------------------------------------------- -------------------*
DEFAULT lAbrir TO .T.
oBD:cConnect :='Provider=MSDASQL.1;Persist Security Info=False;Data
Source=BDSISGESTION'
oBD:cUser :='sysdba'
oBD:cPassword:='masterkey'
oBD:lDisplayErrors:=.T.
if lAbrir
oBD:Connect()
endif
return
En los formularios en el evento oninitialize escribo lo siguiente:
if !::BasedeDatos:lConnected
InicializaBDADO(::BasedeDatos,.T.)
::lCentered:=.T.
endif
BasedeDatos es un objeto clase tADODataSource.
BDSISGESTION es el DSN ODBC que apunta a la base de datos.
y me funciona bien
"Martin del Angel" <martindelangel@msn.com> escribió en el mensaje
news:46396ec9$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Ya tengo instalado el controlador de ODBC y tengo el siguiente codigo y me
> truena.
>
>
> METHOD FormInitialize( oSender ) CLASS TForm1
> LOCAL cConection:="DSN=DYMSACOMPRAS;Driver=Firebird/InterBase(r)
> driver;"+;
>
> " Dbname=C:REGISCOMPRASCOMPRAS.FDB;CHARSET=NONE;PWD=masterk ey;UID=SYSDBA; "+;
> "Client=C:USB DRIVEREGISREGIS_COMPRASgds32.dll"
>
> WITH OBJECT ::oAdoDataSource1
> :cConnect := cConection
> :lConnected:=.t. // truena aqui
> end
>
> WITH OBJECT ::oSQLQuery1
> :oDataSource:=::oAdoDataSource1
> :cSelect:='SELECT * FROM CUENTAS'
> :lOpen:=.t.
> end
>
> WITH OBJECT ::oDBBrowse1
> :oDataSet:=::oSQLQuery1
> END
>
> RETURN Nil
>
> Si no es mucha molestia un ejemplo,
>
> Gracias
>
>
>
>
> "Christian" <christianassenza@yahoo.com.ar> wrote in message
> news:[email=4638f69c@ozsrv2.ozlan.local...]4638f69c@ozsrv2.ozlan.local...[/email]
>> Yo trabajo con Interbase y funciona muy bien, antes trabajaba con ODBC
>> (tODBCDatasource) pero ahora lo hago con ADO, con OLEDB for ODBC. He
>> bajado el controlador ODBC de para FireBird (tiene un logo como un ave
>> fenix).
>>
>>
>> "Martin del Angel" <martindelangel@msn.com> escribió en el mensaje
>> news:4638efdb$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>> Hola !
>>>
>>> Alguien a trabajado con Firebird y Xailer ?
>>>
>>> Se puede conectar por medio de OLEDB ?
>>>
>>> Ayuda Please !
>>>
>>>
>>>
>>> Gracias
>>>
>>
>>
>
>
Responder