Asignar campos de tablas a textbox en VB.NET

Yo mismo me respondo porque lo conseguí:
Se hace asi:

Dim TablaCampo As Binding

TablaCampo = New Binding("Text", ds, ds.Tables
(0).TableName & "." & ds.Tables(0).Columns(idx).ColumnName)

ThisControl.DataBindings.Add(TablaCampo)
TablaCampo = Nothing

Mostrar la cita

Hola a todos...
En VB6 se asigna un campo de una tabla mediante codigo de
esta manera:

Rst.Open "SELECT From Actividades;", cnn, adOpenDynamic,
adLockOptimistic
' Vinculamos los Textbox al Recordset
Set me.txtNombre.DataSource = Rst
' Asignamos los nombres de los campos
me.txtNombre.DataField = "Nombre"


Como puedo hacer por codigo esto mismo pero con VB.NET?

Muchas Gracias
.

hola , otra forma muy parecida seria:
Dim enlace As Binding

enlace = New Binding("Text", Me.dataset, "TablaEjemplo.CampoEjemplo")

TextBox1.DataBindings.Add(enlace)

enlace = Nothing

donde TablaEjemplo es la tabla con la que llenaste el dataset y CampoEjemplo
es el campo de la tabla que quieres relacionar con el TextBox1. Espero te
sirva

fernando

"Luis" escribió en el mensaje
news:8fcc01c49683$08b5f080$
Mostrar la cita

Hola a todos...
En VB6 se asigna un campo de una tabla mediante codigo de
esta manera:

Rst.Open "SELECT From Actividades;", cnn, adOpenDynamic,
adLockOptimistic
' Vinculamos los Textbox al Recordset
Set me.txtNombre.DataSource = Rst
' Asignamos los nombres de los campos
me.txtNombre.DataField = "Nombre"


Como puedo hacer por codigo esto mismo pero con VB.NET?

Muchas Gracias

Hola,

Una curiosidad... para mostrar y actualizar los campos de la base de datos usáis el databindings? o
directamente asignáis los valores de los campos a los txt y viceversa a la hora de actualizar la
base de datos?

Un saludo,
Oscar


"fernando" escribió en el mensaje
news:
Mostrar la cita

hola , otra forma muy parecida seria:
Dim enlace As Binding

enlace = New Binding("Text", Me.dataset, "TablaEjemplo.CampoEjemplo")

TextBox1.DataBindings.Add(enlace)

enlace = Nothing

donde TablaEjemplo es la tabla con la que llenaste el dataset y CampoEjemplo
es el campo de la tabla que quieres relacionar con el TextBox1. Espero te
sirva

fernando

"Luis" escribió en el mensaje
news:8fcc01c49683$08b5f080$
> Hola a todos...
> En VB6 se asigna un campo de una tabla mediante codigo de
> esta manera:
>
> Rst.Open "SELECT From Actividades;", cnn, adOpenDynamic,
> adLockOptimistic
> ' Vinculamos los Textbox al Recordset
> Set me.txtNombre.DataSource = Rst
> ' Asignamos los nombres de los campos
> me.txtNombre.DataField = "Nombre"
>
>
> Como puedo hacer por codigo esto mismo pero con VB.NET?
>
> Muchas Gracias

hola, disculpa que te responda recien ahroa. Los campos se actualizan cuando
presionan un boton. Ese boton tiene lo siguiente:

enlaceBase.EndCurrentEdit()

adaptador.Update(datos, "Tabla")

y listo.Antes generé insert, update,delete con un CommandBuilder :

adaptador = New OleDbDataAdapter
adaptador.SelectCommand = New OleDbCommand(sql, conexion)

comando = New OleDbCommandBuilder(adaptador)

comando.QuotePrefix = "["

comando.QuoteSuffix = "]"

adaptador.DeleteCommand = comando.GetDeleteCommand

adaptador.InsertCommand = comando.GetInsertCommand

adaptador.UpdateCommand = comando.GetUpdateCommand

Me.datos = New DataSet

conexion.Open()

adaptador.Fill(Me.datos, "Tabla")

conexion.Close()

Espero te sirva.

fernando

"Oscar" <veletapgARROBAwanadooPUNTOcom> escribió en el mensaje
news:
Mostrar la cita

Hola,

Una curiosidad... para mostrar y actualizar los campos de la base de datos

usáis el databindings? o
Mostrar la cita

directamente asignáis los valores de los campos a los txt y viceversa a la

hora de actualizar la
Mostrar la cita

base de datos?

Un saludo,
Oscar


"fernando" escribió en el mensaje
news:
> hola , otra forma muy parecida seria:
> Dim enlace As Binding
>
> enlace = New Binding("Text", Me.dataset, "TablaEjemplo.CampoEjemplo")
>
> TextBox1.DataBindings.Add(enlace)
>
> enlace = Nothing
>
> donde TablaEjemplo es la tabla con la que llenaste el dataset y

CampoEjemplo
Mostrar la cita

> es el campo de la tabla que quieres relacionar con el TextBox1. Espero

te
Mostrar la cita

> sirva
>
> fernando
>
> "Luis" escribió en el mensaje
> news:8fcc01c49683$08b5f080$
> > Hola a todos...
> > En VB6 se asigna un campo de una tabla mediante codigo de
> > esta manera:
> >
> > Rst.Open "SELECT From Actividades;", cnn, adOpenDynamic,
> > adLockOptimistic
> > ' Vinculamos los Textbox al Recordset
> > Set me.txtNombre.DataSource = Rst
> > ' Asignamos los nombres de los campos
> > me.txtNombre.DataField = "Nombre"
> >
> >
> > Como puedo hacer por codigo esto mismo pero con VB.NET?
> >
> > Muchas Gracias
>
>