SunTrust 发表于 2010-10-5 23:43:17

求助：如何禁止键盘输入指定的词语

如何禁止键盘输入指定的词语，比如家里电脑不让输入“色情”两个字，检测到输入便自动执行alt+f4自动关闭当前窗口。谢谢

xyold1 发表于 2010-10-5 23:53:03

一般都是上网搜的吧，可以判断网页标题里是否含有某某字，可间接达到目的

另：一堵不如一疏，越是禁越是禁不了
{:1_414:}

SunTrust 发表于 2010-10-5 23:58:55

呵呵，我是要来做别的用的。办公室里禁止输入我们的产品关键信息用的。谢谢

xianhou 发表于 2010-10-6 00:05:54

这样的要求，还是网络监控软件合适，而且制度比技术更重要。

假如你可以监控到“重要”，那么“重 要” “重-要”呢？

lxz 发表于 2010-10-6 08:12:52

木马了....

shenrenba 发表于 2010-10-6 09:32:59

本帖最后由 shenrenba 于 2010-10-6 09:34 编辑


#include <Array.au3>
$str = "adjahsjdhajshdjkhj" & @CRLF & _
                "adjah色xcfsdfsdfsdf情jkhj" & @CRLF & _
                "adjah色情jkhj" & @CRLF & _
                "adjahsa色---情dsadjkhj"
$sReg = StringRegExp($str, "\色.*\情", 3)
_ArrayDisplay($sReg, "含有色情的字眼")


可以用AdlibRegister注册个函数去检测 一旦为真 则退出

SunTrust 发表于 2010-10-6 11:21:09

能发给我完整的程序么？谢谢

xsjtxy 发表于 2010-10-6 22:08:10

#NoTrayIcon
opt("WinSearchChildren",1)
opt("WinTitleMatchMode",2)
$zf="色情"
While 1
if WinWait($zf,"",1) then
WinKill($zf)
WinClose($zf)
endif
if WinWait("",$zf,1) then
WinKill("",$zf)
WinClose("",$zf)
endif
WEnd

xyold1 发表于 2010-10-6 23:24:33

应该 可以实现的
用WinGetHandle 获取当前活动窗的句柄
用ControlGetFocus获取窗口上键盘焦点所在的控件的类别名
再用ControlGetText 获取指定控件上的文本
再用正则 对比一下
以上对大部会任意可执行程序管用吧
要是IE的话用8楼代码就差不多了
页: [1]
查看完整版本: 求助：如何禁止键盘输入指定的词语