Dim hc As New HttpClient("https://www.baidu.com/img/abc.jpg")
hc.SkipError = True
If hc.GetFile("c:\data\123.png") Then
MessageBox.show("文件下载成功","提示")
Else
If hc.StatusCode = 0 Then
MessageBox.show("无法连接到服务器!")
ElseIf hc.StatusCode = 404 Then
MessageBox.show("要访问的资源不存在!")
Else
MessageBox.show("文件下载失败，StatuCode:" & hc.StatusCode,"提示!")
End If
End If
HttpClient 的全部 GetXXXX 方法，都可以参考上述示例代码使用。
请问当hc.getdata()时，如何代替使用这个判断： If hc.GetFile("c:\data\123.png") Then ?
此时需要赋值的，如Dim ab = hc.getdata()
加好友 
发短信
Post By：2021/5/12 10:09:00 [显示全部帖子]
