Witam
I z góry proszę o wyrozumiałość.
Otóż: Łączę się z poziomu Accessa z bazą danych MS SQL i stamtąd pobieram zdjęcia,
które wyświetlam w kontrolce Obraz (relacja image-->obiekt OLE)
Wszystko jest cacy ale chciałem mieć możliwość zapisu tych zdjęć do pliku.
Oryginały w bazie są w formacie jpg,ja również chciałem je w tymże formacie zapisać na dysku.
Skleciłem taki kod:
Private Sub obraz_Click()
Dim plik As String
plik = "d:\test.jpg"
f = FreeFile
Open plik For Binary Access Write As f
Put f, , plik
End Sub
Efekt: zapisuje plik o nazwie test.jpg, który ma tylko 4 Kb, i przy próbie otwarcia go wyskakuje informacja
o błędnym nagłówku pliku. Co robię źle. Pomóżcie proszę.
wstecz 1 dalej
otwarty rozpoczął: rafik73
postów: 1
