Deberia Funcionar !!!!

en modo de diseño, completo los propoiedades como conecctionString,
RecordSource, CommandType, CursosLocation, y le doy click derecho al
DataGrid, me sale un menu contextual, el cual elijo Recuperar Datos me

Desea Remplazar la distribucuion actual de la cuadricula con uevas
deficiones de campos?, le doy que SI, no veo que hace nada.

Que tal Victor de nuevo molestandote.

Hice la actualizacion tal como me indicastes, y al menos creo que a
mejorado, ejecute el programa que me enviastes, y ya no me sale ningun
error, pero no veo la informacion en el DataGrid.

Te cuento ejecuto el programa, y ya no da ningun mensaje de error, pero no
se ve la data del resultado en el DataGrid, pense que la sentencia no

informacion y lo cambie por select * from articulo, y tampoco pero si lo
ejecuto en su analizador me da infoemacion, lo ejecute paso a paso, cuando
ejecuto el valor de la variable Err.Number es 0, por lo tanto no da error
pero no muestra nada para ejecuitar la sentencia se demora unos segundos,
pero nada, creo que ya estoy cerca, pero no se ve informacion.

en modo de diseño, completo los propoiedades como conecctionString,
RecordSource, CommandType, CursosLocation, y le doy click derecho al
DataGrid, me sale un menu contextual, el cual elijo Recuperar Datos me

Desea Remplazar la distribucuion actual de la cuadricula con uevas
deficiones de campos?, le doy que SI, no veo que hace nada.

Haber si me das la ultima manito.


Gracias de antemano

Disculpa la molestia.





"Victor Koch" escribió en el mensaje
news:%
> La version 2.7 SP1 Refresh la vajas de:
>
>

> b0f3-ae36c570ade8&DisplayLang=en
>
> Luego tenes que actualizar el SP del JET 4.0 de:
>
> http://support.microsoft.com/defaul...-US;239114
>
> Como saber la version de ADO instalada.
>
> Q10) How do I know which version of MDAC do I have installed on my
computer?
>
> You will not be able to determine the MDAC version by just looking at

> filenames (since some MDAC 2.x files have the "15" in the filename...).
So
> one way is to check the "\Program Files\Common Files\System\OLE
> DB\msdadc.dll" file version:
>
> MDAC version MSDADC.DLL
>
> MDAC 1.0 (OLE DB 1.1 SDK) 1.10.2326.0
> MDAC 1.5 (MSADC11) 1.50.3004.0
> MDAC 1.5 (PDC) 1.50.32.15
> MDAC 1.5 (IE 4.0 and 4.01) 1.50.3206.0
> MDAC 1.5 RTM 1.50.3221.0
> MDAC 1.5a (IE 4.01 SP1) 1.50.3401.0
> MDAC 1.5b (NT4.0 Option Pack 1) 1.50.3506.00
> MDAC 1.5c (IE 4.01 SP2) 1.50.9801.0
> MDAC 2.0 RTM 2.00.3002.4
> MDAC 2.0 SP1 / SP2 2.00.3002.23
> MDAC 2.1.0.3513.2 (SQL) 2.10.3513.0
> MDAC 2.1.1.3711.6 (IE 5) 2.10.3711.2
> MDAC 2.1.1.3711.11 (GA) 2.10.3711.2
> MDAC 2.1.2.4202.3 (GA) SP2 2.10.4202.0
> MDAC 2.5 RTM 2.50.4403.12
> MDAC 2.5 SP1 2.51.5303.0
> MDAC 2.5 SP2 2.52.6019.0
> MDAC 2.6 RTM 2.60.6526.0
> MDAC 2.6 SP1 2.61.7326.0
> MDAC 2.7 RTM 2.70.7713.0
>
>
> Un saludo, Víctor Koch.
>
>
> "Henry" escribió en el mensaje
> news:
> >
> > Que tal Victor, de nuevo, por aca, actualice el SP5 de VB6, y me sigue
> > saliendo el mismo error, como actualizo la version del ADO, como se

> > version de ADO tengo.
> >
> >
> > "Henry" escribió en el mensaje
> > news:
> > > Puede ser posible esto ultimo, como se que version de ADO tengo y
desde
> > > donde lo puedo bajar, me supongo que el SP5 de VB6 lo bajo desde
> > Microsoft,
> > > haber si me confirmas lo del ADO.
> > >
> > > Gracias
> > >
> > >
> > > "Victor Koch" escribió en el mensaje
> > > news:%
> > > > Yo lo probe con dos bases de datos y me anda perfecto, por

