易语言东拼西凑Web屏幕监视器 源码

易语言东拼西凑Web屏幕监视器

 

 

东拼西凑Web屏幕监视器

 

 

系统结构:窗口消息处理,客户进入,客户离开,数据到达,启动,停止,监听,发送文本,发送,接收,接收文本,断开连接,取服务器端口,取服务器IP,取客户IP,取客户端口,异步选择,检查连接状态,转换图像格式,A2W,得到屏幕位图,取空白字节集_,错误信息框,取空白文本_ASM,取空白文本_API,取空白字节集_API,取空白字节集a,隐藏进程,取进程EProcess,十六文本至长整数,读物理内存,写物理内存,提升进程权限,取震荡时间,取震荡次数,setsockopt,getsockopt,WSAGetLastError,WSAIsBlocking,WSACleanup,发送文本_send,send,recv,接收文本_recv,WSAStartup,htons,ntohs,socket,gethostname,getsockname,closesocket,connect,WSAAsyncSelect,inet_addr,WSACancelBlockingCall,inet_ntoa,bind,listen,accept,取字节集变量数据地址,API_调用子程序,API_调用子程序2,关闭内核对象,API_lstrcpynA,select,recvfrom,sendto,RtlMoveMemory,gethostbyname,getpeername,呼叫窗口函数地址_,设置窗口信息_,到宽字符,由字符串得到CLSID,销毁位图,创建流对象,锁定区域,获取数据大小,取消锁定,申请内存,获得流对象指针,创建位图对象,释放内存,保存到流,获得流句柄,拷贝内存,DLL命令1,启动GDI,结束GDI,创建内存场景,创建GDI对象,取位图二进制位,置位图到设备场景,选入设备场景,删除设备场景,删除对象,复制场景位图,取设备场景,复制二进制位图,取震荡频率,取震荡数,按格式创建位图,获取调用过程堆句柄,从堆中分配内存,填充内存字节,建立消息框,获得活动窗口句柄,ZwQuerySystemInformation,CloseHandle,OpenProcess,StrToInt64ExA,RtlMoveMemory3,RtlMoveMemory2,取指针_字节集,NtSystemDebugControl,api_LookupPrivilegeValue,api_AdjustTokenPrivileges,api_GetCurrentProcess,api_OpenProcessToken,GetCurrentProcessId,窗口消息处理,客户进入,客户离开,数据到达,启动,停止,监听,发送文本,发送,接收,接收文本,断开连接,取服务器端口,取服务器IP,取客户IP,取客户端口,异步选择,检查连接状态,转换图像格式,A2W,得到屏幕位图,取空白字节集_,错误信息框,取空白文本_ASM,取空白文本_API,取空白字节集_API,取空白字节集a,隐藏进程,取进程EProcess,十六文本至长整数,读物理内存,写物理内存,提升进程权限,取震荡时间,取震荡次数,setsockopt,getsockopt,WSAGetLastError,WSAIsBlocking,WSACleanup,发送文本_send,send,recv,接收文本_recv,WSAStartup,htons,ntohs,socket,gethostname,getsockname,closesocket,connect,WSAAsyncSelect,inet_addr,WSACancelBlockingCall,inet_ntoa,bind,listen,accept,取字节集变量数据地址,API_调用子程序,API_调用子程序2,关闭内核对象,API_lstrcpynA,select,recvfrom,sendto,RtlMoveMemory,gethostbyname,getpeername,呼叫窗口函数地址_,设置窗口信息_,到宽字符,由字符串得到CLSID,销毁位图,创建流对象,锁定区域,获取数据大小,取消锁定,申请内存,获得流对象指针,创建位图对象,释放内存,保存到流,获得流句柄,拷贝内存,DLL命令1,启动GDI,结束GDI,创建内存场景,创建GDI对象,取位图二进制位,置位图到设备场景,选入设备场景,删除设备场景,删除对象,复制场景位图,取设备场景,复制二进制位图,取震荡频率,取震荡数,按格式创建位图,获取调用过程堆句柄,从堆中分配内存,填充内存字节,建立消息框,获得活动窗口句柄,ZwQuerySystemInformation,CloseHandle,OpenProcess,StrToInt64ExA,RtlMoveMemory3,RtlMoveMemory2,取指针_字节集,NtSystemDebugControl,api_LookupPrivilegeValue,api_AdjustTokenPrivileges,api_GetCurrentProcess,api_OpenProcessToken,GetCurrentProcessId,

 

