以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  hc.getdata判断结果  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=165269)
--  作者：lgzhao
--  发布时间：2021/5/12 10:09:00
--  hc.getdata判断结果
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()
--  作者：有点蓝
--  发布时间：2021/5/12 10:27:00
--  
Dim ab   = hc.getdata()

根据ab变量的值判断，比如
if ab ="xxx" then