精易论坛

标题: 那个大佬帮忙翻译下C++这个代码, 写成火山 [打印本页]

作者: yuangao    时间: 2023-9-17 17:42
标题: 那个大佬帮忙翻译下C++这个代码, 写成火山
void __fastcall GetLanAdapterName()
{   HANDLE   hMprConfig;
    DWORD   dwRet=0;
    CString   strInfo,strTmp;
    PIP_INTERFACE_INFO   plfTable=NULL;
    IP_ADAPTER_INDEX_MAP   AdaptMap;
    DWORD   dwBufferSize=0;
    WCHAR   szFriendName[256];
    DWORD   tchSize=sizeof(WCHAR)*256;
    ZeroMemory(&szFriendName,tchSize);

    dwRet=MprConfigServerConnect   (NULL,&hMprConfig);
    dwRet=GetInterfaceInfo(NULL,&dwBufferSize);

    if(dwRet == ERROR_INSUFFICIENT_BUFFER)
    {
        plfTable=(PIP_INTERFACE_INFO)HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,dwBufferSize);
        GetInterfaceInfo(plfTable,&dwBufferSize);
    }
    strInfo.Empty();
    for(UINT   i=0;i<plfTable->NumAdapters;i++)
    {
        AdaptMap=plfTable->Adapter[i];
        dwRet=MprConfigGetFriendlyName(hMprConfig,AdaptMap.Name,(PWCHAR)szFriendName,tchSize);


        char szName[256];
        memset( szName, 0, 256 );
        int nLen = WideCharToMultiByte( CP_ACP,NULL, szFriendName,-1,NULL,0,NULL,FALSE );
        WideCharToMultiByte (CP_ACP,NULL,szFriendName,-1,szName,nLen,NULL,FALSE);
        strTmp.Format(_T("Index:%u\nName:%s\n"),AdaptMap.Index,szName);   //szName即为网络连接的名称
        strInfo+=strTmp;
    }

    HeapFree(GetProcessHeap(),HEAP_ZERO_MEMORY,plfTable);
}


作者: 大司命    时间: 2023-9-17 17:42

直接用嵌入的方式粘贴到火山里即可!编码转换的那部分不需要~
作者: yuangao    时间: 2023-9-17 17:45
大司命 发表于 2023-9-17 17:44
直接用嵌入的方式粘贴到火山里即可!编码转换的那部分不需要~

实属看不懂,C++哦,大佬..易语言都菜..
作者: yuangao    时间: 2023-9-17 17:48
大司命 发表于 2023-9-17 17:44
直接用嵌入的方式粘贴到火山里即可!编码转换的那部分不需要~

能帮忙写个列子吗
作者: 大司命    时间: 2023-9-17 18:04
[C++] 纯文本查看 复制代码
<火山程序 类型 = "通常" 版本 = 1 />

方法 GetLanAdapterName <公开 静态 @禁止流程检查 = 真 @视窗.外部头文件 = "<IPExport.h>\r\n<iphlpapi.h>\r\n<Mprapi.h>"
        @视窗.外部库 = "iphlpapi.lib\r\nMprapi.lib">
{
    @ HANDLE   hMprConfig;
    @ DWORD   dwRet = 0;
    @ CVolString   strInfo, strTmp;
    @ PIP_INTERFACE_INFO   plfTable = NULL;
    @ IP_ADAPTER_INDEX_MAP   AdaptMap;
    @ DWORD   dwBufferSize = 0;
    @ WCHAR   szFriendName[256];
    @ DWORD   tchSize = sizeof(WCHAR) * 256;
    @ ZeroMemory(&szFriendName, tchSize);
    @
    @ dwRet = MprConfigServerConnect(NULL, &hMprConfig);
    @ dwRet = GetInterfaceInfo(NULL, &dwBufferSize);
    @
    @ if (dwRet == ERROR_INSUFFICIENT_BUFFER)
    @ {
    @     plfTable = (PIP_INTERFACE_INFO)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, dwBufferSize);
    @     GetInterfaceInfo(plfTable, &dwBufferSize);
    @ }
    @ strInfo.Empty();
    @ for (UINT i = 0; i < plfTable->NumAdapters; i++)
    @ {
    @     AdaptMap = plfTable->Adapter[i ];
    @     dwRet = MprConfigGetFriendlyName(hMprConfig, AdaptMap.Name, (PWCHAR)szFriendName, tchSize);
    @     _DEBUG_STATMENT (DebugTrace (FALSE, 0, 0, _T ("n"), AdaptMap.Index));
    @     _DEBUG_STATMENT (DebugTrace (FALSE, 0, 0, _T ("S"), szFriendName));
    @     strInfo += strTmp;
    @ }
    @
    @ HeapFree(GetProcessHeap(), HEAP_ZERO_MEMORY, plfTable);
}



