Cómo guardar una imagen en una base de datos con MS Visual Basic 6

Su base de datos guarda las imágenes en formato binario, por lo que puede mostrar las imágenes en una página web o en forma de Windows. El lenguaje Visual Basic tiene una sintaxis de conexión que le permite conectarse a la base de datos, se especifica que la información es una imagen y guardarla en una de sus mesas. La imagen puede ser uno de una página web o que se encuentre en el disco duro local. Las imágenes son objetos de gran tamaño, por lo que las tablas necesitan espacio suficiente para almacenar los archivos binarios. Con suficiente espacio en el disco duro, puede crear un gran repositorio de imágenes para su aplicación de Visual Basic 6.

Instrucciones

1 Crear un objeto de flujo de la memoria y asignarla a la imagen. La secuencia de memoria lee los datos binarios de la imagen y la almacena en la memoria. Estos datos binario se transfirió después a una matriz binaria. El siguiente código crea la secuencia de memoria y guarda la imagen:

MS dévil como nuevo MemoryStream ()
theImage.Save (ms), theImage.RawFormat

"TheImage" es el ID de la imagen ubicada en el formulario de Visual Basic. Este elemento de la imagen apunta a una ubicación de una imagen en el disco duro.

2 Crear la conexión de base de datos y consulta SQL que inserta la imagen en la base de datos. La conexión se crea depende del servidor que utilice. El código siguiente, se configura la conexión y crea la consulta "inserto":

Dim conn As New SqlConnection (string_connection)
consulta Dim como secuencia = "insertar en Picture_Table (foto) valores (@Picture)"
comando Dim As New SqlCommand (consulta, conn)

3 Configurar el parámetro imagen para el comando de consulta. El código siguiente, se configura un parámetro para el código SQL y se fija la imagen:

Dim bytearray () As Byte = ms.GetBuffer ()
command.Parameters.Add (Nueva SqlParameter ( "@ Imagen", SqlDbType.Image)). Value = bytearray

4 Ejecutar la consulta y guardar la imagen en la base de datos. Todos los parámetros se establecen, pero la imagen todavía no se guarda en la base de datos. El código siguiente abre la conexión de base de datos, ejecuta el código SQL y guarda la imagen en la tabla de base de datos:

conn.Open ()
command.ExecuteNonQuery ()
conn.Close ()