Dim fpsb_url As String = "https://aip.baidubce.com/rest/2.0/ocr/v1/vat_invoice?access_token={0}"
Dim data() As Byte = System.IO.File.ReadAllBytes("c:\2.png") '把文件字节流加载进来,
Dim d As String = Convert.ToBase64String(data)
Dim hc As New HttpClient(CExp(fpsb_url, AccessToken))
hc.ContentType = "application/x-www-form-urlencoded"
hc.FormData.Add("image",UrlEncode(d))
Dim zjo As JObject = JObject.Parse(hc.GetData()) '获取流程发起ID
[此贴子已经被作者于2024/8/16 9:53:27编辑过]
加好友 
发短信
Post By：2024/8/16 9:53:00 [显示全部帖子]
