1) 让服务端发送一个 结束标志符,或 通过文件大小 来判定。
2)你去下载一个 vb的sp5 补丁, 在老版本(也就是 没打补丁的vb)的vb,回出现 重复加载 winsock 控件出错的 bug。Visual Basic 6.0 SP5: Run-Time Redistribution Pack (VBRun60sp5.exe) 
http://download.microsoft.com/download/vb60pro/Redist/sp5/WIN98Me/EN-US/vbrun60sp5.exeService Pack 5 - Visual Basic Download - Chinese (Simplified)
http://download.microsoft.com/download/vstudio60ent/SP5/Wideband-VB/WIN98Me/CN/VS6sp5VB.exe