一條語句完成微信、支付寶支付，生成支付二維碼

付款碼支付動態庫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