开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 22441|回复: 102
收起左侧

[易语言纯源码] 远程桌面用户监控,保护服务器安全

[复制链接]
结帖率:100% (9/9)
发表于 2021-4-4 11:51:46 | 显示全部楼层 |阅读模式   广东省惠州市
分享源码
界面截图:
是否带模块: 纯源码
备注说明: -
调用 WTSRegisterSessionNotification APIzc会话监控消息,接收来自远程桌面用户登入或登出事件。
再调用WTSQuerySessionInformation  cha询 出会话用户名与IP地址,可做成系统服务后台监控,发现非白名单用户发送邮件通知管理员。

WTSQuerySessionInformation.e (16.13 KB, 下载次数: 604)
QQ截图20210404114333.png

评分

参与人数 15好评 +12 精币 +26 收起 理由
小隐k + 1 + 2 新技能已get√
woaishei19 + 1 支持开源~!感谢分享
元首很忙 + 1 支持开源~!感谢分享
xcz668 + 1 + 2 支持开源~!感谢分享
被封禁言 + 1 新技能已get√
易语言资源网 + 1 + 5 支持开源~!感谢分享
皮皮驴 + 1 + 2 感谢分享,很给力!~
kyo9766 + 2 新技能已get√
已注销541904 + 1 + 2 新技能已get√
1301ok + 1 感谢发布原创作品,一定好好学习,天天向上
Aurora + 1 + 2 感谢分享,很给力!~
盖亚啊 + 1 新技能已get√
他乡遇故知 + 1 + 2 很赞同,谢谢!
734108950 + 1 + 2 感谢发布原创作品,精易因你更精彩!
Mr.Zhang + 1 + 3 感谢分享,很给力!~

查看全部评分


本帖被以下淘专辑推荐:

发表于 2025-12-27 19:47:45 高大上手机用户 | 显示全部楼层   北京市北京市
感谢分享
回复 支持 反对

使用道具 举报

结帖率:100% (9/9)
发表于 2025-10-23 13:08:26 | 显示全部楼层   广东省江门市
本帖最后由 hmyroot 于 2025-10-23 14:47 编辑

