Aprire il contenuto di una JPG

[Andreace86]

Ciao a tutti, le ho provate tutte

avrò provato 50 funzioni diverse, ma nessuna riescie ad aprire il contenuto di una JPG, come mai??

Una delle tante:

Public Function PutFileInString(sFileName As String) As String

Dim iFree As Integer, sizeOfFile As Long
Dim sFileString As String, sTemp As String
iFree = FreeFile
Open sFileName For Binary Access Read As iFree
sizeOfFile = LOF(iFree)
sFileString = Space$(sizeOfFile)
Get iFree, , sFileString
Close #iFree
PutFileInString = sFileString
End Function

Private Sub Command1_Click() ' how To use it
Dim sTemp As String
sTemp = PutFileInString("d:\temp.jpg")
text1.text = sTemp
End Sub

Fin che avevo win98 riuscivo perfettamente, adesso con WinXP non riesco!

Sapete darmi una mano?

[Andreace86]

Cavolo si aprono i primi 4 caratteri e gli altri no!

[Andreace86]

Raga mi serve una mano... please!

Sono ad un passo a finire il progetto che stò facendo, mi manca solo questo....!

Perfavore

[Thor82]

l'unica cosa che mi viene in mente è prova a usare

Filelen(path)
invece di

LOF(iFree)

[xegallo]

il problema non è nella lettura del file infatti la variabile lo contiene tutto provare per credere debug.print variabile
ma nel fatto che la textbox non mosta caratteri non stampabili usa una rich textbox