关于上传pdf文件到微信小程序的云存储里面 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

老师好

工作中在做小程序开发需要我们网站的pdf文件传到小程序的云存储空间里面。

遇到的问题是调用上传接口第一步成功了应该是在进行第二步才能在云存储空间中显示但是第二步现在搞不定了所以请教老师

调用微信接口文件链接如下:

https://developers.weixin.qq.com/miniprogram/dev/wxcloud/reference-http-api/storage/uploadFile.html

CSDN 博客参考文章通过python 实现的例子

https://blog.csdn.net/weixin_42776828/article/details/104581180

涉及到要将文件转成二进制这个有点搞不定了。

以下是我第一步调用的代码调用成功

Dim url As String = "https://api.weixin.qq.com/tcb/uploadfile?access_token={0}"

Dim txtInfo As WinForm.TextBox = e.Form.Controls("txtInfo")

Dim hc As New HttpClient(CExp(url, Functions.Execute("GetAccessToken")))

Dim jo As New JObject()

jo("env") = "rainkeji_e0jcd3239b6"

jo("path") = "D:/WorkStation/3232.pdf"

hc.Content = jo.ToString()

jo = JObject.Parse(hc.GetData)

参考上面第二个链接的意思还需要在请求一次才可以第二次请求的方式有点不会写了.涉及传两个参数和文件转换成二进制。

谢谢老师

老师好:

服务器返回的是远程服务器返回错误: (403) 已禁止。

是不是因为 hc.Files.Add("file","D:/WorkStation/3232.pdf") 传的不是本地文件的二进制数据啊

谢谢

用户获取到返回数据后，需拼装一个 HTTP POST 请求，其中 url 为返回包的 url 字段，Body 部分格式为 multipart/form-data，具体内容如下：

这个是报错截图

此主题相关图片如下：下载.png

已经解决了谢谢了老师

问题处在云存储路径前部不应该加 /

贴出来吧供大家参考谢谢老师

Dim url As String = "https://api.weixin.qq.com/tcb/uploadfile?access_token={0}"

Dim hc As New HttpClient(CExp(url, Functions.Execute("GetAccessToken")))

Dim jo As New JObject()

jo("env") = "rainkeji_e0jcd3239b6"

jo("path") = "PDF/32321.pdf"

hc.Content = jo.ToString()

jo = JObject.Parse(hc.GetData)

hc = New HttpClient(jo("url").ToString())

hc.FormData.Add("key","PDF/32321.pdf")

hc.FormData.Add("Signature",jo("authorization").ToString())

hc.FormData.Add("x-cos-security-token",jo("token").ToString())

hc.FormData.Add("x-cos-meta-fileid",jo("cos_file_id").ToString())

hc.Files.Add("file","D:\PDF\32321.pdf")

主题：关于上传pdf文件到微信小程序的云存储里面