正好需要,好东西

  
常量名称常量值公 开备 注
WTSInitialProgram0 WTS_INFO_CLASS,一个以NULL结尾的字符串,其中包含远程桌面服务在远程桌面服务运行时运行的初始程序的名称用户登录
WTSApplicationName1 WTS_INFO_CLASS,一个以NULL结尾的字符串,其中包含会话正在运行的应用程序的已发布名称,Vista、Win2008、Win7不支持此值。
WTSWorkingDirectory2 WTS_INFO_CLASS,一个以NULL结尾的字符串,其中包含启动初始程序时使用的默认目录。
WTSOEMId3 WTS_INFO_CLASS,不使用此值。
WTSSessionId4 WTS_INFO_CLASS,包含会话标识符的ULONG值。
WTSUserName5 WTS_INFO_CLASS,一个以NULL结尾的字符串,其中包含与会话关联的用户的名称。
WTSWinStationName6 WTS_INFO_CLASS,包含远程桌面服务会话名称的以NULL结尾的字符串。
WTSDomainName7 WTS_INFO_CLASS,一个以NULL结尾的字符串,其中包含登录用户所属的域的名称。
WTSConnectState8 WTS_INFO_CLASS,会话的当前连接状态,有关详细信息请参阅WTS_CONNECTSTATE_CLASS
WTSClientBuildNumber9 WTS_INFO_CLASS,包含客户Duan内部版本号的ULONG值。
WTSClientName10 WTS_INFO_CLASS,包含客户Duan名称的以NULL结尾的字符串。
WTSClientDirectory11 WTS_INFO_CLASS,一个以NULL结尾的字符串,其中包含安装客户Duan的目录。
WTSClientProductId12 WTS_INFO_CLASS,特定于USHORT客户Duan的产品标识符。
WTSClientHardwareId13 WTS_INFO_CLASS,包含特定于客户Duan的硬件标识符的ULONG值,此选项保留供将来使用,WTSQuerySessionInformation()始终返回0
WTSClientAddress14 WTS_INFO_CLASS,客户Duan的网络类型和网络地址,有关详细信息请参阅WTS_CLIENT_ADDRESS,IP地址从WTS_CLIENT_ADDRESS的地址成员的开头偏移两个字节结构。
WTSClientDisplay15 WTS_INFO_CLASS,有关客户Duan的显示分辨率的信息,有关详细信息请参阅WTS_CLIENT_DISPLAY
WTSClientProtocolType16 WTS_INFO_CLASS,一个USHORT值,该值指定有关 的协议类型的信息会期,这是以下值之一:0=控制台会话、1=此值保留为旧用途、2=RDP 协议
WTSIdleTime17 WTS_INFO_CLASS,使用此值将返回FALSE,如果调用GetLastError()以获取扩展的错误信息,GetLastError将返回ERROR_NOT_SUPPORTED,若要对会话空闲时间进行分类,请使用LastInputTime结构字段,Vista、Win2008不支持此值。
WTSLogonTime18 WTS_INFO_CLASS,使用此值将返回FALSE,如果调用GetLastError()以获取扩展的错误信息,GetLastError将返回ERROR_NOT_SUPPORTED,Vista、Win2008不支持此值。
WTSIncomingBytes19 WTS_INFO_CLASS,使用此值将返回FALSE,如果调用GetLastError()以获取扩展的错误信息,GetLastError将返回ERROR_NOT_SUPPORTED,Vista、Win2008不支持此值。
WTSOutgoingBytes20 WTS_INFO_CLASS,使用此值将返回FALSE,如果调用GetLastError()以获取扩展的错误信息,GetLastError将返回ERROR_NOT_SUPPORTED,Vista、Win2008不支持此值。
WTSIncomingFrames21 WTS_INFO_CLASS,使用此值将返回FALSE,如果调用GetLastError()以获取扩展的错误信息,GetLastError将返回ERROR_NOT_SUPPORTED,Vista、Win2008不支持此值。
WTSOutgoingFrames22 WTS_INFO_CLASS,使用此值将返回FALSE,如果调用GetLastError()以获取扩展的错误信息,GetLastError将返回ERROR_NOT_SUPPORTED,Vista、Win2008不支持此值。
WTSClientInfo23 WTS_INFO_CLASS,有关远程桌面连接RDC客户Duan的信息,有关详细信息请参阅WTSCLIENT
WTSSessionInfo24 WTS_INFO_CLASS,有关RD会话主机服务器上的客户Duan会话的信息,有关详细信息请参阅WTSINFO。
WTSSessionInfoEx25 WTS_INFO_CLASS,有关RD会话主机服务器上的会话的扩展信息,有关详细信息请参阅WTSINFOEX,Vista、Win2008不支持此值。
WTSConfigInfo26 WTS_INFO_CLASS,包含有关RD会话主机服务器配置的信息的WTSCONFIGINFO结构,Vista、Win2008不支持此值。
WTSValidationInfo27 WTS_INFO_CLASS,不支持此值。
WTSSessionAddressV428 WTS_INFO_CLASS,包含分配给会话的IPv4地址的WTS_SESSION_ADDRESS结构,如果会话没有虚拟IP地址,WTSQuerySessionInformation()函数将返回ERROR_NOT_SUPPORTED,Vista、Win2008不支持此值。
WTSIsRemoteSession29 WTS_INFO_CLASS,确定当前会话是否为远程会话。WTSQuerySessionInformation()函数将返回TRUE值,指示当前会话是远程会话。如果为FALSE,则指示当前会话是本地会话。此值只能用于本地计算机,因此WTSQuerySessionInformation()函数的hServer参数必须包含WTS_CURRENT_SERVER_HANDLE,Vista、Win2008不支持此值。


回复 支持 反对

使用道具 举报

结帖率:100% (1/1)
发表于 2025-2-12 18:23:27 | 显示全部楼层   广东省广州市
无敌了、正好需要!
回复 支持 反对

使用道具 举报

结帖率:100% (16/16)
发表于 2024-7-3 08:44:56 | 显示全部楼层   广东省东莞市
厉害厉害了。。。学习看看
回复 支持 反对

使用道具 举报

结帖率:67% (2/3)
发表于 2024-5-9 16:22:49 | 显示全部楼层   四川省成都市
厉害了1,厉害了1,厉害了1,
回复 支持 反对

使用道具 举报

发表于 2024-4-30 22:39:19 | 显示全部楼层   北京市北京市
666666666正好需要
回复 支持 反对

使用道具 举报

结帖率:74% (17/23)
发表于 2024-3-27 20:13:56 | 显示全部楼层   广东省汕尾市
感谢分享,很给力!~
回复 支持 反对

使用道具 举报

结帖率:25% (1/4)

签到天数: 1 天

发表于 2023-6-24 17:18:24 | 显示全部楼层   河南省驻马店市
看看是不是我需要的
回复 支持 反对

使用道具 举报

头像被屏蔽
发表于 2023-6-7 14:45:43 | 显示全部楼层   陕西省延安市
没有看懂
回复 支持 反对

使用道具 举报

结帖率:89% (72/81)
发表于 2023-5-19 04:12:48 | 显示全部楼层   广西壮族自治区南宁市
萧阳天 发表于 2021-5-28 19:53
刚好有朋友需要获取wai网IP,发现这个函数的常量不能获取,另外一个函数可以获取 ...

是那个函数可以获取
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报QQ: 793400750,邮箱:wp@125.la
网站简介:精易论坛成立于2009年,是一个程序设计学习交流技术论坛,隶属于揭阳市揭东区精易科技有限公司所有。
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备2025452707号) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表