======窗口程序集1

| |

| |------ __启动窗口_创建完毕

| |

| |------ 窗口消息处理

| |

| |------ 客户进入

| |

| |------ 客户离开

| |

| |------ 数据到达

| |

| |

======服务器类

| |

| |------ _初始化

| |

| |------ _销毁

| |

| |------ 启动

| |

| |------ 停止

| |

| |------ 监听

| |

| |------ 发送文本

| |

| |------ 发送

| |

| |------ 接收

| |

| |------ 接收文本

| |

| |------ 断开连接

| |

| |------ 取服务器端口

| |

| |------ 取服务器IP

| |

| |------ 取客户IP

| |

| |------ 取客户端口

| |

| |------ 异步选择

| |

| |------ 检查连接状态

| |

| |

======GDI

| |

| |------ 转换图像格式

| |

| |------ A2W

| |

| |

======截图

| |

| |------ 得到屏幕位图

| |

| |------ 取空白字节集_

| |

| |------ 错误信息框

| |

| |------ 取空白文本_ASM

| |

| |------ 取空白文本_API

| |

| |------ 取空白字节集_API

| |

| |------ 取空白字节集a

| |

| |

======程序集1

| |

| |------ 隐藏进程

| |

| |------ 取进程EProcess

| |

| |------ 十六文本至长整数

| |

| |------ 读物理内存

| |

| |------ 写物理内存

| |

| |------ 提升进程权限

| |

| |------ 取震荡时间

| |

| |------ 取震荡次数

| |

| |

======调用的Dll

| |

| |---[dll]------ setsockopt

| |

| |---[dll]------ getsockopt

| |

| |---[dll]------ WSAGetLastError

| |

| |---[dll]------ WSAIsBlocking

| |

| |---[dll]------ WSACleanup

| |

| |---[dll]------ 发送文本_send

| |

| |---[dll]------ send

| |

| |---[dll]------ recv

| |

| |---[dll]------ 接收文本_recv

| |

| |---[dll]------ WSAStartup

| |

| |---[dll]------ htons

| |

| |---[dll]------ ntohs

| |

| |---[dll]------ socket

| |

| |---[dll]------ gethostname

| |

| |---[dll]------ getsockname

| |

| |---[dll]------ closesocket

| |

| |---[dll]------ connect

| |

| |---[dll]------ WSAAsyncSelect

| |

| |---[dll]------ inet_addr

| |

| |---[dll]------ WSACancelBlockingCall

| |

| |---[dll]------ inet_ntoa

| |

| |---[dll]------ bind

| |

| |---[dll]------ listen

| |

| |---[dll]------ accept

| |

| |---[dll]------ 取字节集变量数据地址

| |

| |---[dll]------ API_调用子程序

| |

| |---[dll]------ API_调用子程序2

| |

| |---[dll]------ 关闭内核对象

| |

| |---[dll]------ API_lstrcpynA

| |

| |---[dll]------ select

| |

| |---[dll]------ recvfrom

| |

| |---[dll]------ sendto

| |

| |---[dll]------ RtlMoveMemory

| |

| |---[dll]------ gethostbyname

| |

| |---[dll]------ getpeername

| |

| |---[dll]------ 呼叫窗口函数地址_

| |

| |---[dll]------ 设置窗口信息_

| |

| |---[dll]------ 到宽字符

| |

| |---[dll]------ 由字符串得到CLSID

| |

| |---[dll]------ 销毁位图

| |

| |---[dll]------ 创建流对象

| |

| |---[dll]------ 锁定区域

| |

| |---[dll]------ 获取数据大小

| |

| |---[dll]------ 取消锁定

| |

| |---[dll]------ 申请内存

| |

| |---[dll]------ 获得流对象指针

| |

| |---[dll]------ 创建位图对象

| |

| |---[dll]------ 释放内存

| |

| |---[dll]------ 保存到流

| |

| |---[dll]------ 获得流句柄

| |

| |---[dll]------ 拷贝内存

| |

| |---[dll]------ DLL命令1

| |

| |---[dll]------ 启动GDI

| |

| |---[dll]------ 结束GDI

| |

| |---[dll]------ 创建内存场景

| |

| |---[dll]------ 创建GDI对象

| |

| |---[dll]------ 取位图二进制位

| |

| |---[dll]------ 置位图到设备场景

| |

| |---[dll]------ 选入设备场景

