66 respuestas en este tema

[poliburro]

no se que hacer..!!!!!
uso VB 6.0 y no me acepta la coneccion con ninguna base de datos de formato del 2000 pa riva.!!! ke agoo.!!!!

estoy usando los ADO..
eh intento abrir la base de datos con este comando

Set Base_de_datos = OpenDatabase("Direccion de la base de datos");

pero nada.. me manda un error diciendome ke no se puede reconocer el formato de esa base.. =S ayuda

Amigo, Yo manejo muy bien ado y probablemente pueda ayudarte. No tengo VB. deja lo consigo y vamos entrándole a tus dudas.  . En tanto, hay un sitio dedicado a VB llamado el guille. Ahí­ puedes encontrar recursos que te ayuden con la migración.

Saludos

[JoAnCa]

Pues lamento decirte amigo jordangel, que vas a tener que partir de cero con el VB
Pues Delphi y VB usan dos filosofias completamente diferentes, Delphi es Orientado a Objetos y VB es Orientado a Eventos, una conversion automatica dudo de que exista

Por otra parte, recuerdo cuando yo programe en VB, existia el control para navegar por la BD, pero no recuerdo como se llama. Me parece que si no aparece en la barra de herramientas, tienes que, lo que en Delphi equivale a instalar el componente, en VB no recuerdo por donde es, me parece que es por controles ActiveX o por OLE o algo así­

Y con esto http://www.elguille....Osindatacontrol  no te sirvió de nada ? 

[eduarcol]

el problema con la BD se debe a que la tecnoologia DAO utiliza el motor mas viejo de MDB  tendrias que hacerlo  como te mencione anteriormente, con el data enviroment.

[jordangel]

hola a todos.. aki regrese..
amigo si me ayudo mucho ese tuto.. de verdad.. me kito muchas dudas...
y te lo agradesco de verdad...

con respecto a lo de data enviroment si lo utilize perfecto hize la union con la base de datos.. saque como se hace en delphi todo los campos de una tabla... pero al momento de ejecutarlo.. cuando kiero agregar algo o simplemente escribir un dato en las cajillas de texto.. no se queda.. me refiero es que al momento de yo elejir otra cajita de texto se borran los datos que introduje en la cajilla anterior.. me puse a camibar el font para ver si era algo de hay pero nada.. =S dime que puede ser??

[eduarcol]

hola a todos.. aki regrese..
amigo si me ayudo mucho ese tuto.. de verdad.. me kito muchas dudas...
y te lo agradesco de verdad...

con respecto a lo de data enviroment si lo utilize perfecto hize la union con la base de datos.. saque como se hace en delphi todo los campos de una tabla... pero al momento de ejecutarlo.. cuando kiero agregar algo o simplemente escribir un dato en las cajillas de texto.. no se queda.. me refiero es que al momento de yo elejir otra cajita de texto se borran los datos que introduje en la cajilla anterior.. me puse a camibar el font para ver si era algo de hay pero nada.. =S dime que puede ser??

Tienes los comandos para grabar los registros?? recuerda que igual debes utilizar el append, post, delete y esos tipos de comando.

[jordangel]

umm.. ok.. otra pregunta..

antes de eso tengo que abrir la base de datos?? por ke yo utilizo este comando..

Set Base_de_datos = OpenDatabase

pero no creo ke me funcione por ke me da el error de la base de datos.. kq dice ke no reconoce el formato

[eduarcol]

umm.. ok.. otra pregunta..

antes de eso tengo que abrir la base de datos?? por ke yo utilizo este comando..

Set Base_de_datos = OpenDatabase

pero no creo ke me funcione por ke me da el error de la base de datos.. kq dice ke no reconoce el formato

puedes poner un poco del codigo que tienes para ver como lo haces?

[jordangel]

este es el codigo ke tengo.. en todo.. no se si voy bien...
aki les dejo lo ke lelvo..

vb