> que
> > > > cambie la sentencia de SQL, tenes instalado el SP5 de VB6 y que
> version
> > de
> > > > ADO tenes, la ultima es la 2.7 SP1
> > > >
> > > > Un saludo, Víctor Koch.
> > > >
> > > >
> > > > "Henry" escribió en el mensaje
> > > > news:#
> > > > > Que tal Victor
> > > > > me sale 2 mensajes de error
> > > > >
> > > > > El primero
> > > > > la operacion no esta permitida si el objeto esta abierto
> > > > >
> > > > > El segundo
> > > > > Error:3705 Error definido por la aplicación o el objeto
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > > "Victor Koch" escribió en el
mensaje
> > > > > news:
> > > > > > Te envio un programa, correlo y oprimi el boton EJECUTAR,
despues
> > > > contame.
> > > > > > Un saludo, Víctor Koch.
> > > > > >
> > > > > >
> > > > > > "Henry A." escribió en el mensaje
> > > > > > news:029701c35148$de861450$
> > > > > >
> > > > > > Estimado Víctor Koch
> > > > > >
> > > > > > Hice la pruebas, como indicas en el RecordSource pongo la
> > > > > > sentencia, y a la hora que al DataGrid le doy en el
> > > > > > DataSource = Adodc1
> > > > > > sale el error
> > > > > >
> > > > > > "[Microsoft][Administrador de controladores ODBC] El
> > > > > > Controlador no admite esta funcion"
> > > > > >
> > > > > > lo mismo me sale a la hora de ejecutar el programa.
> > > > > >
> > > > > > Estare atento a tu respuesta
> > > > > >
> > > > > > Gracias de Antemano
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > > >Amigo mio estas usando el datacontrol y no el ADO data
> > > > > > control OLEDB,
> > > > > > >asegurate de esto, una vez que reemplaces el DAO
> > > > > > datacontrol por el ADO data
> > > > > > >control OLEDB en la propiedad connectionstring pone:
> > > > > > >
> > > > > > >adodc1.connectionstring="UID3;PWD3;DSN½ATOS"
> > > > > > >
> > > > > > >Destilada la opcion Microsoft DAO en Projecto -->
> > > > > > Referencias
> > > > > > >Recorda que tenes que usar la DBGRID OLEDB.
> > > > > > >
> > > > > > >Un saludo, Víctor Koch.
> > > > > > >
> > > > > > >
> > > > > > >"Henry A." escribió en el mensaje
> > > > > > >news:0f2a01c35131$5ea36600$
> > > > > > >
> > > > > > >En Projecto --> Referencias, que opcion tenes tildada
> > > > > > >Microsoft DAO . o
> > > > > > >Microsoft Activex Data Object ..
> > > > > > >
> > > > > > >En este caso tengo tildada las dos
> > > > > > >
> > > > > > >En Projecto --> Componentes tenes tildada la opcion
> > > > > > >Microsoft ADO Data Control .
> > > > > > >
> > > > > > >y en esta caso tengo tildada la opcion
> > > > > > >Microsoft ADO Data Control .
> > > > > > >
> > > > > > >
> > > > > > >Aqui te envio el codigo que uso para abrir la base de
> > > > > > datos
> > > > > > >uso el componente Data y en la propieda connect e puesto
> > > > > > >esta codigo y me abre la base de datos sin problema
> > > > > > >
> > > > > > >ODBC;UID3;PWD3;DSN½ATOS;
> > > > > > >
> > > > > > >en la propiedad RecordSource le mando la sentencia
> > > > > > >
> > > > > > >xSQL = "select campo1, campo2, campo3
> > > > > > >from tabla1, outer (tabla2, outer tabla3)
> > > > > > >where tabla1.codigo=tabla2.codigo
> > > > > > >and tabla2.serie=tabla3.serie
> > > > > > >and tabla1.serie='017'"
> > > > > > >
> > > > > > >Data.RecordSource = xSQL
> > > > > > >Data.Refresh
> > > > > > >
> > > > > > >Como te decia cuando le envio una sentencia sin
> > > > > > >complicaciones como "Select * from articulo" funciona sin
> > > > > > >ningun problema, pero cuando le envio la anterior
> > > > > > >sentencia sale el error, pero yo pruebo en su analizador y
> > > > > > >funciona sin problema, como le digo al componente Data,
> > > > > > >que no me chequee la sentencia
> > > > > > >
> > > > > > >
> > > > > > >Muy agradecido por tu ayuda
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >>No entiendo como no sabes conque componentes estas
> > > > > > >trabajando, vamos por el
> > > > > > >>principio:
> > > > > > >>
> > > > > > >>En Projecto --> Referencias, que opcion tenes tildada
> > > > > > >Microsoft DAO . o
> > > > > > >>Microsoft Activex Data Object ..
> > > > > > >>
> > > > > > >>En Projecto --> Componentes tenes tildada la opcion
> > > > > > >Microsoft ADO Data
> > > > > > >>Control .
> > > > > > >>
> > > > > > >>Podrias enviar el codigo que usas para abrir la base de
> > > > > > >datos y abrir el
> > > > > > >>recordset.
> > > > > > >>
> > > > > > >>Un saludo, Víctor Koch.
> > > > > > >>
> > > > > > >>
> > > > > > >>"Henry A." escribió en el mensaje
> > > > > > >>news:062101c3509b$6de2f810$
> > > > > > >>Es correcto Victor yo trabajo con VB6, pero al parecer me
> > > > > > >>falta cambiar alguna propieda, por que me sigue saliendo
> > > > > > >>el bendito error
> > > > > > >>
> > > > > > >>
> > > > > > >>
> > > > > > >>
> > > > > > >>
> > > > > > >>
> > > > > > >>>Tendrías que aclarar si usas el data-control de VB5 o
> > > > > > >>VB6, si usas el de VB6
> > > > > > >>>este error no te tendría que pasar porque una de las
> > > > > > >>diferencias que tiene
> > > > > > >>>DAO de ADO es que este ultimo, por mas que tengas
> > > > > > >>cursores del lado del
> > > > > > >>>cliente, cuando abrís un recordset la sentencia de SQL
> > > > > > no
> > > > > > >>la analiza ni la
> > > > > > >>>ejecuta el Jet dado que directamente la sentencia es
> > > > > > >>enviada al proveedor
> > > > > > >>>OLEDB.
> > > > > > >>>Lo que te dice Saga con respecto a usar SQLPassthrough
> > > > > > es
> > > > > > >>solamente
> > > > > > >>>aplicable para DAO.
> > > > > > >>>
> > > > > > >>>Un saludo, Víctor Koch.
> > > > > > >>>
> > > > > > >>>
> > > > > > >>>"Henry A." escribió en el mensaje
> > > > > > >>>news:008601c3507e$94a26d40$
> > > > > > >>>> Que tal,
> > > > > > >>>> Recien estoy en esto del Visual basic 6.0, desde hace
> > > > > > >>poco.
> > > > > > >>>>
> > > > > > >>>> tengo una consulta Urgente ya no se que hacer,
> > > > > > nosotros
> > > > > > >>>> usamos la base de datos Multibase Cosmos, la conozco
> > > > > > >>poco
> > > > > > >>>> pero al menos tiene lo minimo.
> > > > > > >>>> cuando ejecuto este query en su analizador funciona
> > > > > > >>bien,
> > > > > > >>>> obtengo los registro que deberia, asi se usa su inner
> > > > > > >>join.
> > > > > > >>>>
> > > > > > >>>> select campo1, campo2, campo3
> > > > > > >>>> from tabla1, outer (tabla2, outer tabla3)
> > > > > > >>>> where tabla1.codigo=tabla2.codigo
> > > > > > >>>> and tabla2.serie=tabla3.serie
> > > > > > >>>> and tabla1.serie='017'
> > > > > > >>>>
> > > > > > >>>> pero cuando lo ejecuto en Visual Basic 6.0, en el
> > > > > > >>>> componente Data, me sale un error el cual dice
> > > > > > >>>>
> > > > > > >>>> "Error de sintaxis en la clausula from"
> > > > > > >>>>
> > > > > > >>>> tanto en diseno como en ejecucion.
> > > > > > >>>>
> > > > > > >>>> pregunta:
> > > > > > >>>>
> > > > > > >>>> 1.- como se debe ejecutar esta sentencia, para que no
> > > > > > >me
> > > > > > >>>> de error sabiendo que la sentencia esta bien, y hasta
> > > > > > >la
> > > > > > >>>> puedo ejecutar en su propio analizador sin ningun
> > > > > > >>problema
> > > > > > >>>>
> > > > > > >>>> estare atento a sus respuesta ya que estoy estancado
> > > > > > en
> > > > > > >>>> esto.
> > > > > > >>>>
> > > > > > >>>> Gracias de Antemano
> > > > > > >>>>
> > > > > > >>>
> > > > > > >>>
> > > > > > >>>.
> > > > > > >>>
> > > > > > >>
> > > > > > >>
> > > > > > >>.
> > > > > > >>
> > > > > > >
> > > > > > >
> > > > > > >.
> > > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > >
> > > > >
> > > >
> > > >
> > >
> > >
> >
> >
>
>

