有没有一种剪贴板可以自动保存复制的文本内容!而且可以后台运行的!

2025-03-06 21:58:18
推荐回答(4个)
回答1:

'功能: 监视剪贴板内容并将之记录到脚本所在目录下的"clipboardlog.txt"文件
'说明: 本脚本后台运行,没有显示,进程中会出现"wscript.exe"和"IEXPLORER.EXE"这两个进程
'当需要结束脚本时结束上述两个进程就行了
'
'sonic_andy 2007.1.27

'定义常量
Const ForWriting = 2
Const ForAppending = 8
Const TristateUseDefault = -2

'创建一个ie对象
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Navigate("about:blank")

'创建一个文件系统对象,并以追加方式打开文件
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objLogFile = objFSO.OpenTextFile("clipboardlog.txt",ForAppending,True,TristateUseDefault)

While True
'得到剪切板的内容
newContent = objIE.document.parentwindow.clipboardData.GetData("Text")
'判断是否改变,是否为空
If newContent<>strClipBoard And newContent<>"" Then
strClipBoard = newContent
objLogFile.Write "[" & Date & " " & Time & "] ***********************************************" & vbCrLf
objLogFile.Write strClipBoard & vbCrLf & vbCrLf
End If
'时间间隔为1秒
wscript.sleep(1000)
Wend

以上内容复制到记事本中,然后保存为"clipboard.vbs",双击运行即可。

回答2:

用word 它可以的

回答3:

电脑里设置下

回答4:

CTRL+C