Dim Tamaño as string
open "C:\lala.exe" for binary as #1
Tamaño = Space$(LOF(1))
get #1,,Tamaño
CLose #1
msgbox tamaño
Salu2
Eso te muestera el tamaño del archivo...
Si keres ver el contenido del archivo hace esto:
Dim Contenido as string
Private Sub Command1_Click ()
Open "C:\TuArchivo.exe" For Binary As #1
Do While Not EOF(1)
Get #1, , Contenido
Loop
Close #1
End Sub
Ahora q pienso bien no es asi el code en realida :S
Pero ak no tengo el VB asike no me puedo fijar XDD
cuando llegue a mi ksa posteo xDDD
Mientras fijate si eso t va, modificalo un poco
salu2 !
Autor
En línea
