[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[问题求助] 一个自动备份剪贴板的vbs程序

一个自动备份剪贴板的vbs程序
就是ctrl+c复制的文件

然后备份到我指定的文件路径下,文字的话就统一存到一个txt里面换行就行
就是自动监听复制板和剪贴板

请问这个要怎么弄

使用第三方命令行工具xclip.exe,论坛有下载。
http://www.bathome.net/s/tool/index.html?key=xclip

TOP

回复 2# holley


    win10可以用吗
双击一闪就没了

TOP

  1. #@&cls&powershell "iex(gc '%~0'|out-string)"&pause&exit /b"
  2. if ([threading.thread]::CurrentThread.GetApartmentState() -ne "STA"){
  3.   powershell -sta
  4. }
  5. Add-Type -AssemblyName System.Windows.Forms
  6. #加载System.Windows.Forms
  7. $folder=get-date -f D
  8. if(!(test-path $folder)){md $folder}
  9. $folder=gi $folder
  10. $folder
  11. #根据日期建立文件夹$folder
  12. $h=1
  13. $ms=$h*3600000
  14. $rate=800
  15. $loop=$ms/$rate
  16. #定义监控时间及频率,默认一小时,每500毫秒检查一次剪贴板。
  17. function monitor{
  18.   $clipdata = [System.Windows.Forms.Clipboard]::GetDataObject()
  19.   $filetime=get-date -f MMddHHmmss
  20.   if ($clipdata.ContainsImage()) {
  21.     $clipdata.getimage().save("$folder\$filetime.jpg")
  22.     write-host "存储图片到文件$filetime+.jpg" -fore green
  23.   }
  24.   if($clipdata.containstext()){
  25.     $clipdata.gettext()+"`r`n"|ac $folder\text.txt
  26.     write-host "存储文字到文件text.txt" -fore green
  27.   }
  28.   if($clipdata.containsfiledroplist()){
  29.     copy $clipdata.getfiledroplist() $folder
  30.     write-host "复制文件到文件夹$folder" -fore green
  31.   }
  32.   [System.Windows.Forms.Clipboard]::clear()
  33.   write-host "监控剪贴板..."
  34.   Start-Sleep -Milliseconds $rate
  35. }
  36. for($i=1;$i -lt $loop;$i++){monitor}
  37. #根据前面定义的时长,循环执行
复制代码
1

评分人数

TOP

回复 4# for_flr


    好的,谢谢

TOP

返回列表