已解决微信支付V3 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 已解决微信支付V3

共有6192人关注过本帖树形打印复制链接主题：已解决微信支付V3

tianhao0817

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：122 积分：1290 威望：0 精华：0 注册：2020/5/16 10:30:00

已解决微信支付V3 发帖心情

Post By：2022/12/1 15:17:00 [显示全部帖子]

麻烦老师看一下为什么这个代码执行了要报错，获取不到prepay_id

开发文档地址：https://pay.weixin.qq.com/wiki/doc/apiv3/apis/chapter3_1_1.shtml

Dim jo As New JObject

jo("mchid") = 1488726918

jo("out_trade_no") = Rand.NextString(32)

jo("appid") = "wxa7154bc4751eddet"

jo("description") = "aabbcccceee"

jo("notify_url") = "http://5174p4o694.wicp.vip/wx_notifyurl.htm"

jo("amount") = New JObject

jo("amount")("total") = 1

jo("amount")("currency") = "CNY"

jo("payer") = New JObject

jo("payer")("openid") = "ofRouwuQCfP7X1CsOo9-a93Ozdrw"

Dim URL As String = "https://api.mch.weixin.qq.com/v3/pay/transactions/jsapi"

Dim hc As New HttpClient(URL)

hc.Content = jo.ToString()

jo = JObject.Parse(hc.GetData())

MessageBox.Show(jo.ToString)

[此贴子已经被作者于2022/12/16 16:46:21编辑过]

tianhao0817

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：122 积分：1290 威望：0 精华：0 注册：2020/5/16 10:30:00

Post By：2022/12/1 15:30:00 [显示全部帖子]

{

"mchid": 1488726918,

"out_trade_no": "b49aa50622f24b2abd6a8c0064df7449",

"appid": "wxa7154bc4751eddex",

"description": "aabbcccceee",

"notify_url": "http://5174p4o694.wicp.vip/wx_notifyurl.htm",

"amount": {

"total": 1,

"currency": "CNY"

"payer": {

"openid": "ofRouwl_aRCGFTkhxeVECkQmzd8g"

}

提交的是这串，不会有错的啊

[此贴子已经被作者于2022/12/16 16:45:50编辑过]

tianhao0817

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：122 积分：1290 威望：0 精华：0 注册：2020/5/16 10:30:00

Post By：2022/12/16 16:42:00 [显示全部帖子]

谢谢老师，已搞定微信支付V3了

下一主题 >> << 上一主题

主题：已解决微信支付V3