CREAR UN SISTEMA EN .NET

SQL SERVER Y VB 2008 

INTRODUCCION :

          Contiene los siguientes elementos que vamos a utilizar.




                                                                                                        
  
                                                                           


    3.   Bueno después de instalar todo el Kit de Visual Studio solo faltaría una cosa por hacer; la cual a mi forma de ver las cosas es necesaria la
Herramienta se llama SQL Server Management Studio Express esta herramienta fue creada por Microsoft para así mismo tener una mejor
Administración de nuestro Motor De Base de Datos





                                                                          

DESAROLLO:

Bueno pues después de haber instalado las herramientas con las que vamos a trabajar empecemos hacer nuestro sistema de aquí en adelante......


OK pues empecemos.....

Lo primero que debemos saber es que en el Servidor de Base de Dato se van a alojar todas aquellas herramientas que nos sirven para administrar nuestra
Base de Datos estas son algunas cosas que se pueden hacer dentro de nuestro Servidor.






 
                                              

           
                                     
Bueno para poder empezar a trabajar con nuestro servidor es importante saber que los servidores manejan dos tipos de Autenticación que son:

Autenticación de Windows
Autenticación de SQL Server
Al igual cada Servidor puede tener uno o mas usuarios y contraseñas que sirven para tener acceso a nuestro servidor.

Abrimos nuestro Sql Server Management Studio Express aparece una pantalla como la siguiente donde con un simple Click en conectar tendremos acceso A todo lo que contiene nuestro Servidor de Base de Datos

                                                                                     


NOTA:

Si no tenemos acceso a nuestro Servidor es debido a que tenemos un problema con la Autenticacion o con el nombre de usuario o contraseña

Si todo sale correctamente llegaremos a una pantalla como la siguiente:


                                                                                      

En esta pantalla podemos acceder a crear diferentes bases de datos entre otras cosas que mas adelante veremos....

PARA ESTA SECCION ES NECESARIO CREAR UNA BASE DE DATOS Y TENER TODA LA INFORMACION DE NUESTRO SERVIDOR.

Los datos con lo que voy a trabajar seran los siguientes:

Server:  JENYFER\SQLEXPRESS           'el nombre del servidor de Base de Datos
User id: root                                           'el nombre de usuario para entrar al Servidor
Password: #&#&                                   'el password para entrar al Servidor
Database: VICO                                    'el nombre de mi Base de Datos que Cree

Ok pues empezemos hacer nuestra conexion de base de datos con visual basic para eso es necesario abrir  Windows y seleccionar Windows Form Appication.         


                                                     

 NOTA:
Algo bueno que tiene Visual Studio 2008 es que podemos cambiar el .Net Framework con el que queramos Trabajar como notan en la imagen anterior en la parte Superior izquierda.

Después tendremos un formulario como el siguiente en el cual se realizara una pequeña conexión a continuación.
Utilizaremos el siguiente método de coneccion Imports System.Data.SqlClient

 El codigo quedari asi con los datos que tenemos:

Imports System.Data.SqlClient ' EL PROVEEDOR DE BASE DE DATOS SQLCLIENT

Public Class Form1 'ESTA DECLARADA TU CLASSE FORM1

Dim conexion As New SqlConnection 'DECLARAS TU CONEXION

 

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

conexion.ConnectionString = "server=SERVER\LOCAL;user id=root; password=#&#&; database=VICO; pooling=false" 'TU CONEXION

Try 'ABRES TRY

conexion.Open() 'ABRE TU CONEXION

MessageBox.Show("Tu conexion es correcta") 'SI NO HAY PROBLEMA SE ABRE LA CONEXION Y APARECE EL MENSAJE

Catch excepcion As SqlException ' DECLARAS EXCEPCION

MessageBox.Show("Error de sintaxis") 'SI TIENES ALGUN ERROR ENTRA ESTE MENSAJE

conexion.Close() 'CIERRA TU CONEXION

End Try 'CIERRAS TRY

End Sub

End Class

Bueno si todo sale bien quiere decir que nuestra conexion con el servidor es correcta cualquier duda favor de hacermela saver para apoyarnos entre todos continuaremos con los demas procesos para esto supongamos que tenemos una tabla que es la siguiente tratare de hacer una tabla con pocos campos para asi mismo sea entendible ok y practicaremos una consulta con la siguiente tabla: 

 

                                                                                      

 

 para empezar a relacionarnos con los Query el formulario es el siguiente:

 

                                                                                          

 