En el evento Command2_Click() reemplaza todo el codigo por este nuevo que

envio

On Error GoTo er
Adodc1.CursorLocation = adUseClient
Adodc1.CursorType = adOpenStatic
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = Text1.Text
Adodc1.Refresh
DataGrid1.Refresh
Sale:
Err.Number = 0
Exit Sub
er:
MsgBox "Error: " & Err.Number & " " & Err.Description
Resume Sale

> en modo de diseño, completo los propoiedades como conecctionString,
> RecordSource, CommandType, CursosLocation, y le doy click derecho al
> DataGrid, me sale un menu contextual, el cual elijo Recuperar Datos me
sale
> Desea Remplazar la distribucuion actual de la cuadricula con uevas
> deficiones de campos?, le doy que SI, no veo que hace nada.

Si queres hacer esto en CommandType pone adCmdTable y en recordsource pone
articulo, de esta forma cuando queres recuperar datos la grilla sabra de

tabla deseas recuperar los datos, esto es solo para poner los titulos en

columnas.

Un saludo, Víctor Koch.


"Henry" escribió en el mensaje
news:
> Que tal Victor de nuevo molestandote.
>
> Hice la actualizacion tal como me indicastes, y al menos creo que a
> mejorado, ejecute el programa que me enviastes, y ya no me sale ningun
> error, pero no veo la informacion en el DataGrid.
>
> Te cuento ejecuto el programa, y ya no da ningun mensaje de error, pero

> se ve la data del resultado en el DataGrid, pense que la sentencia no
votaba
> informacion y lo cambie por select * from articulo, y tampoco pero si

> ejecuto en su analizador me da infoemacion, lo ejecute paso a paso,

> ejecuto el valor de la variable Err.Number es 0, por lo tanto no da

> pero no muestra nada para ejecuitar la sentencia se demora unos

> pero nada, creo que ya estoy cerca, pero no se ve informacion.
>
> en modo de diseño, completo los propoiedades como conecctionString,
> RecordSource, CommandType, CursosLocation, y le doy click derecho al
> DataGrid, me sale un menu contextual, el cual elijo Recuperar Datos me
sale
> Desea Remplazar la distribucuion actual de la cuadricula con uevas
> deficiones de campos?, le doy que SI, no veo que hace nada.
>
> Haber si me das la ultima manito.
>
>
> Gracias de antemano
>
> Disculpa la molestia.
>
>
>
>
>
> "Victor Koch" escribió en el mensaje
> news:%
> > La version 2.7 SP1 Refresh la vajas de:
> >
> >
>

