Ako uložiť obrázok do databázy s MS Visual Basic 6

Databáza ukladá obrázky v binárnej podobe , takže si môžete zobraziť snímky na webové stránky alebo formuláre systému Windows . Visual Basic jazyk má pripojenie syntax , ktorá umožňuje pripojiť k databáze , stanovuje , že informácia je obraz a uložte ho do jednej z tabuliek . Obraz môže byť jedným z webovej stránky , alebo umiestnený na lokálnom pevnom disku . Obrázky sú veľké objekty , tak stoly potrebujú dostatočný priestor pre uloženie binárne súbory . S dostatkom miesta na pevnom disku , môžete vytvoriť veľký obraz úložisko pre Visual Basic 6 aplikácií . Pokyny dovolená 1

Vytvorte pamäti objekt typu stream a priradiť ju k obrazu . Pamäť prúd číta binárne dáta z obrázka a uloží ho do pamäte . Tieto binárne dáta sú neskôr prevedená na binárne polia . Nasledujúci kód vytvorí pamäťový prúd a uloží snímku :

Dim ms ako nové MemoryStream ( ) theImage.Save ( ms , theImage.RawFormat )

" theImage " je číslo z obrázku umiestnený na formulári jazyka . Tento obrázok prvok odkazuje na umiestnenie obrázku na pevnom disku .
2

vytvoriť pripojenie k databáze a SQL dotaz , ktorý vloží obrázok do databázy . Pripojenie vytvoríte je závislá na serveri , ktorý používate . Nasledujúci kód nastaví pripojenie a vytvorí dotaz " vložiť " :

Dim conn ako New SqlConnection ( string_connection ) Dim dotaz As String = " vložiť do Picture_Table ( obrázok ) hodnoty ( @ obrázok ) , " Dim príkaz ako new SqlCommand (otázka , conn )
3

Nastavte parameter obrazu na príkaz dotazu. Nasledujúci kód nastavuje parameter pre SQL kódu a pripojí obraz :

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

spustite dotaz a uložiť obrázok do databázy . Všetky parametre sú nastavené , ale obraz stále nie je uložená do databázy . Nasledujúci kód otvorí pripojenie k databáze , spustí SQL kód a uloží obrázok do databázovej tabuľky :

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

• Predchádzajúca strana: Ako nakladať objektu v jazyku Visual Basic 6 
• Ďalšia strana: Ako priradíte výraz do Label v jazyku Visual Basic