本文主要是介绍asp源码demo下载:微信公众号支付企业付款到零钱功能asp源码下载案例,希望对大家解决编程问题提供一定的参考价值,需要的开发者们随着小编来一起学习吧!
最近接到一个开发需求,一个企业想用微信支付里面的,企业付款到零钱功能,利用此功能来给用会发红包,因为微信支付里的红包功能一次要付款1块钱,太多,所以他想利用此功能来发红包,这样红包金额可以低到每次3角钱,由于他原有系统是asp开发的,那我只能帮他用asp写一个:微信支付企业付款到零钱功能了,闲话不说,上代码:
total_fee = Trim(Request.form("total_fee"))Dim body,out_trade_no,attachbody = "微信企业付款(WxPay)"partner_trade_no = wxpay.GetDateTimeattach = "sdly"'商户自定义数据包.wxpay.setParameter "appid",""wxpay.setParameter "mch_id",""wxpay.setParameter "mchid",MCHIDwxpay.setParameter "mch_appid",APPIDwxpay.setParameter "partner_trade_no",partner_trade_nowxpay.setParameter "check_name","NO_CHECK"wxpay.setParameter "amount",(total_fee)*100wxpay.setParameter "spbill_create_ip","127.0.0.1"wxpay.setParameter "desc",body'wxpay.setParameter "openid",openidwxpay.setParameter "openid",wx_openidxml = wxpay.Get_company_pay()'wxpay.Die xmlresult = wxpay.Get_Xml_Text(xml,"//result_code")If result = "SUCCESS" Thenwxpay.Die "付款成功!"Elsewxpay.Die wxpay.Get_Xml_Text(xml,"//err_code_des")End IfEnd If
有需要asp企业付款到零钱代码的朋友,可以直接复制了
这篇关于asp源码demo下载:微信公众号支付企业付款到零钱功能asp源码下载案例的文章就介绍到这儿,希望我们推荐的文章对编程师们有所帮助!