> > b0f3-ae36c570ade8&DisplayLang=en
> >
> > Luego tenes que actualizar el SP del JET 4.0 de:
> >
> > http://support.microsoft.com/defaul...-US;239114
> >
> > Como saber la version de ADO instalada.
> >
> > Q10) How do I know which version of MDAC do I have installed on my
> computer?
> >
> > You will not be able to determine the MDAC version by just looking at
the
> > filenames (since some MDAC 2.x files have the "15" in the

> So
> > one way is to check the "\Program Files\Common Files\System\OLE
> > DB\msdadc.dll" file version:
> >
> > MDAC version MSDADC.DLL
> >
> > MDAC 1.0 (OLE DB 1.1 SDK) 1.10.2326.0
> > MDAC 1.5 (MSADC11) 1.50.3004.0
> > MDAC 1.5 (PDC) 1.50.32.15
> > MDAC 1.5 (IE 4.0 and 4.01) 1.50.3206.0
> > MDAC 1.5 RTM 1.50.3221.0
> > MDAC 1.5a (IE 4.01 SP1) 1.50.3401.0
> > MDAC 1.5b (NT4.0 Option Pack 1) 1.50.3506.00
> > MDAC 1.5c (IE 4.01 SP2) 1.50.9801.0
> > MDAC 2.0 RTM 2.00.3002.4
> > MDAC 2.0 SP1 / SP2 2.00.3002.23
> > MDAC 2.1.0.3513.2 (SQL) 2.10.3513.0
> > MDAC 2.1.1.3711.6 (IE 5) 2.10.3711.2
> > MDAC 2.1.1.3711.11 (GA) 2.10.3711.2
> > MDAC 2.1.2.4202.3 (GA) SP2 2.10.4202.0
> > MDAC 2.5 RTM 2.50.4403.12
> > MDAC 2.5 SP1 2.51.5303.0
> > MDAC 2.5 SP2 2.52.6019.0
> > MDAC 2.6 RTM 2.60.6526.0
> > MDAC 2.6 SP1 2.61.7326.0
> > MDAC 2.7 RTM 2.70.7713.0
> >
> >
> > Un saludo, Víctor Koch.
> >
> >
> > "Henry" escribió en el mensaje
> > news:
> > >
> > > Que tal Victor, de nuevo, por aca, actualice el SP5 de VB6, y me

> > > saliendo el mismo error, como actualizo la version del ADO, como se
que
> > > version de ADO tengo.
> > >
> > >
> > > "Henry" escribió en el mensaje
> > > news:
> > > > Puede ser posible esto ultimo, como se que version de ADO tengo y
> desde
> > > > donde lo puedo bajar, me supongo que el SP5 de VB6 lo bajo desde
> > > Microsoft,
> > > > haber si me confirmas lo del ADO.
> > > >
> > > > Gracias
> > > >
> > > >
> > > > "Victor Koch" escribió en el

> > > > news:%
> > > > > Yo lo probe con dos bases de datos y me anda perfecto, por
supuesto
> > que
> > > > > cambie la sentencia de SQL, tenes instalado el SP5 de VB6 y que
> > version
> > > de
> > > > > ADO tenes, la ultima es la 2.7 SP1
> > > > >
> > > > > Un saludo, Víctor Koch.
> > > > >
> > > > >
> > > > > "Henry" escribió en el mensaje
> > > > > news:#
> > > > > > Que tal Victor
> > > > > > me sale 2 mensajes de error
> > > > > >
> > > > > > El primero
> > > > > > la operacion no esta permitida si el objeto esta abierto
> > > > > >
> > > > > > El segundo
> > > > > > Error:3705 Error definido por la aplicación o el objeto
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > > "Victor Koch" escribió en el
> mensaje
> > > > > > news:
> > > > > > > Te envio un programa, correlo y oprimi el boton EJECUTAR,
> despues
> > > > > contame.
> > > > > > > Un saludo, Víctor Koch.
> > > > > > >
> > > > > > >
> > > > > > > "Henry A." escribió en el mensaje
> > > > > > > news:029701c35148$de861450$
> > > > > > >
> > > > > > > Estimado Víctor Koch
> > > > > > >
> > > > > > > Hice la pruebas, como indicas en el RecordSource pongo la
> > > > > > > sentencia, y a la hora que al DataGrid le doy en el
> > > > > > > DataSource = Adodc1
> > > > > > > sale el error
> > > > > > >
> > > > > > > "[Microsoft][Administrador de controladores ODBC] El
> > > > > > > Controlador no admite esta funcion"
> > > > > > >
> > > > > > > lo mismo me sale a la hora de ejecutar el programa.
> > > > > > >
> > > > > > > Estare atento a tu respuesta
> > > > > > >
> > > > > > > Gracias de Antemano
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > > >Amigo mio estas usando el datacontrol y no el ADO data
> > > > > > > control OLEDB,
> > > > > > > >asegurate de esto, una vez que reemplaces el DAO
> > > > > > > datacontrol por el ADO data
> > > > > > > >control OLEDB en la propiedad connectionstring pone:
> > > > > > > >
> > > > > > > >adodc1.connectionstring="UID3;PWD3;DSN½ATOS"
> > > > > > > >
> > > > > > > >Destilada la opcion Microsoft DAO en Projecto -->
> > > > > > > Referencias
> > > > > > > >Recorda que tenes que usar la DBGRID OLEDB.
> > > > > > > >
> > > > > > > >Un saludo, Víctor Koch.
> > > > > > > >
> > > > > > > >
> > > > > > > >"Henry A." escribió en el mensaje
> > > > > > > >news:0f2a01c35131$5ea36600$
> > > > > > > >
> > > > > > > >En Projecto --> Referencias, que opcion tenes tildada
> > > > > > > >Microsoft DAO . o
> > > > > > > >Microsoft Activex Data Object ..
> > > > > > > >
> > > > > > > >En este caso tengo tildada las dos
> > > > > > > >
> > > > > > > >En Projecto --> Componentes tenes tildada la opcion
> > > > > > > >Microsoft ADO Data Control .
> > > > > > > >
> > > > > > > >y en esta caso tengo tildada la opcion
> > > > > > > >Microsoft ADO Data Control .
> > > > > > > >
> > > > > > > >
> > > > > > > >Aqui te envio el codigo que uso para abrir la base de
> > > > > > > datos
> > > > > > > >uso el componente Data y en la propieda connect e puesto
> > > > > > > >esta codigo y me abre la base de datos sin problema
> > > > > > > >
> > > > > > > >ODBC;UID3;PWD3;DSN½ATOS;
> > > > > > > >
> > > > > > > >en la propiedad RecordSource le mando la sentencia
> > > > > > > >
> > > > > > > >xSQL = "select campo1, campo2, campo3
> > > > > > > >from tabla1, outer (tabla2, outer tabla3)
> > > > > > > >where tabla1.codigo=tabla2.codigo
> > > > > > > >and tabla2.serie=tabla3.serie
> > > > > > > >and tabla1.serie='017'"
> > > > > > > >
> > > > > > > >Data.RecordSource = xSQL
> > > > > > > >Data.Refresh
> > > > > > > >
> > > > > > > >Como te decia cuando le envio una sentencia sin
> > > > > > > >complicaciones como "Select * from articulo" funciona sin
> > > > > > > >ningun problema, pero cuando le envio la anterior
> > > > > > > >sentencia sale el error, pero yo pruebo en su analizador y
> > > > > > > >funciona sin problema, como le digo al componente Data,
> > > > > > > >que no me chequee la sentencia
> > > > > > > >
> > > > > > > >
> > > > > > > >Muy agradecido por tu ayuda
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > >>No entiendo como no sabes conque componentes estas
> > > > > > > >trabajando, vamos por el
> > > > > > > >>principio:
> > > > > > > >>
> > > > > > > >>En Projecto --> Referencias, que opcion tenes tildada
> > > > > > > >Microsoft DAO . o
> > > > > > > >>Microsoft Activex Data Object ..
> > > > > > > >>
> > > > > > > >>En Projecto --> Componentes tenes tildada la opcion
> > > > > > > >Microsoft ADO Data
> > > > > > > >>Control .
> > > > > > > >>
> > > > > > > >>Podrias enviar el codigo que usas para abrir la base de
> > > > > > > >datos y abrir el
> > > > > > > >>recordset.
> > > > > > > >>
> > > > > > > >>Un saludo, Víctor Koch.
> > > > > > > >>
> > > > > > > >>
> > > > > > > >>"Henry A." escribió en el mensaje
> > > > > > > >>news:062101c3509b$6de2f810$
> > > > > > > >>Es correcto Victor yo trabajo con VB6, pero al parecer me
> > > > > > > >>falta cambiar alguna propieda, por que me sigue saliendo
> > > > > > > >>el bendito error
> > > > > > > >>
> > > > > > > >>
> > > > > > > >>
> > > > > > > >>
> > > > > > > >>
> > > > > > > >>
> > > > > > > >>>Tendrías que aclarar si usas el data-control de VB5 o
> > > > > > > >>VB6, si usas el de VB6
> > > > > > > >>>este error no te tendría que pasar porque una de las
> > > > > > > >>diferencias que tiene
> > > > > > > >>>DAO de ADO es que este ultimo, por mas que tengas
> > > > > > > >>cursores del lado del
> > > > > > > >>>cliente, cuando abrís un recordset la sentencia de SQL
> > > > > > > no
> > > > > > > >>la analiza ni la
> > > > > > > >>>ejecuta el Jet dado que directamente la sentencia es
> > > > > > > >>enviada al proveedor
> > > > > > > >>>OLEDB.
> > > > > > > >>>Lo que te dice Saga con respecto a usar SQLPassthrough
> > > > > > > es
> > > > > > > >>solamente
> > > > > > > >>>aplicable para DAO.
> > > > > > > >>>
> > > > > > > >>>Un saludo, Víctor Koch.
> > > > > > > >>>
> > > > > > > >>>
> > > > > > > >>>"Henry A." escribió en el mensaje
> > > > > > > >>>news:008601c3507e$94a26d40$
> > > > > > > >>>> Que tal,
> > > > > > > >>>> Recien estoy en esto del Visual basic 6.0, desde hace
> > > > > > > >>poco.
> > > > > > > >>>>
> > > > > > > >>>> tengo una consulta Urgente ya no se que hacer,
> > > > > > > nosotros
> > > > > > > >>>> usamos la base de datos Multibase Cosmos, la conozco
> > > > > > > >>poco
> > > > > > > >>>> pero al menos tiene lo minimo.
> > > > > > > >>>> cuando ejecuto este query en su analizador funciona
> > > > > > > >>bien,
> > > > > > > >>>> obtengo los registro que deberia, asi se usa su inner
> > > > > > > >>join.
> > > > > > > >>>>
> > > > > > > >>>> select campo1, campo2, campo3
> > > > > > > >>>> from tabla1, outer (tabla2, outer tabla3)
> > > > > > > >>>> where tabla1.codigo=tabla2.codigo
> > > > > > > >>>> and tabla2.serie=tabla3.serie
> > > > > > > >>>> and tabla1.serie='017'
> > > > > > > >>>>
> > > > > > > >>>> pero cuando lo ejecuto en Visual Basic 6.0, en el
> > > > > > > >>>> componente Data, me sale un error el cual dice
> > > > > > > >>>>
> > > > > > > >>>> "Error de sintaxis en la clausula from"
> > > > > > > >>>>
> > > > > > > >>>> tanto en diseno como en ejecucion.
> > > > > > > >>>>
> > > > > > > >>>> pregunta:
> > > > > > > >>>>
> > > > > > > >>>> 1.- como se debe ejecutar esta sentencia, para que no
> > > > > > > >me
> > > > > > > >>>> de error sabiendo que la sentencia esta bien, y hasta
> > > > > > > >la
> > > > > > > >>>> puedo ejecutar en su propio analizador sin ningun
> > > > > > > >>problema
> > > > > > > >>>>
> > > > > > > >>>> estare atento a sus respuesta ya que estoy estancado
> > > > > > > en
> > > > > > > >>>> esto.
> > > > > > > >>>>
> > > > > > > >>>> Gracias de Antemano
> > > > > > > >>>>
> > > > > > > >>>
> > > > > > > >>>
> > > > > > > >>>.
> > > > > > > >>>
> > > > > > > >>
> > > > > > > >>
> > > > > > > >>.
> > > > > > > >>
> > > > > > > >
> > > > > > > >
> > > > > > > >.
> > > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > >
> > > > > >
> > > > >
> > > > >
> > > >
> > > >
> > >
> > >
> >
> >
>
>

Es gracioso, Victor, sigue sin funcionar, al menos no da error, y no se ve
la data, pero si le cambio y le pongo el nombre de una tabla erronea es
decir le pongo select * from articulos, cuando debe ser articulo, me sale
error que no existe esa tabla, si hago un select con n campos y uno de

campos lo escribo mal me sale que ese campo, no existe, y si lo corrigo
fuuncioan pero no se ve informacion,


Saludos.


"Victor Koch" escribió en el mensaje
news:
> En el evento Command2_Click() reemplaza todo el codigo por este nuevo

te
> envio
>
> On Error GoTo er
> Adodc1.CursorLocation = adUseClient
> Adodc1.CursorType = adOpenStatic
> Adodc1.CommandType = adCmdText
> Adodc1.RecordSource = Text1.Text
> Adodc1.Refresh
> DataGrid1.Refresh
> Sale:
> Err.Number = 0
> Exit Sub
> er:
> MsgBox "Error: " & Err.Number & " " & Err.Description
> Resume Sale
>
> > en modo de diseño, completo los propoiedades como conecctionString,
> > RecordSource, CommandType, CursosLocation, y le doy click derecho al
> > DataGrid, me sale un menu contextual, el cual elijo Recuperar Datos me
> sale
> > Desea Remplazar la distribucuion actual de la cuadricula con uevas
> > deficiones de campos?, le doy que SI, no veo que hace nada.
>
> Si queres hacer esto en CommandType pone adCmdTable y en recordsource

> articulo, de esta forma cuando queres recuperar datos la grilla sabra de
que
> tabla deseas recuperar los datos, esto es solo para poner los titulos en
las
> columnas.
>
> Un saludo, Víctor Koch.
>
>
> "Henry" escribió en el mensaje
> news:
> > Que tal Victor de nuevo molestandote.
> >
> > Hice la actualizacion tal como me indicastes, y al menos creo que a
> > mejorado, ejecute el programa que me enviastes, y ya no me sale ningun
> > error, pero no veo la informacion en el DataGrid.
> >
> > Te cuento ejecuto el programa, y ya no da ningun mensaje de error,

no
> > se ve la data del resultado en el DataGrid, pense que la sentencia no
> votaba
> > informacion y lo cambie por select * from articulo, y tampoco pero si
lo
> > ejecuto en su analizador me da infoemacion, lo ejecute paso a paso,
cuando
> > ejecuto el valor de la variable Err.Number es 0, por lo tanto no da
error
> > pero no muestra nada para ejecuitar la sentencia se demora unos
segundos,
> > pero nada, creo que ya estoy cerca, pero no se ve informacion.
> >
> > en modo de diseño, completo los propoiedades como conecctionString,
> > RecordSource, CommandType, CursosLocation, y le doy click derecho al
> > DataGrid, me sale un menu contextual, el cual elijo Recuperar Datos me
> sale
> > Desea Remplazar la distribucuion actual de la cuadricula con uevas
> > deficiones de campos?, le doy que SI, no veo que hace nada.
> >
> > Haber si me das la ultima manito.
> >
> >
> > Gracias de antemano
> >
> > Disculpa la molestia.
> >
> >
> >
> >
> >
> > "Victor Koch" escribió en el mensaje
> > news:%
> > > La version 2.7 SP1 Refresh la vajas de:
> > >
> > >
> >
>

> > > b0f3-ae36c570ade8&DisplayLang=en
> > >
> > > Luego tenes que actualizar el SP del JET 4.0 de:
> > >
> > > http://support.microsoft.com/defaul...-US;239114
> > >
> > > Como saber la version de ADO instalada.
> > >
> > > Q10) How do I know which version of MDAC do I have installed on my
> > computer?
> > >
> > > You will not be able to determine the MDAC version by just looking

