open binary file(編號:5849)

Dim intFn As Integer
Dim bytData As Byte
Dim bytTemp As Byte
Open FileName For Binary Access Read As #intFn
While Not EOF(intFn)
Input #intFn, bytTemp
  bytData = bytData + bytTemp
Wend
請問,如果我要開啟一檔案,且不論為文字檔或者是二進檔,皆以
二進位來開啟,然後再透過winsock傳至另一台電腦再存檔
程式寫這樣,請問為何每次所input的bytTemp皆為0呢???