Base datos

 

Mantenimiento de Datos Aplicaciones Windows (ADO Net) 
 

     

Visual Studio Net   
     
Mantenimientos de Datos 
Aplicaciones Windows (ADO Net) 
Prof: Allende Aguilar; Franklin   

FrankDocNet

1/27  Prof: Allende Aguilar; Franklin           |            Email: frank_allende@hotmail.com   

 

Mantenimiento de Datos Aplicaciones Windows (ADO Net) 
 Mantenimiento de Datos
Objetivos: Conocer el Objeto Command Como pasar parámetros Como ejecutar Comandos Casos prácticos

Introducción Cuando hablamos de Matenimiento de Datos hablamos de Insersion, Actualizacion y Eliminacion de Registros. Para poder entender y recordando un poco de lo que ya hablamos mostrare la figura de Secuencia de Objetos. En esta parte seguiremos la segunda secuencia querespecta a Matenimiento de Datos. Cuando en el Objeto Command escribimos un Insert, Update o Delete, no crearemos otro objeto mas, tan solo ejecutaremos el commando (ExecuteNonQuery); cabe indicar, que para poder ejecutar, el commando el Objeto Connection tiene que estar abierta (Cn.Open) y luego tendremos que cerrar (Cn.Close)

En la presente separata aprenderemos a utilizar el objetocommand, como pasar parametros y como ejecutar. Entraremos por lo mas basico y luego veremos mantenimientos completos e incluso con una capa que nos servira de enlace con el SQL Server. Para porder desarrollar esta presente separata Ud. debera tener la Base de Datos con la que que trabajaremos para las demostraciones. La Base de Datos se llama Ventas y simula ser de una Bodega pequeña dondemanejara lo basico. Ahí tiene el diagrama
Nota: Si Ud. Desea tener el codigo de la Base de datos consulte con su Instructor de turno.

2/27  Prof: Allende Aguilar; Franklin           |            Email: frank_allende@hotmail.com   

 

Mantenimiento de Datos Aplicaciones Windows (ADO Net) 
 

Base de Datos “Ventas”

3/27 Prof: Allende Aguilar; Franklin           |            Email: frank_allende@hotmail.com   

 

Mantenimiento de Datos Aplicaciones Windows (ADO Net) 
 

Primera Practica 1.- Crear un nuevo Proyecto de Apliacion Windows de nombre “Practica de Mantenimiento I”. 2.- En el Form1 diseñe como sigue:

3.- Agregar los siguientes códigos:
Objeto: Form1 Evento: Declaraciones 'Creando mi objeto connection Dim Cn As New SqlConnection("Server=(local);DataBase=Ventas;Integratedsecurity=True") 'Creando el procedimiento de Limpiado de texto Sub Limpiar() Me.TxtCodigo.Clear() Me.TxtNombre.Clear() Me.TxtPrecio.Clear() Me.TxtStock.Clear() Me.TxtCodigo.Focus() End Sub 'Creando el procedimiento para cargar datos a la grilla Sub CargarDatos() Dim Cmd As New SqlCommand("Select * from Producto", Cn) Dim Da As New SqlDataAdapter(Cmd) Dim Dt As New DataTable Da.Fill(Dt)Me.DgvDatos.DataSource = Dt End Sub

4/27  Prof: Allende Aguilar; Franklin           |            Email: frank_allende@hotmail.com   

 

Mantenimiento de Datos Aplicaciones Windows (ADO Net) 
 

Objeto: Form1 'Llamamos al procedimiento CargarDatos CargarDatos() Objeto: BtnGuardar

Evento: Load

Evento: Click

'Escribimos el codigo Insert Dim Cmd As New SqlCommand("Insert intoProducto Values(@Cod,@Nom,@Pre,@Sto)", Cn) 'Pasamos los parametros al command y le pasamos valores a cada parametro Cmd.Parameters.Add("@Cod", SqlDbType.VarChar, 6).Value = Me.TxtCodigo.Text Cmd.Parameters.Add("@Nom", SqlDbType.VarChar, 40).Value = Me.TxtNombre.Text Cmd.Parameters.Add("@Pre", SqlDbType.Money).Value = CDec(Me.TxtPrecio.Text) Cmd.Parameters.Add("@Sto", SqlDbType.Int).Value =CInt(Me.TxtStock.Text) 'Para poder ejecutar el commando tenemos que abrir el Connection Cn.Open() 'Ejecutamos el commando Cmd.ExecuteNonQuery() 'cerramos el Connection Cn.Close() MsgBox("Producto se Guardo correctamente") 'Llamamos a los Prec CargarDatos() Limpiar()

4.- Agregar un nuevo Windows Form con el nombre por defecto Form2 y haga le siguiente diseño.

5/27 ...