网站关键词提取工具易语言源码

系统结构:网页访问_对象,高级延迟,网页访问_底层,文本_取出中间文本,网页访问_自动转码,编码_URL编码,编码_URL解码,编码_utf8到gb2312,编码_gb2312到utf8,Ansi到Unicode,Unicode到Ansi,时间_取现行毫秒,时间_转换Unix时间,时间_Unix时间反转,时间_转换为标准时间,时间_转标准日期时间,时间_转换为标准日期,置标准文本,置标准整数,取结果页面数,提取关键字,显示出来,SetWaitableTimer,CloseHandle,MsgWaitForMultipleObjects,CreateWaitableTimerA,CoUninitialize,GetLocalTime,MultiByteToWideChar,CoInitialize,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _临时子程序
           |  |
           |  |------ 网页访问_对象
           |  |
           |  |------ 高级延迟
           |  |
           |  |------ 网页访问_底层
           |  |
           |  |------ 文本_取出中间文本
           |  |
           |  |------ 网页访问_自动转码
           |  |
           |  |------ 编码_URL编码
           |  |
           |  |------ 编码_URL解码
           |  |
           |  |------ 编码_utf8到gb2312
           |  |
           |  |------ 编码_gb2312到utf8
           |  |
           |  |
======附加程序集
           |  |
           |  |------ Ansi到Unicode
           |  |
           |  |------ Unicode到Ansi
           |  |
           |  |------ 时间_取现行毫秒
           |  |
           |  |------ 时间_转换Unix时间
           |  |
           |  |------ 时间_Unix时间反转
           |  |
           |  |------ 时间_转换为标准时间
           |  |
           |  |------ 时间_转标准日期时间
           |  |
           |  |------ 时间_转换为标准日期
           |  |
           |  |------ 置标准文本
           |  |
           |  |------ 置标准整数
           |  |
           |  |
======窗口程序集_启动窗口
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ 取结果页面数
           |  |
           |  |------ 提取关键字
           |  |
           |  |------ 显示出来
           |  |
           |  |------ __启动窗口_将被销毁
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   SetWaitableTimer
           |  |
           |  |---[dll]------   CloseHandle
           |  |
           |  |---[dll]------   MsgWaitForMultipleObjects
           |  |
           |  |---[dll]------   CreateWaitableTimerA
           |  |
           |  |---[dll]------   CoUninitialize
           |  |
           |  |---[dll]------   GetLocalTime
           |  |
           |  |---[dll]------   MultiByteToWideChar
           |  |
           |  |---[dll]------   _Unicode转Ansi
           |  |
           |  |---[dll]------   CoInitialize

调用的DLL命令:

.DLL命令 SetWaitableTimer, 整数型, , "SetWaitableTimer"
    .参数 hTimer, 整数型
    .参数 pDueTime, LARGE_INTEGER
    .参数 lPeriod, 整数型
    .参数 pfnCompletionRoutine, 整数型
    .参数 lpArgToCompletionRoutine, 整数型
    .参数 fResume, 逻辑型

.DLL命令 CloseHandle, 逻辑型, , "CloseHandle"
    .参数 hObject, 整数型

.DLL命令 MsgWaitForMultipleObjects, 整数型, , "MsgWaitForMultipleObjects"
    .参数 nCount, 整数型
    .参数 pHandles, 整数型, 传址
    .参数 fWaitAll, 逻辑型
    .参数 dwMilliseconds, 整数型
    .参数 dwWakeMask, 整数型

.DLL命令 CreateWaitableTimerA, 整数型, , "CreateWaitableTimerA"
    .参数 lpTimerAttributes, 整数型
    .参数 bManualReset, 逻辑型
    .参数 lpTimerName, 整数型

.DLL命令 CoUninitialize, , "ole32.dll", "CoUninitialize"

.DLL命令 GetLocalTime, , "kernel32.dll", , 公开
    .参数 lpSystemTime, SYSTEMTIME

.DLL命令 MultiByteToWideChar, 整数型, "kernel32.dll", , 公开
    .参数 CodePage, 整数型
    .参数 dwFlags, 整数型
    .参数 lpMultiByteStr, 文本型
    .参数 cchMultiByte, 整数型
    .参数 lpWideCharStr, 字节集
    .参数 cchWideChar, 整数型

.DLL命令 _Unicode转Ansi, 整数型, "kernel32.dll", "WideCharToMultiByte", 公开
    .参数 CodePage, 整数型
    .参数 dwFlags, 整数型, , 0
    .参数 lpWideCharStr, 字节集
    .参数 cchMultiByte, 整数型, , -1
    .参数 lpMultiByteStr, 文本型, 传址
    .参数 cchMultiByte, 整数型
    .参数 默认文本, 整数型, , 0
    .参数 使用默认文本, 整数型, , 0

.DLL命令 CoInitialize, , "ole32.dll", "CoInitialize"
    .参数 pvReserved, 整数型, , 值为0