一条语句完成微信、支付宝支付，生成支付二维码

付款码支付动态库PayApiFun.dll说明

      PayApiFun.dll这个动态库中包含了微信付款码支付函数、生成二维码扫码支付函数、微信支付订单查询函数、关闭微信支付订单函数、支付宝条码支付函数、生成二维码扫码支付函数、支付宝订单查询函数、撒销支付宝支付订单函数，只需一条语句就可以完成微信、支付宝扫码支付功能，一条语句可以返回支付订单的支付结果。

                

函数名：WeiXinPayCodeEx1

功能	微信付款码 支付功能，需输入加密后的微信公众号、商户号、Key、Key是否加密、唯一的订单编号、支付金额、微信付款码就可以实现微信支付。
函数原型	function WeiXinPayCodeEx1(inappid:Pchar;inmchid:Pchar;inIdkey:Pchar;KeyLOck:Integer;inAuthCode:Pchar ;inNum:Pchar; inTotalFee:Pchar;var ReturnXmlInf:Pchar):integer;stdcall;
输入	inappid           加密后的微信公众号，Pchar。 inmchid          加密后的微信商户号，Pchar。 inIdkey           KEY，Pchar。 KeyLOck        KEY是否加密， Integer 1为加密，0为不加密。 inAuthCode   18位的微信付款码，Pchar。 inNum            微信公众号内的唯一订单号，Pchar。 inTotalFee      以分为单位的支付金额，Pchar。 ReturnXmlInf  函数调用后，API接口返回的状态信息，Pchar。
返回	返回integer数值，0表示支付成功，1表示正在支付中，其他表示支付失败，并将支付结果的文字描述放在* ReturnXmlInf  指向缓冲。

函数名：WeiXinPayQRCodeEx1

功能	微信扫码支付，生成支付二维码，需输入加密后的微信公众号、商户号、Key、Key是否加密、唯一的订单编号、支付金额 就可以生成支付二维码。
函数原型	function WeiXinPayQRCodeEx1(inappid:Pchar;inmchid:Pchar;inIdkey:Pchar;KeyLOck:Integer;inNum:Pchar; inTotalFee:Pchar;var ReturnXmlInf:Pchar):integer;stdcall;
输入	inappid           加密后的微信公众号，Pchar。 inmchid          加密后的微信商户号，Pchar。 inIdkey           KEY，Pchar。 KeyLOck        KEY是否加密， Integer 1为加密，0为不加密。 inNum            微信公众号内的唯一订单号，Pchar。 inTotalFee      以分为单位的支付金额，Pchar。 ReturnXmlInf  函数调用后，API接口返回的状态信息，Pchar。
返回	返回integer数值，0表示申请支付网址成功并已生成二维码图片文件，并将支付网址放在* ReturnXmlInf  指向缓冲。

函数名：WeiXinQueryEx1

功能	微信支付订单支付结果查询。需输入加密后的微信公众号、商户号、Key、Key是否加密、唯一的订单编号就可以查询订单的支付结果。
函数原型	function WeiXinQueryEx1(inappid:Pchar;inmchid:Pchar;inIdkey:Pchar;KeyLOck:Integer;inNum:Pchar;var ReturnXmlInf:Pchar):integer;stdcall;
输入	inappid           加密后的微信公众号，Pchar。 inmchid          加密后的微信商户号，Pchar。 inIdkey           KEY，Pchar。 KeyLOck        KEY是否加密， Integer 1为加密，0为不加密。 inNum            微信公众号内的唯一订单号，Pchar。 ReturnXmlInf  函数调用后，API接口返回的状态信息，Pchar。
返回	返回integer数值，0表示支付成功，其他表示支付失败，并将支付结果的文字描述放在* ReturnXmlInf  指向缓冲。

 

函数名：ZhiFuBaoPayCodeEx1

功能	支付宝付款码 支付功能，需输入加密后的支付宝合作者PID、唯一的订单编号、支付金额、支付宝付款码就可以实现支付宝支付。
函数原型	function ZhiFuBaoPayCodeEx1(inappid:Pchar;inAuthCode:Pchar ;inNum:Pchar; inTotalFee:Pchar;var ReturnXmlInf:Pchar):integer;stdcall;
输入	inappid           加密后的支付宝合作者APPID，Pchar。 inAuthCode   支付宝付款码，Pchar。 inNum             商户唯一订单号，Pchar。 inTotalFee       以元为单位的支付金额，Pchar。 ReturnXmlInf  函数调用后，API接口返回的状态信息，Pchar。
返回	返回integer数值，0表示支付成功，1表示正在支付中，其他表示支付失败，并将支付结果的文字描述放在* ReturnXmlInf  指向缓冲。

注意事项：支付宝签名密钥文件rsa_private_key.pem必须放在相同目录才能正确签名。

函数名：ZhiFuBaoPayQRCodeEx1

