| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- HttpClient 下载的图片 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=178596) |
| -- 作者：chenjiu6202 -- 发布时间：2022/7/11 16:30:00 -- HttpClient 下载的图片 用HttpClient 下载的图片，有的用picture可以直接展示，而有的却是0字节，只有一个图片的名字 |
| -- 作者：chenjiu6202 -- 发布时间：2022/7/11 16:31:00 -- \'\'\'’------------------------本函数是用于固定资产获取图片文件的 \'\'\'\'___________1?传入第一个参数:需要访问的服务器地址 \'\'\'\'___________2、传入第二个参数：访问的文件名及其存放位置 Public Function getFiles(ByVal address As String,ByVal filePath As String,ByVal fileName As String)
Dim hc As New HttpClient(address)
hc.C
Dim jo As new JObject
jo("photo") = filePath
hc.Content = jo.ToString
Dim stb As String = ProjectPath & "picture\\" & fileName
Try
If hc.GetFile(stb) Then
Return stb
Else
Return "fail"
End If
Catch ex As Exception
\'Return ex.message
End try End Function
|
| -- 作者：有点蓝 -- 发布时间：2022/7/11 16:56:00 -- 有问题的每次都是同样的地址和图片？还是每次不同的地址？ 0字节的地址多试几次，是不是每次都0字节？
|
| -- 作者：chenjiu6202 -- 发布时间：2022/7/11 17:38:00 -- 谢谢，调试好了，中间加了一个message.box受了影响 |