联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!
@echo off >tmp.vbs echo Set Fso = CreateObject("Scripting.FileSystemObject") >>tmp.vbs echo Set aFile = Fso.OpenTextFile(WScript.Arguments(0), 1) >>tmp.vbs echo strCopy = aFile.ReadAll >>tmp.vbs echo Set objIE = CreateObject("InternetExplorer.Application") >>tmp.vbs echo objIE.Navigate("about:blank") >>tmp.vbs echo objIE.document.parentwindow.clipboardData.SetData "text", strCopy >>tmp.vbs echo objIE.Quit Cscript.exe //nologo tmp.vbs "C:\boot.ini" del tmp.vbs