以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]上传素材错误 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=136571) |
-- 作者:2474842866 -- 发布时间:2019/6/16 11:19:00 -- [求助]上传素材错误 上传素材时,总是报错: 代码如下: \'定义网址 Dim url As String = "https://api.weixin.qq.com/cgi-bin/media/upload?access_token={0}&type=image" Dim hc As new HttpClient(CExp(url,Functions.Execute("GetAccessToken"))) \'上传文件 hc.Files.Add("media","C:\\Users\\Administrator\\Documents\\图标库\\f46e5501e0a1e44b1ce373cc32b3ded2") \'从服务器获取图片素材,并存在表格内 Dim str As String = hc.GetData \'解析内容 Dim jo As JObject = JObject.parse(str) \'判断是否成功,成功写入素材库 If jo("errcode") Is Nothing Then Dim dr As DataRow = DataTables("Materials").AddNew() dr("Type") = "image" dr("Media") = jo("Media") dr("URL") = url dr("UpdateTime") = Date.now dr("FileName") = "f46e5501e0a1e44b1ce373cc32b3ded2.jpg" Else MessageBox.Show(jo.ToString()) End If 服务器正常开启,内部函数正常,请问什么地方没有考虑到? |
-- 作者:有点甜 -- 发布时间:2019/6/17 10:34:00 -- 1、你的图片文件没有后缀名?
hc.Files.Add("media","C:\\Users\\Administrator\\Documents\\图标库\\f46e5501e0a1e44b1ce373cc32b3ded2.ico")
2、在调试接口调试一下测试
|