易语言判断配置项内容是否存在

调用 API GetAdaptersInfo 获取本机适配器信息
名称,IP地址,子网掩码,MAC地址

要加载库文件: Iphlpapi.lib

#define WIN32_LEAN_AND_MEAN

#include 
#include 
#include 
#include 
#include 
#include 
#include 
#include 
#include 

#define MALLOC(x) HeapAlloc(GetProcessHeap(), 0, (x))
#define FREE(x) HeapFree(GetProcessHeap(), 0, (x))

int GetAdapters(void);

int main()
{

 GetAdapters();
 getch();
}

int GetAdapters(void)
{
 PIP_ADAPTER_INFO pAdapterInfo;
 PIP_ADAPTER_INFO pAdapter = NULL;
 DWORD dwRetVal = 0;
 UINT i;
 char szbuffer[500];
 char szmacbuffer[10];

 char buffer[32];

 ULONG ulOutBufLen = sizeof(IP_ADAPTER_INFO);
 pAdapterInfo = (IP_ADAPTER_INFO *) MALLOC(sizeof (IP_ADAPTER_INFO));
 if (pAdapterInfo == NULL)
  {
   return 1;
  }

 if (GetAdaptersInfo(pAdapterInfo, &ulOutBufLen) == ERROR_BUFFER_OVERFLOW)
  {
   FREE(pAdapterInfo);
   pAdapterInfo = (IP_ADAPTER_INFO *) MALLOC(ulOutBufLen);
   if (pAdapterInfo == NULL)
    {
     return 1;
    }
  }

 if ((dwRetVal = GetAdaptersInfo(pAdapterInfo, &ulOutBufLen)) == NO_ERROR)
  {
   pAdapter = pAdapterInfo;

   while (pAdapter != NULL)
    {
     //printf("\tComboIndex: \t5d\n", pAdapter->ComboIndex);
     //printf("\tAdapter Name: \t%s\n", pAdapter->AdapterName);
     printf("Adapter Name: %s\n", pAdapter->Description);

     printf("Type: ");
     switch (pAdapter->Type)
      {
       case MIB_IF_TYPE_OTHER:

.版本 2

.程序集 窗口程序集1
.程序集变量 内容, 文本型

.子程序 __启动窗口_创建完毕

内容 ＝ 读配置项 (“这里输入地址”, “配”, “配置项”, “”)
.如果真 (寻找文本 (内容, “666”, , 真) ≠ -1)
信息框 (“666”, 0, )
.如果真结束