> the
> > > filenames (since some MDAC 2.x files have the "15" in the
filename...).
> > So
> > > one way is to check the "\Program Files\Common Files\System\OLE
> > > DB\msdadc.dll" file version:
> > >
> > > MDAC version MSDADC.DLL
> > >
> > > MDAC 1.0 (OLE DB 1.1 SDK) 1.10.2326.0
> > > MDAC 1.5 (MSADC11) 1.50.3004.0
> > > MDAC 1.5 (PDC) 1.50.32.15
> > > MDAC 1.5 (IE 4.0 and 4.01) 1.50.3206.0
> > > MDAC 1.5 RTM 1.50.3221.0
> > > MDAC 1.5a (IE 4.01 SP1) 1.50.3401.0
> > > MDAC 1.5b (NT4.0 Option Pack 1) 1.50.3506.00
> > > MDAC 1.5c (IE 4.01 SP2) 1.50.9801.0
> > > MDAC 2.0 RTM 2.00.3002.4
> > > MDAC 2.0 SP1 / SP2 2.00.3002.23
> > > MDAC 2.1.0.3513.2 (SQL) 2.10.3513.0
> > > MDAC 2.1.1.3711.6 (IE 5) 2.10.3711.2
> > > MDAC 2.1.1.3711.11 (GA) 2.10.3711.2
> > > MDAC 2.1.2.4202.3 (GA) SP2 2.10.4202.0
> > > MDAC 2.5 RTM 2.50.4403.12
> > > MDAC 2.5 SP1 2.51.5303.0
> > > MDAC 2.5 SP2 2.52.6019.0
> > > MDAC 2.6 RTM 2.60.6526.0
> > > MDAC 2.6 SP1 2.61.7326.0
> > > MDAC 2.7 RTM 2.70.7713.0
> > >
> > >
> > > Un saludo, Víctor Koch.
> > >
> > >
> > > "Henry" escribió en el mensaje
> > > news:
> > > >
> > > > Que tal Victor, de nuevo, por aca, actualice el SP5 de VB6, y me
sigue
> > > > saliendo el mismo error, como actualizo la version del ADO, como