Option Explicit
Dim Base_de_Datos As DAO.Database
Dim Conjunto_de_resultados As DAO.Recordset
 
 
 
Private Sub Anterior_btn_Click()
Conjunto_de_resultados.MovePrevious
If Conjunto_de_resultados.BOF = False Then
Cargar_cajas_de_texto
Else
Conjunto_de_resultados.MoveFirst
Cargar_cajas_de_texto
End If
 
End Sub
 
Private Sub Form_Load()
Set Conjunto_de_resultados = Base_de_Datos.OpenRecordset _
("Select * from Clientes", dbOpenDynaset, dbOptimistic)
Cargar_cajas_de_texto
End Sub
 
Private Sub Primer_btn_Click()
Conjunto_de_resultados.MoveFirst
Cargar_cajas_de_texto
 
End Sub
 
Private Sub Siguiente_btn_Click()
Conjunto_de_resultados.MoveNext
If Conjunto_de_resultados.EOF = False Then
Cargar_cajas_de_texto
Else
Conjunto_de_resultados.MoveLast
Cargar_cajas_de_texto
End If
 
End Sub
 
Private Sub Ultimo_btn_Click()
Conjunto_de_resultados.MoveLast
Cargar_cajas_de_texto
 
End Sub
Cargar_cajas_de_texto
 
txtCodCliente.Text = Conjunto_de_resultados!txtCodCliente
txtNombreClie.Text = Conjunto_de_resultados!txtNombreClie
txtDireccion1.Text = Conjunto_de_resultados!txtDirecion1
txtTelefono.Text = Conjunto_de_resultados!txtTelefono

Archivos adjuntos

•  798_c16176f2117900363d892948b6c60e9b9c6cdbd9.zip   1,2MB   1 descargas

[jordangel]

se que devo tener un picadillo.. hay =S.. pero intento aprender.. =(

[eduarcol]

no tienes ningun comando que permita grabar esa informacion....

[jordangel]

....

hay deje el programa adjuntado.. de lo ke llevo.. me gustaria que lo revisaran..
y lo detallaran para ver si tengo cosas malas o me falta??... de verdad me gustaria que me acesoren.!! nada mejor que ustedes.. asi no pueda verlos..!!!

[eduarcol]

Saludos,

Aqui te estoy dejando un ejemplo de una sola pantalla para grabar, modificar, eliminar y desplazarse entre los registros.

Funciona con tu misma BD, solo tienes que redireccionarla en el conection del data enviroment.

Mas o menos lo que hice:

- Cree el data enviroment.
- El conection lo configure segun el asistente seleccionando el Jet 4.0
- Luego agregue el comando, en la opcion seleccione que era una tabla, indique la tabla y el tipo de bloqueo lo coloco en optimista(si no se hace eso no te deja grabar la info).
- Si hasta el momento todo va bien se deben reflejar estos campos dentro del comando.
- Luego los arrastro hasta el form que necesito y ellos automaticamente crean los controles.
- Solo resta colocar los botones y escribir el codigo, siempre haciendo referencia al data enviroment, y cuando necesitas trabajar sobre los registros no trabajas directamente sobre el command sino sobre rsCommand que es el recordset que crea el cursor,


Si no te corre es porque tienes que redireccionar la ruta de la BD, cualquier cosa preguntas.

Archivos adjuntos

•  799_317568529bfeeb7fb0bf0a591004a23c81718b8a.zip   5,08KB   2 descargas

[jordangel]

amigo muchisimas gracias.. ahora si tengo coneccion.. pero tengo un fallo todavia...

es en los datos.. cuando intento itroducir datos en lso txt.. al quitar el cursor de hay se borra lo que itrodusco.. y cuando le doy a guardar me sale este error

eh.. de verdad disculpenme por lo necio y lo bruto... no les quiero causar molestias..

[jordangel]

amigos... otra vez yo.. !!

tengo otra duda..

como ago yo.. para hacer un comando de tipo busqueda... me explico..

tengo 2 botones llamados consulta por cliente y consulta por general

lo que quiero hacer es.. cuando le de a uno des esos 2 botones.. me genere una pantalla donde me muestre lo ke pido.. y tengo tambien que agregarle un boton de impresion...

se puede realizar.?? es muy complicado?? se ke estoy exigiendo mucho. pero esta es la ultima evaluacion de esta materia.. y vale mucho %

[eduarcol]

amigo muchisimas gracias.. ahora si tengo coneccion.. pero tengo un fallo todavia...

es en los datos.. cuando intento itroducir datos en lso txt.. al quitar el cursor de hay se borra lo que itrodusco.. y cuando le doy a guardar me sale este error

eh.. de verdad disculpenme por lo necio y lo bruto... no les quiero causar molestias..

Recuerda que tienes que crear un registro nuevo antes de guardar la info debes abrir un registro nuevo, para eso es el boton NUEVO...



Otra cosa, no hagas muchas cosas al mismo tiempo, soluciona el problema de los ingresos, modificaciones y eliminaciones para seguir con busquedas y reportes.

[jordangel]

Wow..Wow.. Wowhhh...

amigo tenias razon.!!! funciona..!! Woh... por fin algo de esperanza..

gracias.. ahora trabajare con las otras ventanas asi..

cuando tengo que trabajar con otras tablas debo crear nuevos comand verdad???

amigo mil gracias.!!!

problema1) "Botones de eliminar, agregar,guardar" Finalizado.!
problema2) "Botones de Busqueda, imprimir para Facturacion"

