中国DOS联盟

P运行后不停的监控键盘使用，当用户使用Ctrl+C后，P处理就自动Ctrl+V把复制的内容做为数据与另一个txt文件里的内容做对比，对比后把相同的内容全句显示在电脑的屏幕的中上方。
例子：

a.txt内容为以下
发动机转动时，首先带动（ ）一起转动。
答案：、泵轮

叉车作业中，下列操作正确的是（ ）。
答案：、装卸时制动叉车

--------------------------------------------------------------------
用户现在ctrl+C复制内容为“叉车作业中，下列操作正确的是”后，电脑屏幕中上方就出来全句内容了“叉车作业中，下列操作正确的是（ ）。 答案：、装卸时制动叉车 ”

─────────────────　版务记录　─────────────────
执行：HAT
操作：在帖子标题中增加搜索关键字
说明：原标题"P能这样用吗？"不利于论坛搜索
处罚：扣除2点积分
提示：建议阅读以下帖子
{1415}提问的智慧
{7326}论坛新手必读，所有人的基本行为准则
{22703}请不要做浮躁的人
{32667}那些连标题都写不清楚的人们啊，你们醒醒吧
{32825}本版严厉整顿烂帖
─────────────────　版务记录　─────────────────

[ Last edited by HAT on 2008-10-22 at 12:10 ]

不能

Originally posted by sea1112 at 2008-10-22 09:22 AM:
P运行后不停的监控键盘使用，当用户使用Ctrl+C后，P处理就自动Ctrl+V把复制的内容做为数据与另一个txt文件里的内容做对比，对比后把相同的内容全句 ...

vbs做也可以，能做到吗？
有什么方法可以做到，我用过这样的软件啊，F11录入SN的软件，

[ Last edited by sea1112 on 2008-10-22 at 09:52 ]

AutoHotKey 应该可以

http://ahkbbs.cn/

vbs +CMD 搞定了。

提取剪贴板内容到文件.vbs
on error resume next

Set ie=createobject("internetexplorer.application")
ie.navigate "about:blank"
ie.visible=False

set fso=createobject("scripting.filesystemobject")
set f=fso.opentextfile("c:\新建文档.txt",2,true)

while true
str=ie.document.parentwindow.clipboarddata.getdata("text")
if str<>"" then
f.Write vbCrLf&str
ie.document.parentwindow.clipboarddata.setdata "text",""
End If
WScript.Sleep 500
wend

删除文件 del.vbs

dim fso,obj
set fso=createobject("scripting.filesystemobject")
fso.deletefile "c:\新建文档.txt"

文件对比....

文件显示
MsgBox(prompt )

[ Last edited by sea1112 on 2008-10-22 at 13:15 ]

自问自答