read Binary files *resolved*

[SeaHag]

It seems like every example i look at is the same..
but i cannot get any output.


How do i open a binary file and look at it??

Private Sub Command2_Click()
 
 
Dim Path As String
    Path = "C:\Documents and Settings\All Users\Desktop\test.exe" 
 
Dim b() As Byte
 
ReDim b(FileLen(Path))
Open Path For Binary Access Read As #1
Get #1, , b()
Close #1
 
Text1 = b()
 
 
 
End Sub

Seahag