TXT en Visual Basic

[Rriveros]

Hola, estoy haciendo un trabajo para mi instituto y lo que necesito es lo siguiente:

Escribir un Texto que podria ser en un textbox, guardarlo en una BD Access y luego poder recuperarlo desde la BD, como creen ustedes que se podría hacer ??


Gracias

[GaboMaKano]

Mensaje Original por Rriveros
Hola, estoy haciendo un trabajo para mi instituto y lo que necesito es lo siguiente:
Escribir un Texto que podria ser en un textbox, guardarlo en una BD Access y luego poder recuperarlo desde la BD, como creen ustedes que se podría hacer ??
Gracias

haber primero debes definir varias cosas:
1- como te conectas a la base de datos, si es mediante un DataControl es sumamente facil, solo debes asociar al DataControl a la base de datos y a la tabla especifica, y el textbox al campo que deseas, luego solo haces un boton que te haga un upload y listo, para mostrar el dato guardado, solo basta con abrir el formulario y lo muestra automaticamente (siempre y cuando tengas el textbox vinculado al capo que quieres mostrar y que uses conexion con DataControl.
2- si es por ado, dao o odbc, debes programar unas lineas:
- la conexion debes definirla, ya sea en un modulo o un procedimiento o función.
- realizar un:
recordset.addnew
recordset("campo")=text1.text
recordset.update

ahi queda guardado, para mostrar solo debes dirigirte a ese registro en particular, ya sea con un query de sql o moviendote registro a registro con un movefirst, movenext, moveprevious, o movelast segun lo desees.
RECUERDA QUE LAS BASES DE DATOS LAS PUEDES ABRIR DE DIFERENTES FORMAS SNAPSHOT (LECTURA) DYNASET (LECTO ESCRITURA).
Si necesitas más info avisame o enviame un msg privado

[Mmc]

Creas un DSN Usuario le das un nombre, luego pasa este nombre a la variable
glbConexion, y listo. En lo personal tomo este dato de un archivo ?????.INI

Declaración de variables:

Global glbConexion As New ADODB.Connection
Global RsSql As New ADODB.Recordset
Global SQL As String
------------------------------------------------
BUSCAR DATOS

SQL = "SELECT "
SQL = SQL & " C.RUT, C.NOMBRE, C.TELEFONO, "
SQL = SQL & " C.DIRECCION, M.NOMBRE as COM "
SQL = SQL & " FROM "
SQL = SQL & " Clientes C "
SQL = SQL & " INNER JOIN Comunas M ON "
SQL = SQL & " C.COD_COMUNA = M.COD_COMUNA "
SQL = SQL & " WHERE "
SQL = SQL & " C.RUT = '" & Trim(xtxRut.Text) & "-" & Trim(xtxRut.TextDV) & "'"
Set RsSql = glbConexion.Execute(SQL)
If Not RsSql.EOF Then
xtxNombre.Text = RsSql.Fields("NOMBRE")
xtxFono.Text = RsSql.Fields("TELEFONO")
xtxDirec.Text = RsSql.Fields("DIRECCION")
xtxComuna.Text = RsSql.Fields("COM")
End If

Nota: Para insertar, actualizar, eliminar. Son exactamente iguales, solo debes controlar las diferentes propiedades de las sentencias SQL.

[Bravenap]

Hola Rriveros, si no te importa ¿me podrías decir qué clase de trabajo es el que estás realizando? Me suena a que es algo parecido a algo en lo que estaba interesado: un programa de préstamo de documentos a modo de biblioteca. La pena es que mis conocimientos en VB son pocos o ningunos.

Gracias.

[Rriveros]

En realidad no creo que sea lo que tu buscas, tu solo necesitas trabajar con base de datos y algunas pantallas de Visual Basic.


Chao

[RootK]

Creo que como punto principal.. sería si quieres trabajar con ADO o DAO..??

Claro que ADO..,es de las actuales.. pero depende de que tanta informacion manejes...y que motor de BD.. utilizarás...

Danos mas detalles y con gusto te podremos ayudar..

SAludos