> que
> > > > version de ADO tengo.
> > > >
> > > >
> > > > "Henry" escribió en el mensaje
> > > > news:
> > > > > Puede ser posible esto ultimo, como se que version de ADO tengo

> > desde
> > > > > donde lo puedo bajar, me supongo que el SP5 de VB6 lo bajo desde
> > > > Microsoft,
> > > > > haber si me confirmas lo del ADO.
> > > > >
> > > > > Gracias
> > > > >
> > > > >
> > > > > "Victor Koch" escribió en el
mensaje
> > > > > news:%
> > > > > > Yo lo probe con dos bases de datos y me anda perfecto, por
> supuesto
> > > que
> > > > > > cambie la sentencia de SQL, tenes instalado el SP5 de VB6 y

> > > version
> > > > de
> > > > > > ADO tenes, la ultima es la 2.7 SP1
> > > > > >
> > > > > > Un saludo, Víctor Koch.
> > > > > >
> > > > > >
> > > > > > "Henry" escribió en el mensaje
> > > > > > news:#
> > > > > > > Que tal Victor
> > > > > > > me sale 2 mensajes de error
> > > > > > >
> > > > > > > El primero
> > > > > > > la operacion no esta permitida si el objeto esta abierto
> > > > > > >
> > > > > > > El segundo
> > > > > > > Error:3705 Error definido por la aplicación o el objeto
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > > "Victor Koch" escribió en el
> > mensaje
> > > > > > > news:
> > > > > > > > Te envio un programa, correlo y oprimi el boton EJECUTAR,
> > despues
> > > > > > contame.
> > > > > > > > Un saludo, Víctor Koch.
> > > > > > > >
> > > > > > > >
> > > > > > > > "Henry A." escribió en el mensaje
> > > > > > > > news:029701c35148$de861450$
> > > > > > > >
> > > > > > > > Estimado Víctor Koch
> > > > > > > >
> > > > > > > > Hice la pruebas, como indicas en el RecordSource pongo la
> > > > > > > > sentencia, y a la hora que al DataGrid le doy en el
> > > > > > > > DataSource = Adodc1
> > > > > > > > sale el error
> > > > > > > >
> > > > > > > > "[Microsoft][Administrador de controladores ODBC] El
> > > > > > > > Controlador no admite esta funcion"
> > > > > > > >
> > > > > > > > lo mismo me sale a la hora de ejecutar el programa.
> > > > > > > >
> > > > > > > > Estare atento a tu respuesta
> > > > > > > >
> > > > > > > > Gracias de Antemano
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > > >Amigo mio estas usando el datacontrol y no el ADO data
> > > > > > > > control OLEDB,
> > > > > > > > >asegurate de esto, una vez que reemplaces el DAO
> > > > > > > > datacontrol por el ADO data
> > > > > > > > >control OLEDB en la propiedad connectionstring pone:
> > > > > > > > >
> > > > > > > > >adodc1.connectionstring="UID3;PWD3;DSN½ATOS"
> > > > > > > > >
> > > > > > > > >Destilada la opcion Microsoft DAO en Projecto -->
> > > > > > > > Referencias
> > > > > > > > >Recorda que tenes que usar la DBGRID OLEDB.
> > > > > > > > >
> > > > > > > > >Un saludo, Víctor Koch.
> > > > > > > > >
> > > > > > > > >
> > > > > > > > >"Henry A." escribió en el mensaje
> > > > > > > > >news:0f2a01c35131$5ea36600$
> > > > > > > > >
> > > > > > > > >En Projecto --> Referencias, que opcion tenes tildada
> > > > > > > > >Microsoft DAO . o
> > > > > > > > >Microsoft Activex Data Object ..
> > > > > > > > >
> > > > > > > > >En este caso tengo tildada las dos
> > > > > > > > >
> > > > > > > > >En Projecto --> Componentes tenes tildada la opcion
> > > > > > > > >Microsoft ADO Data Control .
> > > > > > > > >
> > > > > > > > >y en esta caso tengo tildada la opcion
> > > > > > > > >Microsoft ADO Data Control .
> > > > > > > > >
> > > > > > > > >
> > > > > > > > >Aqui te envio el codigo que uso para abrir la base de
> > > > > > > > datos
> > > > > > > > >uso el componente Data y en la propieda connect e puesto
> > > > > > > > >esta codigo y me abre la base de datos sin problema
> > > > > > > > >
> > > > > > > > >ODBC;UID3;PWD3;DSN½ATOS;
> > > > > > > > >
> > > > > > > > >en la propiedad RecordSource le mando la sentencia
> > > > > > > > >
> > > > > > > > >xSQL = "select campo1, campo2, campo3
> > > > > > > > >from tabla1, outer (tabla2, outer tabla3)
> > > > > > > > >where tabla1.codigo=tabla2.codigo
> > > > > > > > >and tabla2.serie=tabla3.serie
> > > > > > > > >and tabla1.serie='017'"
> > > > > > > > >
> > > > > > > > >Data.RecordSource = xSQL
> > > > > > > > >Data.Refresh
> > > > > > > > >
> > > > > > > > >Como te decia cuando le envio una sentencia sin
> > > > > > > > >complicaciones como "Select * from articulo" funciona sin
> > > > > > > > >ningun problema, pero cuando le envio la anterior
> > > > > > > > >sentencia sale el error, pero yo pruebo en su analizador