[eduarcol]

Wow..Wow.. Wowhhh...

amigo tenias razon.!!! funciona..!! Woh... por fin algo de esperanza..

gracias.. ahora trabajare con las otras ventanas asi..

cuando tengo que trabajar con otras tablas debo crear nuevos comand verdad???

amigo mil gracias.!!!

problema1) "Botones de eliminar, agregar,guardar" Finalizado.!
problema2) "Botones de Busqueda, imprimir para Facturacion"

Tal cual lo dices, por cada tabla o vista, un comando.

Respecto a la busqueda, te cedo el honor, tu haces el intento y si no te funciona me pasas lo que hicistes, en base a eso te ayudo, pero debes esforzarte, no copies codigo de cualquier pagina.

[jordangel]

hola amigos.. que tal como estan?? saludos para todos.!!

amigos.. aqui regrese con un programa de una compañera que necesita ayuda.. y ese problema tambien me afecta a mi.. ya que esos procesos tambien tienen que estar en mi programa...

como veran aqui deje adjutando el programa...

si lo revisan veran que dentro hay un text con el login y pass...

el problema es lo siguiente:

si le dan a el menu cartuchos encontraran 2 submenus
en el 2do submenu dice consulta

ese es el error que tiene.. cuando le da a consulta nos genera una ventana con 2 opciones.. una es consutla por cliente y otra es consulta por general...

que pasa?? lo que nosotros pedimos es que cuando se le de a una de las 2 opciones nos genere un reporte en pantalla de lo que pedimos para luego colocarle la opcion de imprimir..

no se si me pudieron entender.. pero de tomas formas encontraran un archivo de word donde se explica mas lo ke presentamos.. porfa veanlo y me gustaria tambien saber si tengo errores para que me digan..^^
mil gracias espero sus respuestas.!!!

Archivos adjuntos

•  806_313c9d702588c5642c47ab44a08bed41daed2d19.zip   498,79KB   2 descargas

[jordangel]

alguien entiene mi duda??? porfa diganme algo.!!!

[Caral]

Hola
Yo lo baje, pero el codigo es VB y no lo tengo instalado.
Trate de verlo por archivo de notas, pero no se ve el codigo.
Me gustaria ver el codigo que tienes a ver si entiendo algo y puedo darte una mano.
Saludos