
05/11/2006, 15:11
|
(Desactivado) | | Fecha de Ingreso: julio-2006
Mensajes: 273
Antigüedad: 18 años, 8 meses Puntos: 5 | |
Ya pude crear la tabla Bien amigos ya puede crear la tabla a codigo vb .net, pero tengo una duda porque solo adiere una fila, y cuando quiero aderir mas solo esa row como si lo sustituyera.
Imports System.Data.SqlClient
Public Class Form1
Private oDataRow As DataRow
Private oDataAdpater As New SqlDataAdapter
Private oDataSet As DataSet
Private pos As Integer
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.oDataSet = New DataSet
'Crear un nombre para la tabla
oDataSet.Tables.Add("Persona")
'Crea los nombres para las columnas
oDataSet.Tables("Persona").Columns.Add("Nombres")
oDataSet.Tables("Persona").Columns.Add("Apellidos" )
Dim oDataRow As DataRow
'Crea las filas y las adiere
oDataRow = Me.oDataSet.Tables("Persona").NewRow()
oDataRow("Nombres") = Me.txtN.Text
oDataRow("Apellidos") = Me.txtA.Text
'Adiere las filas a la tabla
Me.oDataSet.Tables("Persona").Rows.Add(oDataRow)
Me.grdDatos.DataSource = oDataSet
Me.grdDatos.DataMember = "Persona"
End Sub
End Class |