Il tuo database salva le immagini in formato binario , in modo da poter visualizzare le immagini su una pagina web o Windows form . Il linguaggio Visual Basic ha una sintassi di connessione che consente di connettersi al database , specificare che l'informazione è un'immagine e conservarla in una delle tabelle . L'immagine può essere uno da una pagina web o si trova sul disco rigido locale . Le immagini sono oggetti di grandi dimensioni , per cui le tabelle hanno bisogno di spazio sufficiente per memorizzare i file binari . Con spazio su disco rigido sufficiente , è possibile creare un grande archivio di immagini per Visual Basic 6 . Istruzioni
1

Creare un oggetto di flusso di memoria e assegnarlo all'immagine . Il flusso di memoria legge i dati binari dal immagine e lo memorizza . Questi dati binario viene successivamente trasferito in una matrice binaria . Il codice seguente crea il flusso di memoria e salva l'immagine :

Dim ms Come nuovo MemoryStream ( ) theImage.Save ( ms , theImage.RawFormat ) per

" theImage " è l' ID dell'immagine situato sul modulo di Visual Basic . Questa immagine punti elemento in una posizione di un'immagine sul disco rigido .
2

Creare la connessione al database e la query SQL che inserisce l'immagine nel database. La connessione si crea dipende dal server in uso . Il codice seguente imposta la connessione e crea il "insert" ricerca:

Dim conn As New SqlConnection ( string_connection ) query Dim As String = " INSERT INTO valori Picture_Table ( foto) ( @ Picture ) " Dim comando come New SqlCommand (query , conn)
3

Impostare il parametro di immagine per il comando query . Il codice seguente imposta un parametro per il codice SQL e allega l'immagine:

Dim byteArray ( ) As Byte = ms.GetBuffer ( ) command.Parameters.Add ( New SqlParameter ( " @ Immagine" , SqlDbType . image)) . Valore = byteArray
4

eseguire la query e salvare l'immagine nel database. Tutti i parametri sono impostati , ma l'immagine non è ancora salvati nel database . Il codice qui sotto si apre la connessione al database , esegue il codice SQL e salva l'immagine per la tabella del database :

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

• Come eliminare un oggetto in Visual Basic 6 
• Come assegnare un'espressione ad una etichetta in Visual Basic