Programación General > Visual Basic 6.0 e inferiores

 Re: para Jose Arriagada

(1/1)

bartrix58:
buenas amigo, veo q maneja el codigo para trabajar con txt, quisiera saber si sabe como pasar el contenido de una db de access a un txt y luego inverrtirlo, de un txt a una db, espero me puedan ayudar!!!

salu2

Egala:
No soy Jose Arriaga pero si te sirve mi contestacion estupendo.
Depende como lo hagas: Una forma:
1º.- De Bd as txt
'Abrir la Bd
Set BD=opendatabase(nombre.mdb,parametros)

'seleccionar los registros que queramos mediante Sql
set Ss=Bd.openrecordset(Sql,parametros)

txt.text=Ss(campo)


2º.- De Txt a Bd
'editar el registro guardado y actualizar
set Ds=bd.openrecordset(sql,parametros)

Ds.edit
Ds(campo)=txt.text
Ds.update

'si el registro no existe cambia el Ds.edit por Ds.addnew

Esta es una forma, pero hay muchas, puedes probar a usar los Datas y vincular los campos directamente con la tabla que quieras de access. Ya sabes que el uso indiscriminado de Datas hace que el proyecto sea mas lento


Suerte

Egala

bartrix58:

--- Citar ---Originalmente publicado por Egala
No soy Jose Arriaga pero si te sirve mi contestacion estupendo.
Depende como lo hagas: Una forma:
1º.- De Bd as txt
'Abrir la Bd
Set BD=opendatabase(nombre.mdb,parametros)

'seleccionar los registros que queramos mediante Sql
set Ss=Bd.openrecordset(Sql,parametros)

txt.text=Ss(campo)


2º.- De Txt a Bd
'editar el registro guardado y actualizar
set Ds=bd.openrecordset(sql,parametros)

Ds.edit
Ds(campo)=txt.text
Ds.update

'si el registro no existe cambia el Ds.edit por Ds.addnew

Esta es una forma, pero hay muchas, puedes probar a usar los Datas y vincular los campos directamente con la tabla que quieras de access. Ya sabes que el uso indiscriminado de Datas hace que el proyecto sea mas lento


Suerte

Egala
--- Fin de la cita ---




buenas, esta buena esa informacion dejame probarla y le cuento como me fue, gracias

salu2

Navegación

[0] Índice de Mensajes