el codigo quedari asi:

Imports System.Data.SqlClient ' EL PROVEEDOR DE BASE DE DATOS SQLCLIENT

Public Class Form1 'ESTA DECLARADA TU CLASSE FORM1

Dim conexion As New SqlConnection 'DECLARAS TU CONEXION

Dim comando As New SqlCommand 'DECLARAS TU COMANDO

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

conexion.ConnectionString = "server=SERVER\LOCAL;user id=root; password=#&#&; database=VICO; pooling=false" 'TU CONEXION

Try 'ABRES TRY

conexion.Open() 'ABRE TU CONEXION

comando.Connection = conexion 'INDICAS QUE EL COMANDO ES PARTE DE LA CONEXION

comando.CommandText = "update t_prueba set nombre=josue where nombre= " & Me.TextBox1.Text  'CONSULTA

comando.ExecuteNonQuery() 'EJECUTAMOS EL COMANDO

Catch excepcion As SqlException ' DECLARAS EXCEPCION

MessageBox.Show("Error de sintaxis") 'SI TIENES ALGUN ERROR ENTRA ESTE MENSAJE

conexion.Close() 'CIERRA TU CONEXION

End Try 'CIERRAS TRY

End Sub

End Class

espero este blog valla conforme espero si no me doy a explicar algo me gustaria que me lo hicieran saber o que me dijieran que les gustaria que aportara a este blog gracias.

saludos!!

Bueno el codigo anterior lo unico que hace es realizar una actualizacion de nuestra base de datos donde la condicion sea igual a nuestro textbox1.text existe una forma en la que le podemos dar un parametro a nuestras consultas voy a utilizar el mismo ejemplo pero con parametros espero y les sirva:

                             ;                                                           

 

el codigo seria el siguiente:

Imports System.Data.SqlClient ' EL PROVEEDOR DE BASE DE DATOS SQLCLIENT

Public Class Form1 'ESTA DECLARADA TU CLASSE FORM1

Dim conexion As New SqlConnection 'DECLARAS TU CONEXION

Dim comando As New SqlCommand 'DECLARAS TU COMANDO

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

conexion.ConnectionString = "server=SERVER\LOCAL;user id=root; password=#&#&; database=VICO; pooling=false" 'TU CONEXION

Try 'ABRES TRY

conexion.Open() 'ABRE TU CONEXION

comando.Connection = conexion 'INDICAS QUE EL COMANDO ES PARTE DE LA CONEXION

comando.CommandText = "update t_prueba set nombre=@x where nombre= " & Me.TextBox1.Text 'CONSULTA

comando.Parameters.Add(New SqlParameter("@x", SqlDbType.VarChar, 100)) 'PARAMETRO DEM LA VARIABLE X

comando.Parameters("@x").Value = TextBox2.Text 'INDICAMOS QUE LA VARIABLE ES IGUAL AL TEXTBOX2

comando.ExecuteNonQuery() 'EJECUTAMOS EL COMANDO

Catch excepcion As SqlException ' DECLARAS EXCEPCION

MessageBox.Show("Error de sintaxis") 'SI TIENES ALGUN ERROR ENTRA ESTE MENSAJE

conexion.Close() 'CIERRA TU CONEXION

End Try 'CIERRAS TRY

End Sub

End Class

Bueno hasta este momento tenemos como conectar nuestra base de datos  a visual basic y hacer una consulta con y sin parametros las diferentes consultas como INSERT DELETE  etc son paraecidas a esta que acabamos de hacer que es UPDATE bueno conforme tenga tiempo continuaremos con lo que es la lectura de la base de datos para asi mismo depositarla dentro de nuestro objetos.

Bueno en estos momentos hemos visto como conectar sql con visual basic y hacer consultas con y sin parametros....                                         ;                                   ;                NOTA:

Bueno en este apartado les voy a mostrar como leer los datos de la base de datos y asi mismo depositarlas en un form el diseño del form en base a la tabla que tenemos seria el siguiente

                                              ;                                                  

el codigo para leer datos de la base de datos seria el siguiente:

