Internet transfer 控件问题,在线结贴
将Internet transfer 控件用在FTP上,有下面一段代码,请教各位大侠,这里面的Inte1.ResponseCode = 80 应该怎样理解.
Private Sub Inet1_StateChanged(ByVal State As Integer)
Dim myStrAllText As String
Dim myStrLine As String
Select Case State
Case icError
If Inte1.ResponseCode = 80 Then
MsgBox "输入的文件不存在,请重新输入"
Else '其他情况下,显示文件传输错误信息
MsgBox Inte1.ResponseInfo, , "文件传输错误"
End If
Case
...
End Select
End Sub