| |

| |---[dll]------ 删除设备场景

| |

| |---[dll]------ 删除对象

| |

| |---[dll]------ 复制场景位图

| |

| |---[dll]------ 取设备场景

| |

| |---[dll]------ 复制二进制位图

| |

| |---[dll]------ 取震荡频率

| |

| |---[dll]------ 取震荡数

| |

| |---[dll]------ 按格式创建位图

| |

| |---[dll]------ 获取调用过程堆句柄

| |

| |---[dll]------ 从堆中分配内存

| |

| |---[dll]------ 填充内存字节

| |

| |---[dll]------ 建立消息框

| |

| |---[dll]------ 获得活动窗口句柄

| |

| |---[dll]------ ZwQuerySystemInformation

| |

| |---[dll]------ CloseHandle

| |

| |---[dll]------ OpenProcess

| |

| |---[dll]------ StrToInt64ExA

| |

| |---[dll]------ RtlMoveMemory3

| |

| |---[dll]------ RtlMoveMemory2

| |

| |---[dll]------ 取指针_字节集

| |

| |---[dll]------ NtSystemDebugControl

| |

| |---[dll]------ api_LookupPrivilegeValue

| |

| |---[dll]------ api_AdjustTokenPrivileges

| |

| |---[dll]------ api_GetCurrentProcess

| |

| |---[dll]------ api_OpenProcessToken

| |

| |---[dll]------ GetCurrentProcessId

======窗口程序集1

| |

| |------ __启动窗口_创建完毕

| |

| |------ 窗口消息处理

| |

| |------ 客户进入

| |

| |------ 客户离开

| |

| |------ 数据到达

| |

| |

======服务器类

| |

| |------ _初始化

| |

| |------ _销毁

| |

| |------ 启动

| |

| |------ 停止

| |

| |------ 监听

| |

| |------ 发送文本

| |

| |------ 发送

| |

| |------ 接收

| |

| |------ 接收文本

| |

| |------ 断开连接

| |

| |------ 取服务器端口

| |

| |------ 取服务器IP

| |

| |------ 取客户IP

| |

| |------ 取客户端口

| |

| |------ 异步选择

| |

| |------ 检查连接状态

| |

| |

======GDI

| |

| |------ 转换图像格式

| |

| |------ A2W

| |

| |

======截图

| |

| |------ 得到屏幕位图

| |

| |------ 取空白字节集_

| |

| |------ 错误信息框

| |

| |------ 取空白文本_ASM

| |

| |------ 取空白文本_API

| |

| |------ 取空白字节集_API

| |

| |------ 取空白字节集a

| |

| |

======程序集1

| |

| |------ 隐藏进程

| |

| |------ 取进程EProcess

| |

| |------ 十六文本至长整数

| |

| |------ 读物理内存

| |

| |------ 写物理内存

| |

| |------ 提升进程权限

| |

| |------ 取震荡时间

| |

| |------ 取震荡次数

| |

| |

======调用的Dll

| |

| |---[dll]------ setsockopt

| |

| |---[dll]------ getsockopt

| |

| |---[dll]------ WSAGetLastError

| |

| |---[dll]------ WSAIsBlocking

| |

| |---[dll]------ WSACleanup

| |

| |---[dll]------ 发送文本_send

| |

| |---[dll]------ send

| |

| |---[dll]------ recv

| |

| |---[dll]------ 接收文本_recv

| |

| |---[dll]------ WSAStartup

| |

| |---[dll]------ htons

| |

| |---[dll]------ ntohs

| |

| |---[dll]------ socket

| |

| |---[dll]------ gethostname

| |

| |---[dll]------ getsockname

| |

| |---[dll]------ closesocket

| |

| |---[dll]------ connect

| |

| |---[dll]------ WSAAsyncSelect

| |

| |---[dll]------ inet_addr

| |

| |---[dll]------ WSACancelBlockingCall

| |

| |---[dll]------ inet_ntoa

| |

| |---[dll]------ bind

| |

| |---[dll]------ listen

| |

| |---[dll]------ accept

| |

| |---[dll]------ 取字节集变量数据地址

| |

| |---[dll]------ API_调用子程序

| |

| |---[dll]------ API_调用子程序2

| |

| |---[dll]------ 关闭内核对象

| |

| |---[dll]------ API_lstrcpynA

| |

| |---[dll]------ select

| |

| |---[dll]------ recvfrom

