Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
 Otvorte program Microsoft Office Access , vyberte záložku " Vytvoriť " a vyberte " Návrh formulára " vytvoriť nový formulár . Kliknite pravým tlačidlom myši na formulár sa zobrazí " Zoznam vlastností . " 
 2 
 Kliknite na záložku " Data " . Vedľa " zdrojového objektu , " zadajte názov tabuľky obsahujúce dlhé binárne dáta . Vyberte " formulár " pod " Typ výberu . " Kliknite na " udalosť " kartu a vedľa " On Kliknite na " vyberte " [ Procedúra udalosti ] " otvorte základnom okne Visual Microsoft . 
 3 
 Zadajte nasledujúce pod " Form_Load " volať funkcie extrahovať dlhé binárne dáta z tabuľky do súboru : 
 
 imageToFile " C : \\ Images \\ exportedImage.jpg " , [ Image ] 
 
 Upravte cestu , ak chcete , aby sa obrázok byť vyvezený do inej cesty a iným názvom súboru . " [ Image ] " je pole v tabuľke obsahujúci dlhej binárne dáta 
 4 
 Skopírujte a vložte nasledujúci funkciu do svojho modulu : . 
 
 Public Function imageToFile ( strFile As String , ByRef pole As Object ) As Long Dim 
 
 filenumber As Integer 
 
 Dim byteData ( ) Ako Byte 
 
 imageToFile = 0 
 
 filenumber = FreeFile 
 
 Otvoriť strFile Pre Binary Access Napíšte Ako filenumber 
 
 byteData = pole 
 
 Put # filenumber , , byteData 
 
 imageToFile = LOF ( filenumber ) 
 
 End Function 
 5 
 Zatvorte okno " Microsoft Visual Basic " a kliknite pravým tlačidlom myši " Form1 . " Zvoľte " Zobraziť formulár " exportovať binárne dáta a vytvoriť súbor s obrázkom .