C # IteropServices с C ++ DLL — работает в Excel?

У меня есть C ++ dll, который я пытаюсь заставить работать в своем проекте C # (я ничего не знаю о C ++ / C, но у меня есть исходный код, и я могу открыть и собрать его в VS2013)

DLL поставляется с рабочими примерами в Excel VBA, но я не могу заставить его работать в C #.

Ошибка, с которой я продолжаю сталкиваться …

Дополнительная информация: вызов функции PInvoke
‘RMTest! RMTest.PInvokeTest :: encode_eib_d’ разбалансировал стек.
Это вероятно потому, что подпись управляемого PInvoke не совпадает
неуправляемый

Мой код теста C # выглядит следующим образом …

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Runtime.InteropServices;

namespace RMTest
{
class Program
{
static void Main(string[] args)
{
string s1 = "2";
string s2 = "1";
string s3 = "1";
string s4 = "1";
string s5 = "TESTTE";

var res = PInvokeTest.encode_eib_d(s1, s2, s3, s4, s5);
}
}

class PInvokeTest
{
[DllImport("UKRM_EncodeEIB_D.dll", CallingConvention = CallingConvention.StdCall, CharSet = CharSet.Ansi)]
public static extern string encode_eib_d(string infoID, string versionID, string format, string sClass, string licNum);
}
}

Для справки, рабочий пример в Excel, VBA выглядит следующим образом …

Public Declare _
Function encode_eib_d Lib "UKRM_EncodeEIB_D.dll" (ByVal inInfoID As String, ByVal inVersionID As String, ByVal inClass As String, _
ByVal inFormat As String, ByVal inLicenseNum As String) As Variant

Function ENCODE_D(inInfoID As String, inVersionID As String, inFormat As String, inClass As String, inLicenseNum As String) As Variant
Dim error As Integer

ChDrive (ActivePath())
ChDir (ActivePath())

On Error GoTo ErrHandler:
ENCODE_D = encode_eib_d(inInfoID, inVersionID, inFormat, inClass, inLicenseNum)

ErrHandler:
If Err.Number <> 0 Then
ENCODE_D = Err.Description
End IfEnd Function

Соответствующий фрагмент кода в dll C ++ (насколько я могу судить) выглядит следующим образом …

Заголовок (.h):

#include "UKRM_EncodeEIB_D.h"#include <WTypes.h>
#include <tchar.h>
#include <comutil.h>
#include <malloc.h>
#include <atlconv.h>

extern "C" {
VARIANT __stdcall CallEncode(LPCSTR sInfoID, LPCSTR sVersionId, LPCSTR sFormat, LPCSTR sClass, LPCSTR sLicenseNum);
}

.CPP

#include "UKRM_EncodeEIB_D_DLL.h"

// ******************************************************************************
// * CallEncode
// ******************************************************************************
///
/// @brief Use of UKRM_Encode_EIB_D to provide DLL interface
///
/// @param [in]       sInfoID        barcode info ID
/// @param [in]       sVersionId     barcode version id
/// @param [in]       sFormat        barcode format
/// @param [in]       sClass         barcode class ID
/// @param [in]       sLicenseNum    barcode license number
///
/// @return @arg returns barcode if successful, otherwise returns error
///
/// @LM_Detailed_Description
/// Creates UKRM_Encode_EIB_D object, supplies input and returns result
//
// ******************************************************************************

VARIANT __stdcall CallEncode(LPCSTR sInfoID, LPCSTR sVersionId, LPCSTR sFormat, LPCSTR sClass, LPCSTR sLicenseNum)
{
bool bRC;
class UKRM_Encode_EIB_D stEncodeObject;
char *srtnstring = NULL;

bRC = stEncodeObject.encode((char *) sInfoID, (char *) sVersionId, (char *) sFormat, (char *) sClass, (char *) sLicenseNum);

if(bRC == true)
{
stEncodeObject.get_BarcodeString(&srtnstring);
}
else
{
stEncodeObject.get_ErrorString(&srtnstring);
}

_bstr_t bstrt(srtnstring);

return _variant_t(bstrt).Detach();
}

.Def:

LIBRARY "UKRM_EncodeEIB_D"EXPORTS
encode_eib_d = CallEncode
VERSION 1.0

Я пробовал различные комбинации MarshalAs и т. Д. На входных параметрах, а также пробовал StringBuilders вместо строк, но звучит так, как будто он недоволен сигнатурой метода от одного к другому.

Настолько расстраивает, что работает в VBA.

Если вам нужна дополнительная информация, пожалуйста, спросите.

Благодарю.

1

Решение

В вашем случае вам понадобится подпись pinvoke, например:

[DllImport("UKRM_EncodeEIB_D.dll", CallingConvention = CallingConvention.StdCall)]
[return: MarshalAs(UnmanagedType.BStr)]
public static extern string encode_eib_d(
[MarshalAs(UnmanagedType.LPStr)]string infoID,
[MarshalAs(UnmanagedType.LPStr)]string versionID,
[MarshalAs(UnmanagedType.LPStr)]string format,
[MarshalAs(UnmanagedType.LPStr)]string sClass,
[MarshalAs(UnmanagedType.LPStr)]string licNum);
0

Другие решения


По вопросам рекламы [email protected]