作者: yuangao    时间: 2023-9-17 21:26
大司命 发表于 2023-9-17 18:04
[mw_shl_code=cpp,true]

方法 GetLanAdapterName

大佬返回, 整数嘛
作者: yuangao    时间: 2023-9-17 21:37
<火山程序 类型 = "通常" 版本 = 1 />

方法 GetLanAdapterName <公开 静态 类型 = 整数 @禁止流程检查 = 真
        @视窗.外部头文件 = "<IPExport.h>\r\n<iphlpapi.h>\r\n<Mprapi.h>" @视窗.外部库 = "iphlpapi.lib\r\nMprapi.lib">
{
    @ HANDLE   hMprConfig;
    @ DWORD   dwRet = 0;
    @ CVolString   strInfo, strTmp;
    @ PIP_INTERFACE_INFO   plfTable = NULL;
    @ IP_ADAPTER_INDEX_MAP   AdaptMap;
    @ DWORD   dwBufferSize = 0;
    @ WCHAR   szFriendName[256];
    @ DWORD   tchSize = sizeof(WCHAR) * 256;
    @ ZeroMemory(&szFriendName, tchSize);
    @
    @ dwRet = MprConfigServerConnect(NULL, &hMprConfig);
    @ dwRet = GetInterfaceInfo(NULL, &dwBufferSize);
    @
    @ if (dwRet == ERROR_INSUFFICIENT_BUFFER)
    @ {
    @     plfTable = (PIP_INTERFACE_INFO)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, dwBufferSize);
    @     GetInterfaceInfo(plfTable, &dwBufferSize);
    @ }
    @ strInfo.Empty();
    @ for (UINT i = 0; i < plfTable->NumAdapters; i++)
    @ {
    @     AdaptMap = plfTable->Adapter[i ];
    @     dwRet = MprConfigGetFriendlyName(hMprConfig, AdaptMap.Name, (PWCHAR)szFriendName, tchSize);
    @     _DEBUG_STATMENT (DebugTrace (FALSE, 0, 0, _T ("n"), AdaptMap.Index));
    @     _DEBUG_STATMENT (DebugTrace (FALSE, 0, 0, _T ("S"), szFriendName));
    @     strInfo += strTmp;
    @ }
    @
    @ HeapFree(GetProcessHeap(), HEAP_ZERO_MEMORY, plfTable);
    @ return AdaptMap.Index;


}

作者: yuangao    时间: 2023-9-17 21:40
大司命 发表于 2023-9-17 18:04
[mw_shl_code=cpp,true]

方法 GetLanAdapterName

是这样吗? 大佬..  


<火山程序 类型 = "通常" 版本 = 1 />

方法 GetLanAdapterName <公开 静态 类型 = 整数 @禁止流程检查 = 真
        @视窗.外部头文件 = "<IPExport.h>\r\n<iphlpapi.h>\r\n<Mprapi.h>" @视窗.外部库 = "iphlpapi.lib\r\nMprapi.lib">
{
    @ HANDLE   hMprConfig;
    @ DWORD   dwRet = 0;
    @ CVolString   strInfo, strTmp;
    @ PIP_INTERFACE_INFO   plfTable = NULL;
    @ IP_ADAPTER_INDEX_MAP   AdaptMap;
    @ DWORD   dwBufferSize = 0;
    @ WCHAR   szFriendName[256];
    @ DWORD   tchSize = sizeof(WCHAR) * 256;
    @ ZeroMemory(&szFriendName, tchSize);
    @
    @ dwRet = MprConfigServerConnect(NULL, &hMprConfig);
    @ dwRet = GetInterfaceInfo(NULL, &dwBufferSize);
    @
    @ if (dwRet == ERROR_INSUFFICIENT_BUFFER)
    @ {
    @     plfTable = (PIP_INTERFACE_INFO)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, dwBufferSize);
    @     GetInterfaceInfo(plfTable, &dwBufferSize);
    @ }
    @ strInfo.Empty();
    @ for (UINT i = 0; i < plfTable->NumAdapters; i++)
    @ {
    @     AdaptMap = plfTable->Adapter[i ];
    @     dwRet = MprConfigGetFriendlyName(hMprConfig, AdaptMap.Name, (PWCHAR)szFriendName, tchSize);
    @     _DEBUG_STATMENT (DebugTrace (FALSE, 0, 0, _T ("n"), AdaptMap.Index));
    @     _DEBUG_STATMENT (DebugTrace (FALSE, 0, 0, _T ("S"), szFriendName));
    @     strInfo += strTmp;
    @ }
    @
    @ HeapFree(GetProcessHeap(), HEAP_ZERO_MEMORY, plfTable);
    @ return AdaptMap.Index;
}

