Conexion a ADO desde eVB

Hola a todos.

Llevo unos cuantos dias peleándome con eVB que no me deja crear un objeto
ADOCE.Connection en el código.

En la máquina tengo instalado el eVB y SQLCE que me ha instalado el ADOCE
3.1

En las Referencias del proyecto tengo activado:

- Microsoft CE ADO Control 3.1
- Microsoft CE ADO Ext. 3.1 for DDL



En el form_Load de un formulario tengo este código:

Dim mCon As ADOCE.Connection

Set mCon = CreateObject("ADOCE.Connection")


Pues bien, al ejecutar la aplicación en el emulador que trae eVB me da el
mensaje de : "Unable to Create the object"

¿Que estoy haciendo mal?

P.D.: Dentro de la ventana "Object Browser" cuando selecciono el objeto
ADOCE puedo ver todos los objetos, situados en DDL´s que están en:

C:\Archivos de Programa\WindowsCETools\wce300\Pocket PC 2002.


Muchas gracias a todos por vuestra ayuda.

Hola Ambros:

Te vas a quedar flipando de lo fácil que es. Cambia tus definiciones a

te digo:

Dim mCon
Set mCon = CreateObject("ADOCE.Connection.3.1")


"Ambros" escribió en el mensaje
news:%
> Hola a todos.
>
> Llevo unos cuantos dias peleándome con eVB que no me deja crear un

> ADOCE.Connection en el código.
>
> En la máquina tengo instalado el eVB y SQLCE que me ha instalado el

> 3.1
>
> En las Referencias del proyecto tengo activado:
>
> - Microsoft CE ADO Control 3.1
> - Microsoft CE ADO Ext. 3.1 for DDL
>
>
>
> En el form_Load de un formulario tengo este código:
>
> Dim mCon As ADOCE.Connection
>
> Set mCon = CreateObject("ADOCE.Connection")
>
>
> Pues bien, al ejecutar la aplicación en el emulador que trae eVB me da

> mensaje de : "Unable to Create the object"
>
> ¿Que estoy haciendo mal?
>
> P.D.: Dentro de la ventana "Object Browser" cuando selecciono el objeto
> ADOCE puedo ver todos los objetos, situados en DDL´s que están en:
>
> C:\Archivos de Programa\WindowsCETools\wce300\Pocket PC 2002.
>
>
> Muchas gracias a todos por vuestra ayuda.
>
>

Hola Jorge.

He probado el código que me has pasado pero sigue fallándome, el mensaje

"ActiveX component can´t create object".

Estoy corriendo el emulador que viene con eVB de "Pocket PC 2002

¿cómo podría comprobar que tengo correctamente instalado el ADOCE 3.1?

me falta alguna Dll o similar por registrar.

En las propiedades del proyecto tengo en "update components" Frecuency:
Allways y marcados las dos opciones: "Runtime files" y "Project

Muchas gracias por tu ayuda Jorge.



"jorge" escribió en el mensaje
news:
> Hola Ambros:
>
> Te vas a quedar flipando de lo fácil que es. Cambia tus definiciones a
como
> te digo:
>
> Dim mCon
> Set mCon = CreateObject("ADOCE.Connection.3.1")
>
>
> "Ambros" escribió en el mensaje
> news:%
> > Hola a todos.
> >
> > Llevo unos cuantos dias peleándome con eVB que no me deja crear un
objeto
> > ADOCE.Connection en el código.
> >
> > En la máquina tengo instalado el eVB y SQLCE que me ha instalado el
ADOCE
> > 3.1
> >
> > En las Referencias del proyecto tengo activado:
> >
> > - Microsoft CE ADO Control 3.1
> > - Microsoft CE ADO Ext. 3.1 for DDL
> >
> >
> >
> > En el form_Load de un formulario tengo este código:
> >
> > Dim mCon As ADOCE.Connection
> >
> > Set mCon = CreateObject("ADOCE.Connection")
> >
> >
> > Pues bien, al ejecutar la aplicación en el emulador que trae eVB me da
el
> > mensaje de : "Unable to Create the object"
> >
> > ¿Que estoy haciendo mal?
> >
> > P.D.: Dentro de la ventana "Object Browser" cuando selecciono el

> > ADOCE puedo ver todos los objetos, situados en DDL´s que están en:
> >
> > C:\Archivos de Programa\WindowsCETools\wce300\Pocket PC 2002.
> >
> >
> > Muchas gracias a todos por vuestra ayuda.
> >
> >
>
>

Hola Ambros: ahora si que me has dejado pillado. Creo que tienes todo bien
hecho. Yo en las propiedades tengo frequency ASK y ninguna de las otras
marcadas. Pero la verdad, no creo que influya. De todas formas asegúrate

no tener ninguna definición de recordset con la forma "as recordset", que
también falla (ya sabes "Dim rst1", por ejemplo). Si no es eso, no sé

Suerte y ya nos contarás.