功能	支付宝扫码支付，生成支付二维码，需输入加密后的支付宝合作者PID、唯一的订单编号、支付金额、支付宝付款码就可以实现支付宝支付。
函数原型	function ZhiFuBaoPayQRCodeEx1(inappid:Pchar;inNum:Pchar;inTotalFee:Pchar;var ReturnXmlInf:Pchar):integer;stdcall;
输入	inappid           加密后的支付宝合作者APPID，Pchar。 inNum             商户唯一订单号，Pchar。 inTotalFee       以元为单位的支付金额，Pchar。 ReturnXmlInf  函数调用后，API接口返回的状态信息，Pchar。
返回	返回integer数值，0表示申请二维码成功，二维码图片保存在当前目录下，1表示正在支付中，其他表示支付失败，并将支付结果的文字描述放在* ReturnXmlInf  指向缓冲。

注意事项：支付宝签名密钥文件rsa_private_key.pem必须放在相同目录才能正确签名。

函数名：ZhiFuBaoQueryEx1

功能	支付宝支付订单支付结果查询。需输入加密后的支付宝合作者PID、商户唯一的订单编号就可以查询订单的支付结果。
函数原型	function ZhiFuBaoQueryEx1(inappid:Pchar;inNum:Pchar;var ReturnXmlInf:Pchar):integer;stdcall;
输入	inappid           加密后的支付宝合作者APPID，Pchar。 inNum             商户唯一订单号，Pchar。 ReturnXmlInf  函数调用后，API接口返回的状态信息，Pchar。
返回	返回integer数值，0表示支付成功，其他表示支付失败，并将支付结果的文字描述放在* ReturnXmlInf  指向缓冲。

注意事项：支付宝签名密钥文件rsa_private_key.pem必须放在相同目录才能正确签名。

Vb6函数声明：

Private Declare Function WeiXinPayCodeEx1 Lib "PayApiFun.dll" (ByVal Lockappid As String, ByVal Lockmchid As String, ByVal Idkey As String, ByVal IdkeyLock As Integer, ByVal AuthCode As String, ByVal OrdNum As String, ByVal TotalFee As String, ByRef outinf As Any) As Integer

Private Declare Function WeiXinPayQRCodeEx1 Lib "PayApiFun.dll" (ByVal Lockappid As String, ByVal Lockmchid As String, ByVal Idkey As String, ByVal IdkeyLock As Integer, ByVal OrdNum As String, ByVal TotalFee As String, ByRef outinf As Any) As Integer

Private Declare Function WeiXinQueryEx1 Lib "PayApiFun.dll" (ByVal Lockappid As String, ByVal Lockmchid As String, ByVal Idkey As String, ByVal IdkeyLock As Integer, ByVal OrdNum As String, ByRef outinf As Any) As Integer

Private Declare Function ZhiFuBaoPayCodeEx1 Lib "PayApiFun.dll" (ByVal Lockappid As String, ByVal AuthCode As String, ByVal OrdNum As String, ByVal TotalFee As String, ByRef outinf As Any) As Integer

Private Declare Function ZhiFuBaoPayQRCodeEx1 Lib "PayApiFun.dll" (ByVal Lockappid As String, ByVal OrdNum As String, ByVal TotalFee As String, ByRef outinf As Any) As Integer

Private Declare Function ZhiFuBaoQueryEx1 Lib "PayApiFun.dll" (ByVal Lockappid As String, ByVal OrdNum As String, ByRef outinf As Any) As Integer

 

VFP函数声明：

declare integer WeiXinPayCodeEx1 in PayApiFun.dll string Lockappid,string Lockmchid,string Idkey,integer Idkeylock,string AuthCode,string OrdNum,string TotalFee,integer @ outinf

Declare integer WeiXinPayQRCodeEx1 in PayApiFun.dll string Lockappid,String Lockmchid,String Idkey,integer Idkeylock,String OrdNum,String TotalFee,integer @ outinf

declare integer WeiXinQueryEx1 in PayApiFun.dll string Lockappid,string Lockmchid,string Idkey,integer Idkeylock, string OrdNum,integer @ outinf

Declare integer ZhiFuBaoPayCodeEx1 in PayApiFun.dll String Lockappid ,String AuthCode,String OrdNum,String TotalFee,integer @ outinf

Declare integer ZhiFuBaoPayQRCodeEx1 in PayApiFun.dll String Lockappid,String OrdNum ,String TotalFee,integer @ outinf

Declare integer ZhiFuBaoQueryEx1 in PayApiFun.dll String Lockappid,String OrdNum,integer @ outinf

 

Delphi函数声明：

function WeiXinQueryEx1(inappid:Pchar;inmchid:Pchar;inIdkey:Pchar;IdkeyLock:Integer;inNum:Pchar;var ReturnXmlInf:Pchar):integer;stdcall external 'PayApiFun.dll';

function WeiXinPayQRCodeEx1(inappid:Pchar;inmchid:Pchar;inIdkey:Pchar;IdkeyLock:Integer;inNum:Pchar; inTotalFee:Pchar;var ReturnXmlInf:Pchar):integer;stdcall external 'PayApiFun.dll';