> > > > > > > > >funciona sin problema, como le digo al componente Data,
> > > > > > > > >que no me chequee la sentencia
> > > > > > > > >
> > > > > > > > >
> > > > > > > > >Muy agradecido por tu ayuda
> > > > > > > > >
> > > > > > > > >
> > > > > > > > >
> > > > > > > > >
> > > > > > > > >
> > > > > > > > >
> > > > > > > > >
> > > > > > > > >
> > > > > > > > >>No entiendo como no sabes conque componentes estas
> > > > > > > > >trabajando, vamos por el
> > > > > > > > >>principio:
> > > > > > > > >>
> > > > > > > > >>En Projecto --> Referencias, que opcion tenes tildada
> > > > > > > > >Microsoft DAO . o
> > > > > > > > >>Microsoft Activex Data Object ..
> > > > > > > > >>
> > > > > > > > >>En Projecto --> Componentes tenes tildada la opcion
> > > > > > > > >Microsoft ADO Data
> > > > > > > > >>Control .
> > > > > > > > >>
> > > > > > > > >>Podrias enviar el codigo que usas para abrir la base de
> > > > > > > > >datos y abrir el
> > > > > > > > >>recordset.
> > > > > > > > >>
> > > > > > > > >>Un saludo, Víctor Koch.
> > > > > > > > >>
> > > > > > > > >>
> > > > > > > > >>"Henry A." escribió en el mensaje
> > > > > > > > >>news:062101c3509b$6de2f810$
> > > > > > > > >>Es correcto Victor yo trabajo con VB6, pero al parecer

