Conectar base de datos

28/02/2004 - 01:10 por MiC | Informe spam
Hola.
Tengo un problema al intentar generar codigo con eMbedded Visual Basic 3.
La conexion la hare conectado por GPS.
En Visual Basic 6 genero la conexion a la base de datos

Public Db As ADODB.Connection
Set Db = New Connection
Db.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial
Catalog=DatosEmp;Data Source=orion"

y creo el recordset

Public Rst1 As New ADODB.Recordset
Set Rst1 = New ADODB.Recordset
With Rst1
.CursorLocation = adUseServer
.CursorType = adOpenDynamic
.LockType = adLockOptimistic
.Source = "Select * from datos"
.ActiveConnection = Db
.Open
End With

el caso es que para la PPC no sirven estos comandos
¿Puede alguien ayudarme un poco y darme alguna nocion de como hacerlo?
Es la primera vez que programo para la PPC y la verdad no se muiy bien por
donde me dal el aire.


Fdo. Jesus Mª Martínez
TSM 400
PPC 2002

Preguntas similare

Leer las respuestas

#1 ralvaradot
01/03/2004 - 17:43 | Informe spam
Hola Jesus

Lo primero que tienes que tener en cuenta es que Vb y eVb son DIFERENTES. Al
igual que las cadenas de conexion que utilices para las bases de datos, la
cadena de conexion que estas usando es para SQL en el PC.

En el pocket si vas a utilizar una base de datos SQLCE, la cadena de
conexion es diferente y debes habver instalado el SQLCE de lo contrario no
te va a fucnionar.

Puedes tambien utilizar Pocket Access para tu base d e datos.

Pasate por www.mipcdebolsillo.com en los foros de programacion, alli hay
muchos post que te pueden ayudar a solucionar la dua que tienes ahora.

Saludos

Roberto Alvarado
Bogota - Colombia

"MiC" wrote in message
news:%23uM$D9Y$
Hola.
Tengo un problema al intentar generar codigo con eMbedded Visual Basic 3.
La conexion la hare conectado por GPS.
En Visual Basic 6 genero la conexion a la base de datos

Public Db As ADODB.Connection
Set Db = New Connection
Db.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User


ID=sa;Initial
Catalog=DatosEmp;Data Source=orion"

y creo el recordset

Public Rst1 As New ADODB.Recordset
Set Rst1 = New ADODB.Recordset
With Rst1
.CursorLocation = adUseServer
.CursorType = adOpenDynamic
.LockType = adLockOptimistic
.Source = "Select * from datos"
.ActiveConnection = Db
.Open
End With

el caso es que para la PPC no sirven estos comandos
¿Puede alguien ayudarme un poco y darme alguna nocion de como hacerlo?
Es la primera vez que programo para la PPC y la verdad no se muiy bien por
donde me dal el aire.


Fdo. Jesus Mª Martínez
TSM 400
PPC 2002



Respuesta Responder a este mensaje
#2 MiC
03/03/2004 - 09:51 | Informe spam
Hola.
Se supone que tengo instalado el SQL Server CE Administration. Cuando lo
ejecuto me dice: "IIS does not seem to be runnin on this computer. Please
start IIS before continuing." lo que no se es donde encontrar ese programa.
de todas formas, ¿Hay alguna otra forma de atacar una bd que esta en un
servidor?, El codigo que utilizo es el siguiente, pero lo puedo variar para
poder atacar la bd.

Dim C As ADOCE.Connection
Dim R As ADOCE.Recordset
Set C = CreateObject("adoce.Connection.3.0")
Set R = CreateObject("adoce.Recordset.3.0")
C.ConnectionString = "provider=SQLOLEDB;pasword=;Persist Security
Info=true;User ID=sa;Initial Catalog=DatosEmp;Data Source=Orion"
C.Open
R.ActiveConnection = C
R.CursorType = adOpenKeyset
R.LockType = adLockOptimistic
R.Source = "SELECT nombre FROM dbo.datos WHERE mat(2 and empresa=5"
R.Open
Label1.Caption = R("nombrecompleto")

Gracias
Un saludo

Fdo. Jesus M Martinez
TSM 400
Pocket PC
"ralvaradot" escribió en el mensaje
news:OC6Xtx6$
Hola Jesus

Lo primero que tienes que tener en cuenta es que Vb y eVb son DIFERENTES.


Al
igual que las cadenas de conexion que utilices para las bases de datos, la
cadena de conexion que estas usando es para SQL en el PC.

En el pocket si vas a utilizar una base de datos SQLCE, la cadena de
conexion es diferente y debes habver instalado el SQLCE de lo contrario no
te va a fucnionar.

Puedes tambien utilizar Pocket Access para tu base d e datos.

Pasate por www.mipcdebolsillo.com en los foros de programacion, alli hay
muchos post que te pueden ayudar a solucionar la dua que tienes ahora.

Saludos

Roberto Alvarado
Bogota - Colombia

"MiC" wrote in message
news:%23uM$D9Y$
> Hola.
> Tengo un problema al intentar generar codigo con eMbedded Visual Basic