function WeiXinPayCodeEx1(inappid:Pchar;inmchid:Pchar;inIdkey:Pchar;IdkeyLock:Integer;inAuthCode:Pchar ;inNum:Pchar; inTotalFee:Pchar;var ReturnXmlInf:Pchar):integer;stdcall external 'PayApiFun.dll';

function ZhiFuBaoPayCodeEx1(inappid:Pchar;inAuthCode:Pchar ;inNum:Pchar; inTotalFee:Pchar;var ReturnXmlInf:Pchar):integer;stdcall  external 'PayApiFun.dll';

function ZhiFuBaoPayQRCodeEx1(inappid:Pchar;inNum:Pchar;inTotalFee:Pchar;var ReturnXmlInf:Pchar):integer;stdcall external 'PayApiFun.dll';

function ZhiFuBaoQueryEx1(inappid:Pchar;inNum:Pchar;var ReturnXmlInf:Pchar):integer;stdcall external 'PayApiFun.dll';

 

C#函数声明：

[DllImport("PayApiFun.dll", EntryPoint = "WeiXinPayCodeEx1", CharSet = CharSet.Ansi, CallingConvention = CallingConvention.StdCall)]
static extern int WeiXinPayCodeEx1(string Lockappid,string Lockmchid,string Idkey,int IdkeyLock,string AuthCode,string OrdNum,string TotalFee,  ref IntPtr outputstr);

[DllImport("PayApiFun.dll", EntryPoint = "WeiXinPayQRCodeEx1", CharSet = CharSet.Ansi, CallingConvention = CallingConvention.StdCall)]
static extern int WeiXinPayQRCodeEx1(string Lockappid, string Lockmchid, string Idkey, int IdkeyLock,  string OrdNum, string TotalFee, ref IntPtr outputstr);

[DllImport("PayApiFun.dll", EntryPoint = "WeiXinQueryEx1", CharSet = CharSet.Ansi, CallingConvention = CallingConvention.StdCall)]
static extern int WeiXinQueryEx1(string Lockappid, string Lockmchid, string Idkey, int IdkeyLock, string OrdNum,  ref IntPtr outputstr);

[DllImport("PayApiFun.dll", EntryPoint = "ZhiFuBaoPayCodeEx1", CharSet = CharSet.Ansi, CallingConvention = CallingConvention.StdCall)]
static extern int ZhiFuBaoPayCodeEx1(string Lockappid,  string AuthCode, string OrdNum, string TotalFee, ref IntPtr outputstr);

[DllImport("PayApiFun.dll", EntryPoint = "ZhiFuBaoPayQRCodeEx1", CharSet = CharSet.Ansi, CallingConvention = CallingConvention.StdCall)]
static extern int ZhiFuBaoPayQRCodeEx1(string Lockappid,  string OrdNum, string TotalFee, ref IntPtr outputstr);

[DllImport("PayApiFun.dll", EntryPoint = "ZhiFuBaoQueryEx1", CharSet = CharSet.Ansi, CallingConvention = CallingConvention.StdCall)]
static extern int ZhiFuBaoQueryEx1(string Lockappid,  string OrdNum, ref IntPtr outputstr);   

[DllImport("PayApiFun.dll", EntryPoint = "PQRCodeEx", CharSet = CharSet.Ansi, CallingConvention = CallingConvention.StdCall)]
static extern int PQRCodeEx(string inputstr);

 

VB.Net函数声明：

Private Declare Function WeiXinPayCodeEx1 Lib "PayApiFun.dll" (ByVal Lockappid As String, ByVal Lockmchid As String, ByVal Idkey As String, ByVal IdkeyLock As Integer, ByVal AuthCode As String, ByVal OrdNum As String, ByVal TotalFee As String, ByRef outinf As IntPtr) As Integer

Private Declare Function WeiXinPayQRCodeEx1 Lib "PayApiFun.dll" (ByVal Lockappid As String, ByVal Lockmchid As String, ByVal Idkey As String, ByVal IdkeyLock As Integer, ByVal OrdNum As String, ByVal TotalFee As String, ByRef outinf As IntPtr) As Integer

Private Declare Function WeiXinQueryEx1 Lib "PayApiFun.dll" (ByVal Lockappid As String, ByVal Lockmchid As String, ByVal Idkey As String, ByVal IdkeyLock As Integer, ByVal OrdNum As String, ByRef outinf As IntPtr) As Integer

Private Declare Function ZhiFuBaoPayCodeEx1 Lib "PayApiFun.dll" (ByVal Lockappid As String, ByVal AuthCode As String, ByVal OrdNum As String, ByVal TotalFee As String, ByRef outinf As IntPtr) As Integer

Private Declare Function ZhiFuBaoPayQRCodeEx1 Lib "PayApiFun.dll" (ByVal Lockappid As String, ByVal OrdNum As String, ByVal TotalFee As String, ByRef outinf As IntPtr) As Integer

Private Declare Function ZhiFuBaoQueryEx1 Lib "PayApiFun.dll" (ByVal Lockappid As String, ByVal OrdNum As String, ByRef outinf As IntPtr) As Integer

Private Declare Function PQRCodeEx Lib "PayApiFun.dll" (ByVal QRCodeStr As String) As Integer