Ver Mensaje Individual
  #1 (permalink)  
Antiguo 22/05/2012, 09:38
Avatar de gasuton
gasuton
 
Fecha de Ingreso: octubre-2010
Ubicación: Abandonware
Mensajes: 132
Antigüedad: 13 años, 6 meses
Puntos: 2
Pregunta Problema al completar textbox desde una tabla de MSSQL

Hola a todos, despues de su ayuda y lograr completar un datagrid con la info de mi tabla, ahora quiero completar unos textbox y un combobox.

puse mi codigo pero me da el siguiente error:

Child list for field usuarios cannot be created.

les dejo el codigo y loes comento donde me da ese error.

Código:
Option Explicit On
Option Strict On
Imports System.Data
Imports System.Data.SqlClient

Public Class usuarios
   
    Private WithEvents bmBase As BindingManagerBase


    Private Sub usuarios_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        bt_guardar.Visible = False
        bt_guardar.Enabled = False
        bt_cancelar.Visible = False
        bt_cancelar.Enabled = False

        Dim sisdb As SqlConnection = cnx.conectar()
        Dim da As New SqlDataAdapter("select * from usuarios", sisdb)
        Dim ds As New DataSet

        sisdb.Open()
        da.Fill(ds)
        sisdb.Close()

        DataGridView1.DataSource = ds.Tables(0)
        'hasta aqui me funciona bien ya que me muestra los datos en el datagrid


        username.DataBindings.Add("text", ds, "usuarios.username")'Aqui da el error        password.DataBindings.Add("text", ds, "usuarios.pass")
        puesto.DataBindings.Add("text", ds, "usuarios.puesto")
        nivel.DataBindings.Add("text", ds, "usuarios.nivel")

        bmBase = Me.BindingContext(ds, "usuarios")

        If bmBase.Count > 0 Then
            bmBase.Position = bmBase.Count
            bmBase.Position = 0
        End If

    End Sub
el campo de puesto es el de tipo combobox.
__________________
Ley numero 1: Si tu sistema falla seguro es una problema con la inteface entre el teclado y la silla.
Ley numero 2: El programador jamas tiene la culpa.
Ley numero 3: no me acuerdo