metti

Response.Write "maGGico file...: " & FileData
Response.Flush


prima di


For nIndex = 1 to LenB(FileData)
oFile.Write Chr(AscB(MidB(FileData,nIndex,1)))
Next


e posta quello che viene a video