Conectar a BD ORACLE

[Dormant]

Buen dia a todos, espero que se encuentren bien.

La presente es para indagar quien ha trabajado VFP9 conectandose a una
Base de Datos ORACLE, yo he trabajado con MYSQL perfectamente, pero
estoy realizando un proyecto en la Universidad con BD ORACLE y
necesito conectarme.

Agradezco de antemano su valiosa colaboracion,

Dormant Muñoz C.

[Bernard]

Dormant, necesitas la cadena de conexion?, yo trabajo con Oracle XE y vfp 9



Saludos

---

De: "Dormant" <dorm...@gmail.com>
Para: "Mundo Visual FoxPro" <mundovis...@googlegroups.com>
Enviados: Martes, 29 de Marzo 2011 8:51:31
Asunto: [Mundo Visual FoxPro] Conectar a BD ORACLE

--
_______________________________________________________________
Has recibido este mensaje porque estás suscrito al Grupo "Mundo Visual
FoxPro" de Grupos de Google.

Para anular la suscripción a este grupo, envía un mensaje a:
mundovisualfox...@googlegroups.com

[Viktor Velazquez]

seria bueno que nos explicaran  tambien me uno a la peticion.. gracias
algun ejemplillo sencillo.. saludos

---

Date: Sat, 2 Apr 2011 15:41:41 -0500
From: berna...@gmail.com
To: mundovis...@googlegroups.com
Subject: Re: [Mundo Visual FoxPro] Conectar a BD ORACLE

[Dormant]

Si Sr necsito cadea de Conexion y algunos ejemplos de consultas,
insert, update, me imagino que es igual que con MYSQL y SQLSERVER.

Agradezco de antemano su valiosa colaboracion, gracias....

DCMC

On 2 abr, 15:41, Bernard <bernard1...@gmail.com> wrote:
> Dormant, necesitas la cadena de conexion?, yo trabajo con Oracle XE y vfp 9
>
> Saludos
>

> ----- Mensaje original -----
> De: "Dormant" <dorman...@gmail.com>

[Richard Silva]

Visita www.connectionstrings.com para ver cadenas y ejemplos de
conexión a las bases de datos.

[Bernard]

Ejemplo:

 

cadena="Driver=(Oracle in XEClient);  server=IP_Servidor;port=1521;UID=myUsername;PWDmyPassword;  DBQ=IP_Servidor;

lnHw=sqlConnectString(Cadena)

If lnHW=-1 then

     ? "no se pudo realizar la conexion"

     return .f.

endif

 

lnResp=sqleExec(lnHW,"Select * from tabla_Oracle","Cursor")

If lnResp=-1 then

     ? "Error de conexion"

     return .f.

endif

? "comando exitoso , data recuperada en cursor " + Cursor

 

SqlDisconnect(lnHW)

*****************************************************************************************

 

Espero que este ejemplo te sirva

 

saludos

 

 

Bernard

 

 

 

 

 

 

---