我用VC写的DLL文件,在VB 中调用,其中有大部分函数都能正常执行,但是有一个函数怎么调用都不成功,
VC函数原型:int GetTaskInfo(CArray<PW_TaskInfo,PW_TaskInfo>* pstTaskInfoArray,CString strWhere)
VB中调用:
Private Declare Function GetTaskInfo Lib "Sqlce3_Driver.dll" Alias "?GetTaskInfo@@YAHPAV?$CArray@UPW_TaskInfo@@U1@@@V?$CStringT@_WV?$StrTraitMFC@_WV?$ChTraitsOS@_W@ATL@@@@@ATL@@@Z" (ByVal taskInfoArray() As structureReturn, ByVal strWhere As String) As IntPtr
提示的错误有2类 :
1。NotSupportedException
2。outofmemory
求救啊!在线等
VC函数原型:int GetTaskInfo(CArray<PW_TaskInfo,PW_TaskInfo>* pstTaskInfoArray,CString strWhere)
VB中调用:
Private Declare Function GetTaskInfo Lib "Sqlce3_Driver.dll" Alias "?GetTaskInfo@@YAHPAV?$CArray@UPW_TaskInfo@@U1@@@V?$CStringT@_WV?$StrTraitMFC@_WV?$ChTraitsOS@_W@ATL@@@@@ATL@@@Z" (ByVal taskInfoArray() As structureReturn, ByVal strWhere As String) As IntPtr
提示的错误有2类 :
1。NotSupportedException
2。outofmemory
求救啊!在线等
解决方案 »
- winsock做C/S系统 ,如何设置客户端的remotehost地址(即如果得到本机外网的地址)
- 如何根据扩展名获得 Icon 图象文件 ??
- GetBitmapBits获得图象信息问题(100分)
- 奇怪的问题,请进来帮忙。
- 大型成大熟erp大软件技术转让
- 连接远程数据库时长时间等待没反映怎么办???
- 一条多表嵌套查询SQL的写法?
- inet控件的使用。
- 求救:导出到EXCEL时如何设置列宽
- 请教高人:怎样读取Auto CAD中点选的点的坐标,并保存为 记事本 格式文件
- 如何用GetBitmapBits截取屏幕画面?以下代码哪里错在哪里?
- 请教:如何将这个XML文件导入SQL Server数据库中
int WINAPI GetTaskInfo(....)
目前就是卡在 :
我的VC 入口函数第一个函数是个CArray类型,目的是存储我的返回数组,数组元素是自定义的结构体。
每次调试提示:outofmemoryexecptioin,
怎么在VB中对应CArray,并且这个Arrary中的类型是结构体.
VC函数原型:int GetTaskInfo(CArray<PW_TaskInfo,PW_TaskInfo>* pstTaskInfoArray,CString strWhere),VB中应该怎么申明对应CArray<PW_TaskInfo,PW_TaskInfo>* pstTaskInfoArray,这个就是我需要的返回数组
VCDLL中的是:
typedef struct
{
WCHAR *TaskID;
WCHAR *TaskName;
WCHAR *TaskFlag;
WCHAR *TaskType;
WCHAR *ScoutType;
WCHAR *CreateDate;
WCHAR *StartDate;
WCHAR *EndDate;
WCHAR *Principal;
WCHAR *ScoutMan;
WCHAR *ScoutEmph;
WCHAR *PdaCode;
WCHAR *UsePdaCode;
WCHAR *TaskState;
WCHAR *ScanType;
WCHAR *DeptCode;
}PW_TaskInfo;
vb中的是:
Private Structure structureReturn
Dim TaskID As String
Dim TaskName As String
Dim TaskFlag As String
Dim TaskType As String
Dim ScoutType As String
Dim CreateDate As String
Dim StartDate As String
Dim EndDate As String
Dim Principal As String
Dim ScoutMan As String
Dim ScoutEmph As String
Dim PdaCode As String
Dim UsePdaCode As String
Dim TaskState As String
Dim ScanType As String
Dim WCDeptCode As String
End Structure