易语言自动连接宽带源码

系统结构:添加分类列表载入,取拨号连接数量,取拨号连接名称,是否有指定连接,创建拨号连接,设置拨号连接,开始拨号,挂断拨号,拨号事件回调,删除拨号连接,高精度等待,挂断所有连接,取网络连接状态,保存拨号连接,窗口渐显,窗口渐消,取网络流量,取连接时间,CloseHandle_,MsgWaitForMultipleObjects_,SetWaitableTimer_,CreateWaitableTimer_,SkinH_Attach,SkinH_Alpha,SkinH_Attach_Ex,SkinH_Adjust_HSV,SkinH_Detach,API_ShowWindow,API_RasSetEntryProperties,API_RasSetCredentials,API_RasDial,API_RasEnumEntries,API_RasHangUp,API_RtlMoveMemory_Text,API_RtlMoveMemory_Long,API_GlobalSize,API_SetWindowText,API_InternetGetConnectedStateEx,GetWindowLong_,SetWindowLong_,SetLayeredWindowAttributes_,ShowWindow_,GetIfTable_Byte,GetIfTable_Long,SkinH_Detach_Ex,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _链接按钮_被单击
           |  |
           |  |------ _保存按钮_被单击
           |  |
           |  |------ _时钟1_周期事件
           |  |
           |  |------ __启动窗口_可否被关闭
           |  |
           |  |------ __启动窗口_位置被改变
           |  |
           |  |------ 添加分类列表载入
           |  |
           |  |------ _断开按钮_被单击
           |  |
           |  |------ __启动窗口_托盘事件
           |  |
           |  |------ _拨号_被选择
           |  |
           |  |------ _断开_被选择
           |  |
           |  |------ _保存用户_被选择
           |  |
           |  |------ _创建连接_被选择
           |  |
           |  |------ _查看流量_被选择
           |  |
           |  |------ _显示_被选择
           |  |
           |  |------ _退出_被选择
           |  |
           |  |------ _关于_被选择
           |  |
           |  |
======拨号程序集
           |  |
           |  |------ 取拨号连接数量
           |  |
           |  |------ 取拨号连接名称
           |  |
           |  |------ 是否有指定连接
           |  |
           |  |------ 创建拨号连接
           |  |
           |  |------ 设置拨号连接
           |  |
           |  |------ 开始拨号
           |  |
           |  |------ 挂断拨号
           |  |
           |  |------ 拨号事件回调
           |  |
           |  |------ 删除拨号连接
           |  |
           |  |------ 高精度等待
           |  |
           |  |------ 挂断所有连接
           |  |
           |  |------ 取网络连接状态
           |  |
           |  |------ 保存拨号连接
           |  |
           |  |------ 窗口渐显
           |  |
           |  |------ 窗口渐消
           |  |
           |  |
======窗口程序集2
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |
======窗口程序集3
           |  |
           |  |------ 取网络流量
           |  |
           |  |------ _流量窗口_创建完毕
           |  |
           |  |------ _流量时钟_周期事件
           |  |
           |  |------ 取连接时间
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   CloseHandle_
           |  |
           |  |---[dll]------   MsgWaitForMultipleObjects_
           |  |
           |  |---[dll]------   SetWaitableTimer_
           |  |
           |  |---[dll]------   CreateWaitableTimer_
           |  |
           |  |---[dll]------   SkinH_Attach
           |  |
           |  |---[dll]------   SkinH_Alpha
           |  |
           |  |---[dll]------   SkinH_Attach_Ex
           |  |
           |  |---[dll]------   SkinH_Adjust_HSV
           |  |
           |  |---[dll]------   SkinH_Detach
           |  |
           |  |---[dll]------   API_ShowWindow
           |  |
           |  |---[dll]------   API_RasSetEntryProperties
           |  |
           |  |---[dll]------   API_RasSetCredentials
           |  |
           |  |---[dll]------   API_RasDial
           |  |
           |  |---[dll]------   API_RasEnumEntries
           |  |
           |  |---[dll]------   API_RasHangUp
           |  |
           |  |---[dll]------   API_RtlMoveMemory_Text
           |  |
           |  |---[dll]------   API_RtlMoveMemory_Long
           |  |
           |  |---[dll]------   API_GlobalSize
           |  |
           |  |---[dll]------   API_SetWindowText
           |  |
           |  |---[dll]------   API_InternetGetConnectedStateEx
           |  |
           |  |---[dll]------   GetWindowLong_
           |  |
           |  |---[dll]------   SetWindowLong_
           |  |
           |  |---[dll]------   SetLayeredWindowAttributes_
           |  |
           |  |---[dll]------   ShowWindow_
           |  |
           |  |---[dll]------   GetIfTable_Byte
           |  |
           |  |---[dll]------   GetIfTable_Long
           |  |
           |  |---[dll]------   SkinH_Detach_Ex

  

