求批处理复制文本内容！ - DOS批处理 & 脚本技术（批处理室） - 中国DOS联盟论坛

作者:

标题: 求批处理复制文本内容！

上一主题 | 下一主题

balancel
初级用户

积分 26
发帖 11
注册 2008-9-26
状态离线

『楼主』: 求批处理复制文本内容！

比如有一个a.txt，其内容为abcde，如何批处理复制abcde到剪贴板！盼高手赐教！

2008-10-5 04:05

查看资料发短消息网志

编辑帖子回复引用回复

pooronce
中级用户

积分 484
发帖 250
注册 2007-6-5
状态离线

『第 2 楼』:

type a.txt|clip

clip.exe是2003自带的cmd命令，可将它直接复制到xp下用

2008-10-5 10:45

查看资料发送邮件发短消息网志

编辑帖子回复引用回复

HAT
版主

积分 9023
发帖 5017
注册 2007-5-31
状态离线

『第 3 楼』:

@echo off
>"%temp%\tmpclip.vbs" echo Set Fso = CreateObject("Scripting.FileSystemObject")
>>"%temp%\tmpclip.vbs" echo Set aFile = Fso.OpenTextFile(WScript.Arguments(0), 1)
>>"%temp%\tmpclip.vbs" echo strCopy = aFile.ReadAll
>>"%temp%\tmpclip.vbs" echo Set objIE = CreateObject("InternetExplorer.Application")
>>"%temp%\tmpclip.vbs" echo objIE.Navigate("about:blank")
>>"%temp%\tmpclip.vbs" echo objIE.document.parentwindow.clipboardData.SetData "text", strCopy
>>"%temp%\tmpclip.vbs" echo objIE.Quit
cscript.exe //nologo "%temp%\tmpclip.vbs" "C:\test\a.txt"

2008-10-5 12:47

查看资料发短消息网志

编辑帖子回复引用回复

balancel
初级用户

积分 26
发帖 11
注册 2008-9-26
状态离线

『第 4 楼』: 多些楼上高手！

hat版主的代码真难为我这只菜鸟了，版主真不是盖的！百度到了一个帖子 bat内容是这样： @echo off >abc.vbs echo aaa=createobject("scripting.filesystemobject").opentextfile("%1").readall >>abc.vbs echo Set objIE = CreateObject("InternetExplorer.Application") >>abc.vbs echo objIE.Navigate("about:blank") >>abc.vbs echo objIE.document.parentwindow.clipboardData.SetData "text", aaa >>abc.vbs echo objIE.Quit >>abc.vbs echo msgbox " 已经复制到剪贴板！",64,"提示！" abc.vbs&exit 保存为bat，把txt拖放到此bat上执行！试验了也行的通，顺便贴上来呗！承蒙赐教！虽然不懂，当经典收藏了，哪一天能看懂了再回来研究！多谢楼上两位！

2008-10-5 14:23

查看资料发短消息网志

编辑帖子回复引用回复