Imports System.Data.SqlClient ' EL PROVEEDOR DE BASE DE DATOS SQLCLIENT

Public Class Form1 'ESTA DECLARADA TU CLASSE FORM1

Dim conexion As New SqlConnection 'DECLARAS TU CONEXION

Dim comando As New SqlCommand 'DECLARAS TU COMANDO

Dim lectura As SqlDataReader 'DECLARAMOS LO QUE VA SER NUESTRA LECTURA DE DATOS

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

conexion.ConnectionString = "server=SERVER\LOCAL;user id=root; password=#&#&; database=VICO; pooling=false" 'TU CONEXION

Try 'ABRES TRY

conexion.Open() 'ABRE TU CONEXION

comando.Connection = conexion 'INDICAS QUE EL COMANDO ES PARTE DE LA CONEXION

comando.CommandText = "select nombre,apaterno,amaterno,edad where id= '" & TextBox1.Text & "'" 'CONSULTA

lectura = comando.ExecuteReader 'EJECURTA LA LECTURA DE DATOS

If lectura.Read() Then 'SENTENCIA

Me.Label5.Text() = lectura.Item("nombre").ToString() 'DEPOSITAMOS NOMBRE EN EL LABEL

Me.Label6.Text() = lectura.Item("apaterno").ToString() 'DEPOSITAMOS AP PATERNMO EN EL LABEL

Me.Label7.Text() = lectura.Item("amaterno").ToString() 'DEPOSITAMOS AP MATERNO EN EL LABEL

Me.Label8.Text() = lectura.Item("edad").ToString() 'DEPOSITAMOS EDAD EN EL LABEL

lectura.Close() 'CERRAMSO LA LECTURA

End If

conexion.Close() 'CERRAMOS LA CONEXION

 

comando.ExecuteNonQuery() 'EJECUTAMOS EL COMANDO

Catch excepcion As SqlException ' DECLARAS EXCEPCION

MessageBox.Show("Error de sintaxis") 'SI TIENES ALGUN ERROR ENTRA ESTE MENSAJE

conexion.Close() 'CIERRA TU CONEXION

End Try 'CIERRAS TRY

End Sub

End Class

......


Bueno espero hasta ahora todo valla claro pues en este capitulo veremos como mostrar los datos de una tabla en un DataGridView continuemos......

• Primero creamos un nuevo proyecto
• Agregamos un DataGridView

            

• Lo agregamos al form que creamos    

                                                        

• Lo que tenemos que hacer a continuacion es simplemente programar este objeto y mandarlo a llamar en el evento que quieras; el codigo quedaria asi.

  Public Class Form1 'ESTA DECLARADA TU CLASSE FORM1

  Dim conexion As New SqlConnection 'DECLARAS TU CONEXION

  Dim adapter As New SqlDataAdapter("select * from t_productos", conexion) 'aqui declaramos nuestro adaptador indicando el Query que rellena nuestro DataGridView
  
  Dim data As New DataSet 'aqui declaramos nuestro dataset
  
  
  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

  conexion.ConnectionString = "server=SERVER\LOCAL;user id=root; password=#&#&; database=VICO; pooling=false" 'TU CONEXION

  Try 'ABRES TRY

  conexion.Open() 'ABRE TU CONEXION
  DataGridView1.DataSource = data.Tables(0) 'llenamos el DataGridView con el dataset que llenamos anteriormente
  
  conexion.Close() 'CERRAMOS LA CONEXION

   Catch excepcion As SqlException ' DECLARAS EXCEPCION

  MessageBox.Show("Error de sintaxis") 'SI TIENES ALGUN ERROR ENTRA ESTE MENSAJE

  conexion.Close() 'CIERRA TU CONEXION

  End Try 'CIERRAS TRY

  End Sub

  End Class
  

  • El resultado seria el siguiente

                                                               
    
    

    Bueno espero halla quedado claro me gustaria saber que quisieran que agregara a este blog recuerden entre todos aprendemos.....muchas gracias por visitarlo este y todos mis blogs.....
    
    

  • ASP.NET 2008
    
  • CRYSTAL REPORTS 2008

  
  
  

  enviado lunes, 31 de marzo de 2008 18:57 por oscar | 29 comentarios