> > > > > > > > >>falta cambiar alguna propieda, por que me sigue saliendo
> > > > > > > > >>el bendito error
> > > > > > > > >>
> > > > > > > > >>
> > > > > > > > >>
> > > > > > > > >>
> > > > > > > > >>
> > > > > > > > >>
> > > > > > > > >>>Tendrías que aclarar si usas el data-control de VB5 o
> > > > > > > > >>VB6, si usas el de VB6
> > > > > > > > >>>este error no te tendría que pasar porque una de las
> > > > > > > > >>diferencias que tiene
> > > > > > > > >>>DAO de ADO es que este ultimo, por mas que tengas
> > > > > > > > >>cursores del lado del
> > > > > > > > >>>cliente, cuando abrís un recordset la sentencia de SQL
> > > > > > > > no
> > > > > > > > >>la analiza ni la
> > > > > > > > >>>ejecuta el Jet dado que directamente la sentencia es
> > > > > > > > >>enviada al proveedor
> > > > > > > > >>>OLEDB.
> > > > > > > > >>>Lo que te dice Saga con respecto a usar SQLPassthrough
> > > > > > > > es
> > > > > > > > >>solamente
> > > > > > > > >>>aplicable para DAO.
> > > > > > > > >>>
> > > > > > > > >>>Un saludo, Víctor Koch.
> > > > > > > > >>>
> > > > > > > > >>>
> > > > > > > > >>>"Henry A." escribió en el

> > > > > > > > >>>news:008601c3507e$94a26d40$
> > > > > > > > >>>> Que tal,
> > > > > > > > >>>> Recien estoy en esto del Visual basic 6.0, desde hace
> > > > > > > > >>poco.
> > > > > > > > >>>>
> > > > > > > > >>>> tengo una consulta Urgente ya no se que hacer,
> > > > > > > > nosotros
> > > > > > > > >>>> usamos la base de datos Multibase Cosmos, la conozco
> > > > > > > > >>poco
> > > > > > > > >>>> pero al menos tiene lo minimo.
> > > > > > > > >>>> cuando ejecuto este query en su analizador funciona
> > > > > > > > >>bien,
> > > > > > > > >>>> obtengo los registro que deberia, asi se usa su inner
> > > > > > > > >>join.
> > > > > > > > >>>>
> > > > > > > > >>>> select campo1, campo2, campo3
> > > > > > > > >>>> from tabla1, outer (tabla2, outer tabla3)
> > > > > > > > >>>> where tabla1.codigo=tabla2.codigo
> > > > > > > > >>>> and tabla2.serie=tabla3.serie
> > > > > > > > >>>> and tabla1.serie='017'
> > > > > > > > >>>>
> > > > > > > > >>>> pero cuando lo ejecuto en Visual Basic 6.0, en el
> > > > > > > > >>>> componente Data, me sale un error el cual dice
> > > > > > > > >>>>
> > > > > > > > >>>> "Error de sintaxis en la clausula from"
> > > > > > > > >>>>
> > > > > > > > >>>> tanto en diseno como en ejecucion.
> > > > > > > > >>>>
> > > > > > > > >>>> pregunta:
> > > > > > > > >>>>
> > > > > > > > >>>> 1.- como se debe ejecutar esta sentencia, para que no
> > > > > > > > >me
> > > > > > > > >>>> de error sabiendo que la sentencia esta bien, y hasta
> > > > > > > > >la
> > > > > > > > >>>> puedo ejecutar en su propio analizador sin ningun
> > > > > > > > >>problema
> > > > > > > > >>>>
> > > > > > > > >>>> estare atento a sus respuesta ya que estoy estancado
> > > > > > > > en
> > > > > > > > >>>> esto.
> > > > > > > > >>>>
> > > > > > > > >>>> Gracias de Antemano
> > > > > > > > >>>>
> > > > > > > > >>>
> > > > > > > > >>>
> > > > > > > > >>>.
> > > > > > > > >>>
> > > > > > > > >>
> > > > > > > > >>
> > > > > > > > >>.
> > > > > > > > >>
> > > > > > > > >
> > > > > > > > >
> > > > > > > > >.
> > > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > >
> > > > > > >
> > > > > >
> > > > > >
> > > > >
> > > > >
> > > >
> > > >
> > >
> > >
> >
> >
>
>