调用的DLL命令:

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

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

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

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

.DLL命令 SkinH_Attach, , "SkinH_EL.dll", "SkinH_Attach"

.DLL命令 SkinH_Alpha, , "SkinH_EL.dll", "SkinH_Alpha"
    .参数 窗口句柄, 整数型
    .参数 透明度, 整数型

.DLL命令 SkinH_Attach_Ex, , "SkinH_EL.dll", "SkinH_Attach_Ex"
    .参数 皮肤路径, 文本型
    .参数 皮肤口令, 文本型

.DLL命令 SkinH_Adjust_HSV, , "SkinH_EL.dll", "SkinH_Adjust_HSV"
    .参数 色调, 整数型
    .参数 饱和度, 整数型
    .参数 亮度, 整数型

.DLL命令 SkinH_Detach, , "SkinH_EL.dll", "SkinH_Detach"

.DLL命令 API_ShowWindow, 整数型, , "ShowWindow", , 控制窗口可视
    .参数 hwnd, 整数型
    .参数 fEnable, 整数型, , 0=隐藏,9=原位置显示

.DLL命令 API_RasSetEntryProperties, 整数型, "rasapi32.dll", "RasSetEntryPropertiesA", , 0=建立成功,其他为失败
    .参数 lpszPhonebook, 整数型, , 电话本名称,0
    .参数 lpszEntry, 文本型, , 连接名称
    .参数 lpRasEntry, RASENTRY
    .参数 dwEntryInfoSize, 整数型
    .参数 lpbDeviceInfo, 整数型
    .参数 wDeviceInfoSize, 整数型

.DLL命令 API_RasSetCredentials, 整数型, "rasapi32.dll", "RasSetCredentialsA"
    .参数 lpszPhonebook, 整数型, , 电话本名称,0
    .参数 lpszEntry, 文本型, , 连接名称
    .参数 lpCredentials, RASCREDENTIALS
    .参数 fClearCredentials, 整数型

.DLL命令 API_RasDial, 整数型, "rasapi32.dll", "RasDialA", , 拔号连接
    .参数 lprasdialextensions, 整数型, , 拔号参数
    .参数 lpszPhonebook, 整数型, , 电话本名称,0
    .参数 lprasdialparamsa, RASDIALPARAMS, , 拔号参数
    .参数 dwNotifierType, 整数型, , 消息通知方式
    .参数 lpvNotifier, 整数型, , 消息处理回调子程序
    .参数 lphrasconn, 整数型, 传址, 返回的成功连接的连接句柄

.DLL命令 API_RasEnumEntries, 整数型, "rasapi32.dll", "RasEnumEntriesA", , 取连接信息结构,连接名称,数量等等
    .参数 lpStrNull, 整数型, , 保留字段,必须为NIL
    .参数 lpszphonebook, 整数型, , 电话本名称,在Win9X下无作用
    .参数 lprasetryname, RASENTRYNAME, 传址 数组, RASENTRYNAME类型数组的指针
    .参数 lpcb, 整数型, 传址, 接收拨号连接名称的缓冲区的大小
    .参数 lpcentries, 整数型, 传址, 实际获得的拨号连接名称的数目

.DLL命令 API_RasHangUp, 整数型, "RasApi32.DLL", "RasHangUpA", , 挂断当前拔号连接
    .参数 hRasConn, 整数型, , 连接句柄

.DLL命令 API_RtlMoveMemory_Text, , , "RtlMoveMemory", , 复制内存数据_文本参数
    .参数 Destination, 字节型, 数组, 目标地址
    .参数 Source, 文本型, , 要复制的数据
    .参数 Length, 整数型, , 长度

.DLL命令 API_RtlMoveMemory_Long, , , "RtlMoveMemory", , 复制内存数据_整数参数
    .参数 Destination, 字节型, 传址, 目标地址
    .参数 Source, 整数型, , 要复制的数据
    .参数 Length, 整数型, , 长度

.DLL命令 API_GlobalSize, 整数型, "kernel32.dll", "GlobalSize", , 取结构尺寸
    .参数 结构, RASENTRYNAME, 传址

