联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!
@echo off set msg=http://www.cn-dos.net mshta vbscript:window.clipboarddata.setdata("Text","%msg%")(window.close)
Originally posted by wangff at 2008-12-15 11:17 AM: 读出呢?
@echo off & setlocal call :GetClpText msg echo %msg% pause goto :eof :GetClpText mshta vbscript:Execute("CreateObject(""Scripting.FileSystemObject"").CreateTextFile(""t"").Write ClipBoardData.GetData(""Text""):Close") set /p %1=<t del t goto :eof