作者: yuangao    时间: 2023-9-17 21:46
大司命 发表于 2023-9-17 18:04
[mw_shl_code=cpp,true]

方法 GetLanAdapterName

运行了,   返回

11
本地连接
13
VMware Network Adapter VMnet1

补充内容 (2023-9-17 21:47):
11
本地连接
13
VMware Network Adapter VMnet1


数字是什么呢
作者: 大司命    时间: 2023-9-17 21:49
[C++] 纯文本查看 复制代码
<火山程序 类型 = "通常" 版本 = 1 />

方法 GetLanAdapterName <公开 静态 类型 = 整数 @禁止流程检查 = 真
        @视窗.外部头文件 = "<IPExport.h>\r\n<iphlpapi.h>\r\n<Mprapi.h>" @视窗.外部库 = "iphlpapi.lib\r\nMprapi.lib">
{
    @ HANDLE   hMprConfig;
    @ DWORD   dwRet = 0;
    @ CVolString   strInfo, strTmp;
    @ PIP_INTERFACE_INFO   plfTable = NULL;
    @ IP_ADAPTER_INDEX_MAP   AdaptMap;
    @ DWORD   dwBufferSize = 0;
    @ WCHAR   szFriendName[256];
    @ DWORD   tchSize = sizeof(WCHAR) * 256;
    @ ZeroMemory(&szFriendName, tchSize);
    @
    @ dwRet = MprConfigServerConnect(NULL, &hMprConfig);
    @ dwRet = GetInterfaceInfo(NULL, &dwBufferSize);
    @
    @ if (dwRet == ERROR_INSUFFICIENT_BUFFER)
    @ {
    @     plfTable = (PIP_INTERFACE_INFO)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, dwBufferSize);
    @     GetInterfaceInfo(plfTable, &dwBufferSize);
    @ }
    @ strInfo.Empty();
    @ UINT i = 0;
    @ for (; i < plfTable->NumAdapters; i++)
    @ {
    @     AdaptMap = plfTable->Adapter[i ];
    @     dwRet = MprConfigGetFriendlyName(hMprConfig, AdaptMap.Name, (PWCHAR)szFriendName, tchSize);
    // @     _DEBUG_STATMENT (DebugTrace (FALSE, 0, 0, _T ("n"), AdaptMap.Index));
    // @     _DEBUG_STATMENT (DebugTrace (FALSE, 0, 0, _T ("S"), szFriendName));
    @     strInfo += strTmp;
    @ }
    @
    @ HeapFree(GetProcessHeap(), HEAP_ZERO_MEMORY, plfTable);
    @ return i;
}


好像错了!鉴于不懂的情况,我还是整个粘贴吧,省得还要解释~


作者: yuangao    时间: 2023-9-17 21:50
大司命 发表于 2023-9-17 21:49
[mw_shl_code=cpp,true]

方法 GetLanAdapterName

这个是出现3,  是指网卡数量吧.

补充内容 (2023-9-17 21:52):
只返回了一个数字3,
作者: 大司命    时间: 2023-9-17 22:03


你这里的意思是要返回还是问我要不要返回!?如果是你要返回那就没错,如果是问我要不要返回,那肯定不需要啊!我都说是嵌入你原来代码上的!

作者: yuangao    时间: 2023-9-17 22:07
大司命 发表于 2023-9-17 22:03
你这里的意思是要返回还是问我要不要返回!?如果是你要返回那就没错,如果是问我要不要返回,那肯定不需 ...

这个和精易的,  系统_取网卡信息 (网卡信息)  好像是一样是吧,  目的是取出网卡连接名称
作者: yuangao    时间: 2023-9-17 22:17
大司命 发表于 2023-9-17 22:03
你这里的意思是要返回还是问我要不要返回!?如果是你要返回那就没错,如果是问我要不要返回,那肯定不需 ...

算了,  这个是完全不懂意思.. 你也遭罪.. 谢谢吧.
作者: yuangao    时间: 2023-9-17 22:36
大司命 发表于 2023-9-17 22:03
你这里的意思是要返回还是问我要不要返回!?如果是你要返回那就没错,如果是问我要不要返回,那肯定不需 ...

这个代码是数组的意思是吗?  相当于再循环取出是吗,




欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4