Chi mi dà una mano a tradurre in asp questo codice VB?

[nat99]

Dim s As String
Dim hx As String
Open "c:myimage.gif" For Binary Access Read As 1
hx = ""
While (Not EOF(1))
c = Input$(1, 1)
If (c <> "") Then
s = Hex(Asc(c))
If (Len(s) = 1) Then
hx = hx + "0" + s
Else
hx = hx + s
End If
end if
Wend
Debug.Print "The hex-encoded GIF file is: " + hx

Mi sn bloccato su 'input'... 'Hex' in Asp esiste??
Grazie

[Roby_72]

Si Hex esiste.

Roby

[nat99]

Originariamente inviato da Roby_72
Si Hex esiste.

Roby

Mi dà errore su input... come posso risolvere?

[nat99]

come posso accedere al file in modo binario?