.DLL命令 API_SetWindowText, 整数型, "user32.dll", "SetWindowTextA", , 设置窗口的标题文字或控件的内容,非零表示成功，零表示失败。
    .参数 hwnd, 整数型, , 要设置文字的窗口的句柄
    .参数 Text, 文本型, , 要设到指定窗口中的文字

.DLL命令 API_InternetGetConnectedStateEx, 整数型, "wininet.dll", "InternetGetConnectedStateEx"
    .参数 lpdwFlags, 整数型, 传址
    .参数 lpszConnectionName, 文本型, 传址
    .参数 dwNameLen, 整数型
    .参数 dwReserved, 整数型

.DLL命令 GetWindowLong_, 整数型, "user32", "GetWindowLongA", , 从指定窗口的结构中取得信息  由nIndex决定。零表示出错。会设置GetLastError
    .参数 窗口句柄, 整数型, , 欲为其获取信息的窗口的句柄
    .参数 属性, 整数型, , 欲取回的信息，可以是下述任何一个常数：;GWL_EXSTYLE：扩展窗口样式;GWL_STYLE：窗口样式;GWL_WNDPROC：该窗口的窗口函数的地址;GWL_HINSTANCE：拥有窗口的实例的句柄;GWL_HWNDPARENT：该窗口之父的句柄。不要用SetWindowWord来改变这个值;GWL_ID：对话框中一个子窗口的标识符;GWL_USERDATA：含义由应用程序规定;DWL_DLGPROC：这个窗口的对话框函数地址;DWL_MSGRESULT：在对话框函数中处理的一条消息返回的值;DWL_USER：含义由应用程序规定;

.DLL命令 SetWindowLong_, 整数型, , "SetWindowLongA", , 在窗口结构中为指定的窗口设置信息  指定数据的前一个值
    .参数 窗口句柄, 整数型, , hwnd，欲为其取得信息的窗口的句柄
    .参数 窗口信息值, 整数型, , nIndex，请参考GetWindowLong函数的nIndex参数的说明
    .参数 窗口信息新值, 整数型, , dwNewLong，由nIndex指定的窗口信息的新值

.DLL命令 SetLayeredWindowAttributes_, 整数型, , "SetLayeredWindowAttributes", , 设置窗口透明
    .参数 hwnd, 整数型
    .参数 crKey, 整数型
    .参数 bAlpha, 整数型
    .参数 dwFlags, 整数型

.DLL命令 ShowWindow_, 整数型, "user32", "ShowWindow", , 控制窗口的可见性（在vb里使用：针对vb窗体及控件，请使用对应的vb属性）  如窗口之前是可见的，则返回TRUE（非零），否则返回FALSE（零）
    .参数 hwnd, 整数型, , 窗口句柄，要向这个窗口应用由nCmdShow指定的命令
    .参数 nCmdShow, 整数型, , 为窗口指定可视性方面的一个命令。请用下述任何一个常数;SW_HIDE：隐藏窗口，活动状态给令一个窗口;SW_MINIMIZE：最小化窗口，活动状态给令一个窗口;SW_RESTORE：用原来的大小和位置显示一个窗口，同时令其进入活动状态;SW_SHOW：用当前的大小和位置显示一个窗口，同时令其进入活动状态;SW_SHOWMAXIMIZED：最大化窗口，并将其激活;SW_SHOWMINIMIZED：最小化窗口，并将其激活;SW_SHOWMINNOACTIVE：最小化一个窗口，同时不改变活动窗口;SW_SHOWNA：用当前的大小和位置显示一个窗口，不改变活动窗口;SW_SHOWNOACTIVATE：用最近的大小和位置显示一个窗口，同时不改变活动窗口;SW_SHOWNORMAL：与SW_RESTORE相同;

.DLL命令 GetIfTable_Byte, 整数型, "IPhlpAPI", "GetIfTable", , 网卡流量监视类
    .参数 pIfRowTable, 字节集, 传址
    .参数 pdwSize, 整数型, 传址
    .参数 bOrder, 整数型

.DLL命令 GetIfTable_Long, 整数型, "IPhlpAPI", "GetIfTable", , 网卡流量监视类
    .参数 pIfRowTable, 整数型
    .参数 pdwSize, 整数型, 传址
    .参数 bOrder, 整数型

.DLL命令 SkinH_Detach_Ex, , "SkinH_EL.dll", "SkinH_Detach_Ex"
    .参数 句柄, 整数型