易语言发送广播消息源码

系统结构:IsWinNT,NetSendMessage,GetNetSendMessageStatus,取计算机名_,取Window和DOS版本扩展_,NetMessageBufferSend,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ IsWinNT
           |  |
           |  |------ NetSendMessage
           |  |
           |  |------ GetNetSendMessageStatus
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   取计算机名_
           |  |
           |  |---[dll]------   取Window和DOS版本扩展_
           |  |
           |  |---[dll]------   NetMessageBufferSend

调用的DLL命令:

.DLL命令 取计算机名_, 整数型, "kernel32", "GetComputerNameA", , TRUE（非零）表示成功，否则返回零。会设置GetLastError
    .参数 字串缓冲区, 文本型, , lpBuffer，随同计算机名载入的字串缓冲区
    .参数 缓冲区长度, 整数型, 传址, nSize，缓冲区的长度。这个变量随同返回计算机名的实际长度载入

.DLL命令 取Window和DOS版本扩展_, 整数型, "kernel32", "GetVersionExA", , 在一个OSVERSIONINFO结构中载入与平台和操作系统有关的版本信息  非零表示成功，零表示失败
    .参数 版本, 版本信息_, , OSVERSIONINFO，用于装载版本信息的结构。在正式调用函数之前，必须先将这个结构的dwOSVersionInfoSize字段设为结构的大小（148）;

.DLL命令 NetMessageBufferSend, 整数型, "NETAPI32.DLL", "NetMessageBufferSend"
    .参数 servername, 字节集
    .参数 msgname, 字节集
    .参数 fromname, 字节集
    .参数 buf, 字节集
    .参数 buflen, 整数型