| |

| |---[dll]------ sendto

| |

| |---[dll]------ RtlMoveMemory

| |

| |---[dll]------ gethostbyname

| |

| |---[dll]------ getpeername

| |

| |---[dll]------ 呼叫窗口函数地址_

| |

| |---[dll]------ 设置窗口信息_

| |

| |---[dll]------ 到宽字符

| |

| |---[dll]------ 由字符串得到CLSID

| |

| |---[dll]------ 销毁位图

| |

| |---[dll]------ 创建流对象

| |

| |---[dll]------ 锁定区域

| |

| |---[dll]------ 获取数据大小

| |

| |---[dll]------ 取消锁定

| |

| |---[dll]------ 申请内存

| |

| |---[dll]------ 获得流对象指针

| |

| |---[dll]------ 创建位图对象

| |

| |---[dll]------ 释放内存

| |

| |---[dll]------ 保存到流

| |

| |---[dll]------ 获得流句柄

| |

| |---[dll]------ 拷贝内存

| |

| |---[dll]------ DLL命令1

| |

| |---[dll]------ 启动GDI

| |

| |---[dll]------ 结束GDI

| |

| |---[dll]------ 创建内存场景

| |

| |---[dll]------ 创建GDI对象

| |

| |---[dll]------ 取位图二进制位

| |

| |---[dll]------ 置位图到设备场景

| |

| |---[dll]------ 选入设备场景

| |

| |---[dll]------ 删除设备场景

| |

| |---[dll]------ 删除对象

| |

| |---[dll]------ 复制场景位图

| |

| |---[dll]------ 取设备场景

| |

| |---[dll]------ 复制二进制位图

| |

| |---[dll]------ 取震荡频率

| |

| |---[dll]------ 取震荡数

| |

| |---[dll]------ 按格式创建位图

| |

| |---[dll]------ 获取调用过程堆句柄

| |

| |---[dll]------ 从堆中分配内存

| |

| |---[dll]------ 填充内存字节

| |

| |---[dll]------ 建立消息框

| |

| |---[dll]------ 获得活动窗口句柄

| |

| |---[dll]------ ZwQuerySystemInformation

| |

| |---[dll]------ CloseHandle

| |

| |---[dll]------ OpenProcess

| |

| |---[dll]------ StrToInt64ExA

| |

| |---[dll]------ RtlMoveMemory3

| |

| |---[dll]------ RtlMoveMemory2

| |

| |---[dll]------ 取指针_字节集

| |

| |---[dll]------ NtSystemDebugControl

| |

| |---[dll]------ api_LookupPrivilegeValue

| |

| |---[dll]------ api_AdjustTokenPrivileges

| |

| |---[dll]------ api_GetCurrentProcess

| |

| |---[dll]------ api_OpenProcessToken

| |

| |---[dll]------ GetCurrentProcessId

 

 

 

 

 

 

调用的DLL命令:

 

 

.DLL命令 setsockopt, 整数型, "ws2_32.dll", "setsockopt", , 置操作_

.参数 网络通讯标识符, 整数型

.参数 级别, 整数型

.参数 操作名称, 整数型

.参数 操作结构, 空闲

.参数 操作结构长度, 整数型

 

.DLL命令 getsockopt, 整数型, "ws2_32.dll", "getsockopt", , 取操作_

.参数 网络通讯标识符, 整数型

.参数 级别, 整数型

.参数 操作名称, 整数型

.参数 操作结构, 空闲

.参数 操作结构长度, 整数型, 传址

 

.DLL命令 WSAGetLastError, 整数型, "ws2_32.dll", "WSAGetLastError", , 取最后错误_

 

.DLL命令 WSAIsBlocking, 整数型, "ws2_32.dll", "WSAIsBlocking", , 是否阻塞_

 

.DLL命令 WSACleanup, 整数型, "ws2_32.dll", "WSACleanup", , 卸载Winsocket服务

 

.DLL命令 发送文本_send, 整数型, "ws2_32.dll", "send", , 发送数据(TCP，当这次发送数据未发送完时返回剩余字节数)

.参数 网络通讯标识符, 整数型, , s

.参数 缓冲区, 文本型, , buf

.参数 缓冲区长度, 整数型, , lLen

.参数 标志, 整数型, , flags

 

.DLL命令 send, 整数型, "ws2_32.dll", "send", , 发送数据_(TCP，当这次发送数据未发送完时返回剩余字节数)

