Entradas

Mostrando entradas de mayo 7, 2014

GRABAR FOTO VB.NET Y SQL SERVER

Imagen
Creamos la siguiente base de datos y tabla en el MS SQL Server 2012


Diseñamos el siguiente Formulario en una Aplicación WINDOWS de Visual Basic 2010


Consideramos el siguiente Código fuente:
------------------------------------------------------------------------------------------------------------
Imports System.Data
Imports System.Data.SqlClient
Public Class Form1
    Dim cn As New SqlConnection("Server=.; DataBase=DEMO; Integrated Security=true;")
    Private Sub btnGrabar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnGrabar.Click
        Try
            Dim cmd As New SqlCommand()
            With cmd
                .CommandText = "INSERT INTO EMPLEADOS(NOMBRE, APELLIDO, FECHANACIMIENTO, ESTADOCIVIL, FOTO)VALUES(@NOM,@APE,@FN,@EC,@FOTO)"
                .Parameters.AddWithValue("@NOM", Me.txtnom.Text.Trim)
                .Parameters.AddWithValue("@APE", Me.txtape.Text.Trim)
                .Parameters.AddWithVal…