"Ambros" escribió en el mensaje
news:
> Hola Jorge.
>
> He probado el código que me has pasado pero sigue fallándome, el mensaje
es:
> "ActiveX component can´t create object".
>
> Estoy corriendo el emulador que viene con eVB de "Pocket PC 2002
Emulation".
>
> ¿cómo podría comprobar que tengo correctamente instalado el ADOCE 3.1?
Quizá
> me falta alguna Dll o similar por registrar.
>
> En las propiedades del proyecto tengo en "update components" Frecuency:
> Allways y marcados las dos opciones: "Runtime files" y "Project
Components"
>
> Muchas gracias por tu ayuda Jorge.
>
>
>
> "jorge" escribió en el mensaje
> news:
> > Hola Ambros:
> >
> > Te vas a quedar flipando de lo fácil que es. Cambia tus definiciones a
> como
> > te digo:
> >
> > Dim mCon
> > Set mCon = CreateObject("ADOCE.Connection.3.1")
> >
> >
> > "Ambros" escribió en el mensaje
> > news:%
> > > Hola a todos.
> > >
> > > Llevo unos cuantos dias peleándome con eVB que no me deja crear un
> objeto
> > > ADOCE.Connection en el código.
> > >
> > > En la máquina tengo instalado el eVB y SQLCE que me ha instalado el
> ADOCE
> > > 3.1
> > >
> > > En las Referencias del proyecto tengo activado:
> > >
> > > - Microsoft CE ADO Control 3.1
> > > - Microsoft CE ADO Ext. 3.1 for DDL
> > >
> > >
> > >
> > > En el form_Load de un formulario tengo este código:
> > >
> > > Dim mCon As ADOCE.Connection
> > >
> > > Set mCon = CreateObject("ADOCE.Connection")
> > >
> > >
> > > Pues bien, al ejecutar la aplicación en el emulador que trae eVB me

> el
> > > mensaje de : "Unable to Create the object"
> > >
> > > ¿Que estoy haciendo mal?
> > >
> > > P.D.: Dentro de la ventana "Object Browser" cuando selecciono el
objeto
> > > ADOCE puedo ver todos los objetos, situados en DDL´s que están en:
> > >
> > > C:\Archivos de Programa\WindowsCETools\wce300\Pocket PC 2002.
> > >
> > >
> > > Muchas gracias a todos por vuestra ayuda.
> > >
> > >
> >
> >
>
>

Hola Jorge

Al final lo he solucionado usando ADOCE 3.0

Tengo otra pregunta:

Quiero abrir una BD access (.cdb) desde el Pocket PC 2002 Emulator.

¿Donde tengo que poner la bd en mi equipo para trabajar con ellas?
¿Como la creo? porque en mi máquina uso .mbd.

¿Me puedes poner un ejemplo de como llamar a esa base de datos desde mi
programa?

Muchas gracias por tu ayuda y perdona mi ignorancia.


"jorge" escribió en el mensaje
news:
> Hola Ambros: ahora si que me has dejado pillado. Creo que tienes todo

> hecho. Yo en las propiedades tengo frequency ASK y ninguna de las otras
> marcadas. Pero la verdad, no creo que influya. De todas formas asegúrate
de
> no tener ninguna definición de recordset con la forma "as recordset",

> también falla (ya sabes "Dim rst1", por ejemplo). Si no es eso, no sé
cómo.
> Suerte y ya nos contarás.
>
>
> "Ambros" escribió en el mensaje
> news:
> > Hola Jorge.
> >
> > He probado el código que me has pasado pero sigue fallándome, el

> es:
> > "ActiveX component can´t create object".
> >
> > Estoy corriendo el emulador que viene con eVB de "Pocket PC 2002
> Emulation".
> >
> > ¿cómo podría comprobar que tengo correctamente instalado el ADOCE 3.1?
> Quizá
> > me falta alguna Dll o similar por registrar.
> >
> > En las propiedades del proyecto tengo en "update components"

> > Allways y marcados las dos opciones: "Runtime files" y "Project
> Components"
> >
> > Muchas gracias por tu ayuda Jorge.
> >
> >
> >
> > "jorge" escribió en el mensaje
> > news:
> > > Hola Ambros:
> > >
> > > Te vas a quedar flipando de lo fácil que es. Cambia tus definiciones

> > como
> > > te digo:
> > >
> > > Dim mCon
> > > Set mCon = CreateObject("ADOCE.Connection.3.1")
> > >
> > >
> > > "Ambros" escribió en el mensaje
> > > news:%
> > > > Hola a todos.
> > > >
> > > > Llevo unos cuantos dias peleándome con eVB que no me deja crear un
> > objeto
> > > > ADOCE.Connection en el código.
> > > >
> > > > En la máquina tengo instalado el eVB y SQLCE que me ha instalado

> > ADOCE
> > > > 3.1
> > > >
> > > > En las Referencias del proyecto tengo activado:
> > > >
> > > > - Microsoft CE ADO Control 3.1
> > > > - Microsoft CE ADO Ext. 3.1 for DDL
> > > >
> > > >
> > > >
> > > > En el form_Load de un formulario tengo este código:
> > > >
> > > > Dim mCon As ADOCE.Connection
> > > >
> > > > Set mCon = CreateObject("ADOCE.Connection")
> > > >
> > > >
> > > > Pues bien, al ejecutar la aplicación en el emulador que trae eVB

da
> > el
> > > > mensaje de : "Unable to Create the object"
> > > >
> > > > ¿Que estoy haciendo mal?
> > > >
> > > > P.D.: Dentro de la ventana "Object Browser" cuando selecciono el
> objeto
> > > > ADOCE puedo ver todos los objetos, situados en DDL´s que están en:
> > > >
> > > > C:\Archivos de Programa\WindowsCETools\wce300\Pocket PC 2002.
> > > >
> > > >
> > > > Muchas gracias a todos por vuestra ayuda.
> > > >
> > > >
> > >
> > >
> >
> >
>
>