.参数 网络通讯标识符, 整数型, , s

.参数 缓冲区, 字节集, 传址, buf

.参数 缓冲区长度, 整数型, , lLen

.参数 标志, 整数型, , flags

 

.DLL命令 recv, 整数型, "ws2_32.dll", "recv", , 接收字节集数据(TCP，当数据这次未接收完时返回剩余字节数)

.参数 网络通讯标识符, 整数型, , s

.参数 缓冲区, 字节集, 传址, buf数据(提供变量)

.参数 缓冲区长度, 整数型, , lLen

.参数 标志, 整数型, , flags

 

.DLL命令 接收文本_recv, 整数型, "ws2_32.dll", "recv", , 接收文本数据(TCP，当数据这次未接收完时返回剩余字节数)

.参数 网络通讯标识符, 整数型, , s

.参数 缓冲区, 文本型, 传址, buf数据(提供变量)

.参数 缓冲区长度, 整数型, , lLen

.参数 标志, 整数型, , flags

 

.DLL命令 WSAStartup, 整数型, "ws2_32.dll", "WSAStartup", , 初始化WnSocket服务

.参数 必需版本, 整数型, , wVersionRequired

.参数 服务信息, 套接字信息, , lpWSAData

 

.DLL命令 htons, 短整数型, "ws2_32.dll", "htons", , 转换为network 排列方式的数目

.参数 十六位主机命令, 短整数型, , hostshort端口号

 

.DLL命令 ntohs, 短整数型, "ws2_32.dll", "ntohs", , 转换为端口号-网络转换到本机

.参数 十六位网络端口, 短整数型, , netshort欲转换值

 

.DLL命令 socket, 整数型, "ws2_32.dll", "socket", , 创建套接字

.参数 协议族, 整数型, , af使用的通信协议的协议族

.参数 类型, 整数型, , lType流套接字类型

.参数 协议, 整数型, , protocol使用的通信协议

 

.DLL命令 gethostname, 整数型, "ws2_32.dll", "gethostname", , 取本机名，失败返回-1，成功返回0。

.参数 name, 文本型, 传址, 给变量，用于存放名称

.参数 namelen, 整数型, , 上一个参数的长度

 

.DLL命令 getsockname, 整数型, "ws2_32.dll", "getsockname", , 获取本地接口的地址信息（IP和端口）。成功返回0

.参数 s, 整数型, , 句柄

.参数 name, 套接字地址, 传址, 地址信息

.参数 namelen, 整数型, 传址, name长度,Sockaddr_in长度为16

 

.DLL命令 closesocket, 整数型, "ws2_32.dll", "closesocket", , 销毁套接字

.参数 套接字描述符, 整数型

 

.DLL命令 connect, 整数型, "ws2_32.dll", "connect", , 连接到服务器(TCP)

.参数 网络通讯标识符, 整数型, , s

.参数 名称结构, 套接字地址, , addr

.参数 名称结构长度, 整数型, , namelen(16)

 

.DLL命令 WSAAsyncSelect, 整数型, "ws2_32.dll", "WSAAsyncSelect", , 异步选择_ 本函数自动将套接口设置为非阻塞模式 0 表明是成功的

.参数 网络通讯标识符, 整数型, , s标识一个需要事件通知的套接口的描述符

.参数 窗口句柄, 整数型, , hWnd标识一个在网络事件发生时需要接收消息的窗口句柄

.参数 消息值, 整数型, , wMsg在网络事件发生时要接收的消息

.参数 事件, 整数型, , lEvent位屏蔽码,用于指明应用程序感兴趣的网络事件集合.

 

.DLL命令 inet_addr, 整数型, "ws2_32.dll", "inet_addr", , 点数格式转换为整数格式IP地址-到网络地址_

.参数 IP地址, 文本型, 传址, cp欲被转换的IP地址

 

.DLL命令 WSACancelBlockingCall, 整数型, "ws2_32.dll", "WSACancelBlockingCall", , 取消阻塞_

 

.DLL命令 inet_ntoa, 整数型, "ws2_32.dll", "inet_ntoa", , 将整数格式IP地址转换为点数格式（返回值是内存地址指针）

.参数 网络地址, 整数型, , lIn欲转换整数格式IP地址

 

.DLL命令 bind, 整数型, "ws2_32.dll", "bind", , 绑定一个地址和端口

.参数 套接字描述符, 整数型

.参数&nbs