• Jueves 7 de Noviembre de 2024, 23:28

Autor Tema:  Como llenar un datgrid desde clase conexion  (Leído 1440 veces)

emmanuelmex

  • Nuevo Miembro
  • *
  • Mensajes: 5
    • Ver Perfil
Como llenar un datgrid desde clase conexion
« en: Jueves 25 de Junio de 2009, 20:00 »
0
hice una clase en la cual tengo hecha mi conexion a una base de datos sql server, y ahora en un form quiero llenar un datagrid, que metodos debo llamar para poder llenar ese datagrid? ahora pongo fragmentos de mi conexion. ojala me haya explicado y me puedan ayudar.

CLASE CONECTABASE
Public Function conectar() As SqlClient.SqlConnection
        'Conexion a la base de datos
        Try
            cn = New SqlClient.SqlConnection("Data Source=GREATSQLEXPRESS;Initial Catalog=mibase;Integrated Security=True")
            cn.Open()
        Catch ex As Exception
            MessageBox.Show("Error al conectar con datos" & ControlChars.CrLf & ex.Message & ControlChars.CrLf & ex.Source)

            'Throw New Exception("Ha ocurrido un error de conexion")
        End Try
        Return cn
    End Function

Public Function getCategoria() As DataTable
        'Conexion a la tabla
        Dim da As SqlClient.SqlDataAdapter
        Dim dt As DataTable
        Try
            da = New SqlClient.SqlDataAdapter("select * from Alumnos", cn)
            dt = New DataTable()
            da.Fill(dt) 'llenamos la tabla
        Catch ex As Exception
            Throw New Exception("Ha ocurrido un error en la consulta")
        End Try
        Return dt
    End Function

fm89-10

  • Miembro activo
  • **
  • Mensajes: 75
  • Nacionalidad: ni
    • Ver Perfil
Re: Como llenar un datgrid desde clase conexion
« Respuesta #1 en: Sábado 27 de Junio de 2009, 18:12 »
0
hola, mira lo que puedes hacer es lo siguiente  en tu clase conexion agrega lo siguiente funcion
Código: vb.net
  1.  
  2.  Public Function ejecutarProc(ByVal consultas As String) As Data.DataSet
  3.         sqc = New SqlCommand(consultas)
  4.         sqc.Connection = sc
  5.         sqa = New SqlDataAdapter
  6.         sqa.SelectCommand = sqc
  7.         datos = New Data.DataSet
  8.         sqc.ExecuteNonQuery()
  9.  
  10.         sqa.Fill(datos)
  11.  
  12.         Return datos
  13.  
  14.     End Function
  15.  
  16.  
  17.  

ahora dentro del form donde tienes el datagrid agrega el siguiente  codigo
Código: vb.net
  1.  
  2. Private scm As SqlCommand
  3.     Private sqa As SqlDataAdapter
  4.     Private datos As DataSet
  5.     Private sqp As SqlParameter
  6.     Private sc As Coneccion     ' inicializas la clase conexion
  7.     Public Sub New(ByVal con As Coneccion)
  8.         Me.sc = con      ' traes la conexion establecida antes
  9.  
  10.         ' Llamada necesaria para el Diseñador de Windows Forms.
  11.         InitializeComponent()
  12.  
  13.         ' Agregue cualquier inicialización después de la llamada a InitializeComponent().
  14.  
  15.     End Sub
  16.  
  17.     Private Sub datos_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  18.         datos = sc.ejecutarProc("select * from Cuenta")  'ejecutas la funcion que esta en la clase conexion
  19.         Me.DataGridView1.DataSource = datos.Tables(0) ' se la asignas  a la tabla
  20.  
  21.     End Sub
  22.  
  23.  

alguna duda me comentas  :hola: