Hola, que tal compañeros bakunos. Este día nuevamente los molesto, ya que me encuentro trabajando realizando una aplicación de escritorio en Visual Basic, en el Visual Studio 2010. De la misma forma, trabajo realizando una conexión a SQL Server 2008. A continuación les proporciono el código.
------------------------------------------------------------------------------------
'IMPORTAR NAMESPACES
Imports System.Data
Imports System.Data.SqlClient
Public Class Form7
'CONEXION
Private SqlConnection1 As SqlConnection
'ADAPTADOR DE DATOS
Private SqlDataAdapter1 As SqlDataAdapter
Private SqlSelectCommand1 As SqlCommand
Private SqlInsertCommand1 As SqlCommand
Private SqlDeleteCommand1 As SqlCommand
Private SqlUpdateCommand1 As SqlCommand
'CONJUNTO DE DATOS
Private Dataset1 As DataSet
'DATABINDING
Private bindingSource1 As BindingSource
Private Sub Form7_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'CREAR CONEXIÓN CON LA BASE DE DATOS
SqlConnection1 = New SqlConnection
SqlConnection1.ConnectionString = "Data Source=EDUARDO-PC; Initial Catalog=veda; Integrated Security=True"
'CREAR EL DATAADAPTER Y LAS ÓRDENES ASOCIADAS
'ESTABLECIENDO LA CONEXIÓN CON LA FUENTE DE DATOS
SqlDataAdapter1 = New SqlDataAdapter
SqlSelectCommand1 = New SqlCommand
SqlInsertCommand1 = New SqlCommand
SqlDeleteCommand1 = New SqlCommand
SqlUpdateCommand1 = New SqlCommand
SqlDataAdapter1.SelectCommand = SqlSelectCommand1
SqlDataAdapter1.InsertCommand = SqlInsertCommand1
SqlDataAdapter1.DeleteCommand = SqlDeleteCommand1
SqlDataAdapter1.UpdateCommand = SqlUpdateCommand1
SqlSelectCommand1.Connection = SqlConnection1
SqlInsertCommand1.Connection = SqlConnection1
SqlDeleteCommand1.Connection = SqlConnection1
SqlUpdateCommand1.Connection = SqlConnection1
'CREAR EL DATASET DONDE SE VOLCARÁN LOS DATOS
Dataset1 = New DataSet
'SENTENCIA SELECT A EJECUTAR
SqlSelectCommand1.CommandText = "Select * from namesp"
'ABRIR LA CONEXIÓN
SqlConnection1.Open()
'RELLENAR EL DATASET CON EL CONTENIDO OBTENIDO POR EL SELECT
SqlDataAdapter1.Fill(Dataset1, "namesp")
'CERRAR LA CONEXIÓN
SqlConnection1.Close()
'CREAR DATABINDING
bindingSource1 = New BindingSource
bindingSource1.DataMember = "namesp"
bindingSource1.DataSource = Me.Dataset1
'VINCULAR DATABINDING
TextBox1.DataBindings.Add("Text", Dataset1, "namesp.nombre")
End Sub
End Class
:vientos:
-------------------------------------------------------------------------------------
Bien, la conexión a la base de datos se ejecuta estupendamente. De la mism forma, puedo visualizar el contenido de lo que hay en mis tablas en los textbox mediante Databinding.
Sin embargo, deseo trabajar con Datatable y con los DataTableAdapter, de esa manera trabajar sin conexión. El único inconveniente es que no se cómo se crean dichos componentes mediante código. He buscado y dicen que hay que confiigurar la instancia de no se cuantas madres. En fin, ya me harte de buscar, no hallo una solución.
Pude trabajar mediante los datatable y dataadapter haciendo la conexión con el asistente, pero yo no deseo trabajar con el assitente, deseo trabajar con puro código.
Alguien que me pueda iluminar o que me diga como creo mi datatable y tableadapter con mi código?? Se los agradecería muchísimo !!
unzadita:
------------------------------------------------------------------------------------
'IMPORTAR NAMESPACES
Imports System.Data
Imports System.Data.SqlClient
Public Class Form7
'CONEXION
Private SqlConnection1 As SqlConnection
'ADAPTADOR DE DATOS
Private SqlDataAdapter1 As SqlDataAdapter
Private SqlSelectCommand1 As SqlCommand
Private SqlInsertCommand1 As SqlCommand
Private SqlDeleteCommand1 As SqlCommand
Private SqlUpdateCommand1 As SqlCommand
'CONJUNTO DE DATOS
Private Dataset1 As DataSet
'DATABINDING
Private bindingSource1 As BindingSource
Private Sub Form7_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'CREAR CONEXIÓN CON LA BASE DE DATOS
SqlConnection1 = New SqlConnection
SqlConnection1.ConnectionString = "Data Source=EDUARDO-PC; Initial Catalog=veda; Integrated Security=True"
'CREAR EL DATAADAPTER Y LAS ÓRDENES ASOCIADAS
'ESTABLECIENDO LA CONEXIÓN CON LA FUENTE DE DATOS
SqlDataAdapter1 = New SqlDataAdapter
SqlSelectCommand1 = New SqlCommand
SqlInsertCommand1 = New SqlCommand
SqlDeleteCommand1 = New SqlCommand
SqlUpdateCommand1 = New SqlCommand
SqlDataAdapter1.SelectCommand = SqlSelectCommand1
SqlDataAdapter1.InsertCommand = SqlInsertCommand1
SqlDataAdapter1.DeleteCommand = SqlDeleteCommand1
SqlDataAdapter1.UpdateCommand = SqlUpdateCommand1
SqlSelectCommand1.Connection = SqlConnection1
SqlInsertCommand1.Connection = SqlConnection1
SqlDeleteCommand1.Connection = SqlConnection1
SqlUpdateCommand1.Connection = SqlConnection1
'CREAR EL DATASET DONDE SE VOLCARÁN LOS DATOS
Dataset1 = New DataSet
'SENTENCIA SELECT A EJECUTAR
SqlSelectCommand1.CommandText = "Select * from namesp"
'ABRIR LA CONEXIÓN
SqlConnection1.Open()
'RELLENAR EL DATASET CON EL CONTENIDO OBTENIDO POR EL SELECT
SqlDataAdapter1.Fill(Dataset1, "namesp")
'CERRAR LA CONEXIÓN
SqlConnection1.Close()
'CREAR DATABINDING
bindingSource1 = New BindingSource
bindingSource1.DataMember = "namesp"
bindingSource1.DataSource = Me.Dataset1
'VINCULAR DATABINDING
TextBox1.DataBindings.Add("Text", Dataset1, "namesp.nombre")
End Sub
End Class
:vientos:
-------------------------------------------------------------------------------------
Bien, la conexión a la base de datos se ejecuta estupendamente. De la mism forma, puedo visualizar el contenido de lo que hay en mis tablas en los textbox mediante Databinding.
Sin embargo, deseo trabajar con Datatable y con los DataTableAdapter, de esa manera trabajar sin conexión. El único inconveniente es que no se cómo se crean dichos componentes mediante código. He buscado y dicen que hay que confiigurar la instancia de no se cuantas madres. En fin, ya me harte de buscar, no hallo una solución.
Pude trabajar mediante los datatable y dataadapter haciendo la conexión con el asistente, pero yo no deseo trabajar con el assitente, deseo trabajar con puro código.
Alguien que me pueda iluminar o que me diga como creo mi datatable y tableadapter con mi código?? Se los agradecería muchísimo !!
unzadita: