Din databas sparar bilder i binär form , så att du kan visa bilderna på en webbsida eller Windows formulär . Visual Basic språket har en koppling syntax som gör att du kan ansluta till databasen , ange att informationen är en bild och lagra den i en av dina tabeller . Bilden kan vara en från en webbsida eller ligger på den lokala hårddisken . Bilder är stora objekt , så tabellerna behöver tillräckligt med utrymme för att lagra binära filer . Med tillräckligt med hårddiskutrymme kan du skapa en stor bild slutförvar för Visual Basic 6 program . Instruktioner
1
Skapa ett objekt minne ström och tilldela den till bilden . Minnet ström läser de binära data från bilden och lagrar det i minnet . Denna binära data som överförs senare till en binär array . I följande kod skapas minnet ström och sparar bilden :
Dim ms Som ny MemoryStream ( ) theImage.Save ( ms , theImage.RawFormat ) katalog
" theimage " är ID på bilden ligger på Visual Basic formulär . Denna bildelement pekar på en plats på en bild på hårddisken .
2
Skapa databas anslutning och SQL fråga som infogas bilden i databasen . Den anslutning du skapar beror på den server du använder . Följande kod ställer in anslutningen och skapar " insert " query :
Dim conn som ny SqlConnection ( string_connection ) Dim query As String = " infoga i Picture_Table ( bilden ) värden ( @ Picture ) " Dim kommando som New SqlCommand ( query , conn )
3
Ställ in bildens parameter för frågekommandot . Följande kod sätter upp en parameter för SQL-koden och fäster bilden :
Dim ByteArray ( ) Som byte = ms.GetBuffer ( ) command.Parameters.Add ( Ny SqlParameter ( " @ Picture " , SqlDbType . bild ) ) . Value = ByteArray
4
exekvera frågan och spara bilden till databasen . Alla parametrar är inställda , men bilden är ändå inte sparas till databasen . Koden nedan öppnar databasanslutning , exekverar SQL- kod och sparar bilden till databasen tabellen :
conn.Open ( ) command.ExecuteNonQuery ( ) conn.Close ( )