3.
> La conexion la hare conectado por GPS.
> En Visual Basic 6 genero la conexion a la base de datos
>
> Public Db As ADODB.Connection
> Set Db = New Connection
> Db.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User
ID=sa;Initial
> Catalog=DatosEmp;Data Source=orion"
>
> y creo el recordset
>
> Public Rst1 As New ADODB.Recordset
> Set Rst1 = New ADODB.Recordset
> With Rst1
> .CursorLocation = adUseServer
> .CursorType = adOpenDynamic
> .LockType = adLockOptimistic
> .Source = "Select * from datos"
> .ActiveConnection = Db
> .Open
> End With
>
> el caso es que para la PPC no sirven estos comandos
> ¿Puede alguien ayudarme un poco y darme alguna nocion de como hacerlo?
> Es la primera vez que programo para la PPC y la verdad no se muiy bien


por
> donde me dal el aire.
>
>
> Fdo. Jesus Mª Martínez
> TSM 400
> PPC 2002
>
>
>


Respuesta Responder a este mensaje
#3 ralvaradot
03/03/2004 - 15:55 | Informe spam
Hola Fernando

hay 2 cosas tu tienes una base d edatos en el Pocket, esa base de datos es
SQLCE, tu esa base de datos es local, existen 2 metodos para sincronizar esa
base de datos local con un servidor SQL2000 en un PC, esos dos metodos son
replicacion y RDA (Remote Data Access)

Ambos metodos estan documentados en los libros de SQLCE.

necesitas el IIS (Internet Information Server) corriendo en tu servidor o en
tu PC para poder establecer esta comunicacion entre el PC y el Pocket por
cualquiera de las dos formas de sincronizacion .

Saludos,

Roberto Alvarado
Bogota - Colombia

"MiC" wrote in message
news:
Hola.
Se supone que tengo instalado el SQL Server CE Administration. Cuando lo
ejecuto me dice: "IIS does not seem to be runnin on this computer. Please
start IIS before continuing." lo que no se es donde encontrar ese


programa.
de todas formas, ¿Hay alguna otra forma de atacar una bd que esta en un
servidor?, El codigo que utilizo es el siguiente, pero lo puedo variar


para
poder atacar la bd.

Dim C As ADOCE.Connection
Dim R As ADOCE.Recordset
Set C = CreateObject("adoce.Connection.3.0")
Set R = CreateObject("adoce.Recordset.3.0")
C.ConnectionString = "provider=SQLOLEDB;pasword=;Persist Security
Info=true;User ID=sa;Initial Catalog=DatosEmp;Data Source=Orion"
C.Open
R.ActiveConnection = C
R.CursorType = adOpenKeyset
R.LockType = adLockOptimistic
R.Source = "SELECT nombre FROM dbo.datos WHERE mat(2 and empresa=5"
R.Open
Label1.Caption = R("nombrecompleto")

Gracias
Un saludo

Fdo. Jesus M Martinez
TSM 400
Pocket PC
"ralvaradot" escribió en el mensaje
news:OC6Xtx6$
> Hola Jesus
>
> Lo primero que tienes que tener en cuenta es que Vb y eVb son


DIFERENTES.
Al
> igual que las cadenas de conexion que utilices para las bases de datos,


la
> cadena de conexion que estas usando es para SQL en el PC.
>
> En el pocket si vas a utilizar una base de datos SQLCE, la cadena de
> conexion es diferente y debes habver instalado el SQLCE de lo contrario


no
> te va a fucnionar.
>
> Puedes tambien utilizar Pocket Access para tu base d e datos.
>
> Pasate por www.mipcdebolsillo.com en los foros de programacion, alli


hay
> muchos post que te pueden ayudar a solucionar la dua que tienes ahora.
>
> Saludos
>
> Roberto Alvarado
> Bogota - Colombia
>
> "MiC" wrote in message
> news:%23uM$D9Y$
> > Hola.
> > Tengo un problema al intentar generar codigo con eMbedded Visual Basic
3.
> > La conexion la hare conectado por GPS.
> > En Visual Basic 6 genero la conexion a la base de datos
> >
> > Public Db As ADODB.Connection
> > Set Db = New Connection
> > Db.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User
> ID=sa;Initial
> > Catalog=DatosEmp;Data Source=orion"
> >
> > y creo el recordset
> >
> > Public Rst1 As New ADODB.Recordset
> > Set Rst1 = New ADODB.Recordset
> > With Rst1
> > .CursorLocation = adUseServer
> > .CursorType = adOpenDynamic
> > .LockType = adLockOptimistic
> > .Source = "Select * from datos"
> > .ActiveConnection = Db
> > .Open
> > End With
> >
> > el caso es que para la PPC no sirven estos comandos
> > ¿Puede alguien ayudarme un poco y darme alguna nocion de como hacerlo?
> > Es la primera vez que programo para la PPC y la verdad no se muiy bien
por
> > donde me dal el aire.
> >
> >
> > Fdo. Jesus Mª Martínez
> > TSM 400
> > PPC 2002
> >
> >
> >
>
>


email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida