dll方法定义:
extern"C"__declspec(dllexport)BSTR __stdcall PayOrder(const char* parmStr);
传入:字符串
返回:字符串
pb调用声明示范:function string PayOrder (string jsonStr) library("EJOrderExchange.dll");c++调用示范
#include <iostream>
#include <Windows.h>
int main(){
typedef const char* (__stdcall *PayOrder)(const char*);
HINSTANCE hDllInst = LoadLibrary("XXX.dll");//修改dll位置
PayOrder pPayOrder = (PayOrder)GetProcAddress(hDllInst, "PayOrder");
std::string json = "{\"orderNo\":\"36524694546\",\"orderPrice\":\"100.00\",\"orderDate\":\"2019-03-21 15:24:32\",\"summary\":\"摘要\",\"orderDescription\":\"订单说明\",\"shopName\":\"门店名称\",\"payType\":\"1\"}";
const char* b = pPayOrder(json.c_str());
std::cout << b <<std::endl;
FreeLibrary(hDllInst);
return 0;
}
VB调用示范
Private Declare Function PayOrder Lib "xxx.dll" (ByVal dateStr As String) As String '修改dll位置
Private Sub Command1_Click()
Dim orderStr, result As String
orderStr = "{""orderNo"":""36524694546"",""orderPrice"":""100.00"",""orderDate"":""2019-03-21 15:24:32"",""summary"":""摘要"",""orderDescription"":""订单说明"",""shopName"":""门店名称"",""payType"":""1""}"
result = PayOrder(orderStr)
MsgBox result
End
End Sub