displaying multiple pic or text file into picBox/TextBox

hi everyone, i have a big problem,i saved the .txt and .JPG file into my Access table using Blob. i need to retrieve the file if user choose to open it. My problems are,
1. combine the multiple text files,so far it can combine, but, i cannot open it into textbox. i use LoadFile that i have inside Module Blob. this is a snippets of Module Blob that contain LoadFile

Public Function LoadFile(ByVal FileName As String) As Byte()
Dim FileNo As Integer, b() As Byte
On Error GoTo Err_Init
If Dir(FileName, vbNormal Or vbArchive) = "" Then
Exit Function
End If
FileNo = FreeFile
Open FileName For Binary Access Read As #FileNo
ReDim b(0 To LOF(FileNo) - 1)
Get #FileNo, , b
Close #FileNo
LoadFile = b
Exit Function
Err_Init:
MsgBox Err.Number & " - " & Err.Description
End Function

2.what if my combination of files selected got .txt and .JPG files? i tried once and openedit in MSWords, and the Pic file changed into something like ASCII characters..

can anyone help me? this tasks are hard enough for a beginner like me. :)

Sign In or Register to comment.

Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!

Categories