Hvordan lagre et bilde til en database med MS Visual Basic 6

Databasen lagrer bildene i binær form, slik at du kan vise bilder på en nettside eller Windows form. Visual Basic språket har en forbindelse syntaks som lar deg koble til databasen, angir at informasjonen er et bilde og lagre det i en av tabellene. Bildet kan være en fra en nettside eller ligger på den lokale harddisken. Bildene er store objekter, slik at tabellene må nok plass til å lagre binære filer. Med nok plass på harddisken, kan du lage et stort bilde depot for Visual Basic 6 søknad.

Bruksanvisning

1 Lag et minne Stream-objekt og tilordne den til bildet. Minnet stream leser binære data fra bildet og lagrer det i minnet. Dette binære data blir senere overført til en binær matrise. Følgende kode oppretter minnet bekken og lagrer bildet:

Dim ms Som ny Memory ()
theImage.Save (ms, theImage.RawFormat)

"TheImage" er ID-bildet som ligger på Visual Basic form. Dette bildet element peker til en plassering av et bilde på harddisken.

2 Opprette databasen tilkoblingen og SQL-spørring som setter bildet inn i databasen. Forbindelsen du oppretter avhenger av serveren du bruker. Følgende kode setter opp forbindelsen og skaper "insert" søket:

Dim conn As New SqlConnection (string_connection)
Dim spør As String = "setter inn Picture_Table (bildet) verdier (@Picture)"
Dim-kommandoen som ny SqlCommand (spørring, conn)

3 Sett opp bildet parameter for søket kommandoen. Følgende kode setter opp en parameter for SQL-kode og legger bildet:

Dim byteArray () As Byte = ms.GetBuffer ()
command.Parameters.Add (New SqlParameter ( "@ Picture", SqlDbType.Image)). Verdi = byteArray

4 Utføre spørringen og lagre bildet til databasen. Alle parametere er satt opp, men bildet er fortsatt ikke lagres i databasen. Koden nedenfor åpner databasen tilkobling, utfører SQL-kode og lagrer bildet til databasen tabellen:

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