为何inet发送文件时状态信息重复显示？

Question

各位：
　　我用　ms　的inet1　控件发送文件时，通过其Inet1　的　StateChanged　事件来获取发送状态信息，但显示在　list１　中的信息有重复啊，特别是状态中的　第５、6、７、８条信息连续显示，重复达 6 次。代码如下：
Private Sub Inet1_StateChanged(ByVal State As Integer)
  '在调用Inet的Execute方法时会触发该时间,该事件传递一个参数State来返回当前执行状态
    Dim strStatus     As String
    Dim strResult     As String
    Dim strAll     As String            
    Dim aryDownload()     As Byte
            
    Select Case State
          Case icNone
                  strStatus = "无状态可报告。"
          'Case   icHostResolvingHost
                  'strStatus   =   "正在查询所指定的主机的   IP   地址。"
          Case icHostResolved
                  strStatus = "已成功地找到所指定的主机的   IP   地址。"
          Case icConnecting
                  strStatus = "正在与主机连接。"
          Case icConnected
                  strStatus = "已与主机连接成功。"
          Case icRequesting
                  strStatus = "正在向主机发送请求。"
          Case icRequestSent
                  strStatus = "发送请求已成功。"
          Case icReceivingResponse
                  strStatus = "正在接收主机的响应。"
          Case icResponseReceived
                  strStatus = "已成功地接收到主机的响应。"
                  'MsgBox   Inet.GetChunk(1024)
          Case icDisconnecting
                  strStatus = "正在解除与主机的连接。"
          Case icDisconnected
                  strStatus = "已成功地与主机解除了连接。"
          Case icError
                  strStatus = "与主机通讯时出现了错误。"
                  MsgBox strStatus, vbInformation, "人工增雨天气报编报软件"
                  'cmdDownLoad.Enabled = True
                  cmdUpload.Enabled = True
          Case Else
                  
    End Select    List1.AddItem State & " : " & strStatus  '在list1中显示状态编号及意义。
End Sub

Answer 1

为什么要用 inet ？用Winsock吧
inet我没什么研究过的哦~我猜测可能是这样.
会不会是你的那个执行页面里面嵌入了别的页面，导致要同时下载多个页面，所以会触发多次事件？以上纯属猜测

Answer 2

没有研究过正在找这方面的资料 ，友情帮你顶下我也想用这个控件把本地的数据库的数据插入到服务器上的数据库中本地和服务器（有固定IP）的数据库（SQL2000）都是一样的数据库文件，不知道用inet是否可行？

Answer 3

现阶段正在使用摸索这个控件，用这个控件只需要在服务器上架一个FTP服务器即可，用winsock好像需要在服务器上另加一个监听程序，个人认为比较麻烦。状态重复出现只要文件正常传输可以不用太再意。个人看法，期待高人看法。

Answer 4

感谢 guyehanxinlei  的答复！状态重复显示的问题如何解决啊？？