[已解决]批处理怎样将剪贴板中的内容保存为文本？

77七

回复 12# piazini


  

1. @echo off
   
2. set jsline=mshta "javascript:var s=clipboardData.getData('text');if(s)new ActiveXObject('Scripting.FileSystemObject').GetStandardStream(1).Write(s);close();"
   
3. 
   
4. for /f "delims=" %%a in ('wmic os get localdatetime ^|findstr [0-9]') do (
   
5.         set now=%%a
   
6. )
   
7. 
   
8. cd /d "%~dp0"
   
9. for /F "delims=" %%i in ('%jsline%') do (
   
10.         md "%now:~0,8%-%now:~8,4%_%%i"
    
11. )
    
12. exit
    

复制代码

piazini

回复 15# aloha20200628


    我想在 md "%%~s" 这里加点其他代码。加完执行就提示“(1, 6) Microsoft JScript 编译错误: 条件编译已关闭”

下面是我写的代码内容：

1. 
   
2. 2>1/* ::
   
3. @echo off &for /f "delims=" %%s in ('cscript /nologo /e:jscript "%~f0" ') do (
   
4.     set daytimer_clip="%%~s"
   
5. 
   
6.     set "md_cmd=md %daytimer_clip% "
   
7.     echo [ INFO ] %md_cmd%
   
8.     %md_cmd%
   
9. )
   
10. pause&exit/b */
    
11. h=WSH.createobject('htmlfile'), s=h.parentWindow.clipboardData.getData('text'); if (s) WSH.echo(s);
    
12. WSH.quit();
    

复制代码

aloha20200628

回复 17# piazini

须采用延迟变量，见以下代码...

1. 
   
2. 2>1/* ::
   
3. @echo off &for /f "delims=" %%s in ('cscript /nologo /e:jscript "%~f0" ') do (
   
4.     set daytimer_clip="%%~s"
   
5.     setlocal enabledelayedexpansion
   
6.     set "md_cmd=md !daytimer_clip!"
   
7.     echo [ INFO ] !md_cmd!
   
8.     !md_cmd! 2>nul
   
9.     endlocal
   
10. )
    
11. pause&exit/b */
    
12. h=WSH.createobject('htmlfile'), s=h.parentWindow.clipboardData.getData('text'); if (s) WSH.echo(s);
    
13. WSH.quit();
    

复制代码

亦可不采用延迟变量，见以下代码...

1. 
   
2. 2>1/* ::
   
3. @echo off &for /f "delims=" %%s in ('cscript /nologo /e:jscript "%~f0" ') do (
   
4.     echo [ INFO ] md "%%~s"
   
5.     md "%%~s" 2>nul )
   
6. pause&exit/b */
   
7. h=WSH.createobject('htmlfile'), s=h.parentWindow.clipboardData.getData('text'); if (s) WSH.echo(s);
   
8. WSH.quit();
   

复制代码

piazini

回复 16# 77七

谢谢，可以用

piazini

回复 18# aloha20200628


    单独新建bat脚本放进去可以用，但是代码放到我现有脚本的 某一行，就还是会提示 “(1, 6) Microsoft JScript 编译错误: 条件编译已关闭”
    因为这段代码前面还有些其他代码

aloha20200628

回复 20# piazini

贴出你的源脚本代码即可一目了然了

piazini

回复 21# aloha20200628

下面第19行是你的代码

1. 
   
2. @echo off
   
3. 
   
4. @REM 基础信息
   
5. set file_name=来源-说明-链接.txt
   
6. 
   
7. ::获取当前日期，格式：20190909 https://blog.51cto.com/lexsaints/2806267
   
8. SET year=%date:~0,4%
   
9. SET month=%date:~5,2%
   
10. SET day=%date:~8,2%
    
11. 
    
12. REM SET HH=%time:~0,2%
    
13. if "%time:~0,2%" lss "10" (set HH=0%time:~1,1%) else (set HH=%time:~0,2%)
    
14. SET MM=%time:~3,2%
    
15. 
    
16. :: 年月日_时分秒
    
17. SET date_timer=%year%%month%%day%-%HH%%MM%
    
18. 
    
19. 
    
20. for /f "delims=" %%s in ('cscript /nologo /e:jscript "%~f0" ') do (
    
21.   set clip="%%~s"
    
22.   set date_timer_clip="%date_timer%_%clip%"
    
23.   setlocal enabledelayedexpansion
    
24.   set "md_cmd=md !date_timer_clip!"
    
25.   echo [ INFO ] !md_cmd!
    
26.   !md_cmd! 2>nul
    
27.   endlocal
    
28. )
    
29. pause&exit/b */
    
30. h=WSH.createobject('htmlfile'), s=h.parentWindow.clipboardData.getData('text'); if (s) WSH.echo(s);
    
31. WSH.quit();
    
32. 
    
33. (
    
34. echo %clip%
    
35. echo.& echo.
    
36. echo 链接:
    
37. echo.& echo.& echo.& echo.
    
38. echo.& echo.& echo.& echo.
    
39. )>%date_timer_clip%\%file_name%
    
40. 
    

复制代码

aloha20200628

回复 22# piazini

应改为如下有效的 bat+jscript 混编结构...

1. 
   
2. 2>1/* ::
   
3. 
   
4. @echo off
   
5. @REM 基础信息
   
6. set file_name=来源-说明-链接.txt
   
7. ::获取当前日期，格式：20190909 https://blog.51cto.com/lexsaints/2806267
   
8. SET year=%date:~0,4%
   
9. SET month=%date:~5,2%
   
10. SET day=%date:~8,2%
    
11. REM SET HH=%time:~0,2%
    
12. if "%time:~0,2%" lss "10" (set HH=0%time:~1,1%) else (set HH=%time:~0,2%)
    
13. SET MM=%time:~3,2%
    
14. :: 年月日_时分秒
    
15. SET date_timer=%year%%month%%day%-%HH%%MM%
    
16. 
    
17. for /f "delims=" %%s in ('cscript /nologo /e:jscript "%~f0" ') do (
    
18.   set date_timer_clip="%date_timer%_%%~s"
    
19.   setlocal enabledelayedexpansion
    
20.   set "md_cmd=md !date_timer_clip!"
    
21.   echo [ INFO ] !md_cmd!
    
22.   !md_cmd! 2>nul
    
23.   endlocal
    
24. )
    
25. 
    
26. (
    
27. echo %clip%
    
28. echo.& echo.
    
29. echo 链接:
    
30. echo.& echo.& echo.& echo.
    
31. echo.& echo.& echo.& echo.
    
32. )>%date_timer_clip%\%file_name%
    
33. 
    
34. exit/b */
    
35. h=WSH.createobject('htmlfile'), s=h.parentWindow.clipboardData.getData('text'); if (s) WSH.echo(s);
    
36. WSH.quit();
    

复制代码

piazini

回复 23# aloha20200628

成功了，谢谢

aloha20200628

回复 22# piazini

已订正23楼代码如下》
删除原代码笫17行，原代码第18行末尾的 %clip% 改为 %%~s

Five66

用c简单的弄了个
编译后的64位程序, 将下面的保存为bat, 运行后即可还原

1. 
   
2. more +3 "%~f0" >sclip.txt
   
3. certutil -decode sclip.txt sclip.exe
   
4. pause&exit/b
   
5. -----BEGIN CERTIFICATE-----
   
6. TVqQAAMAAAAEAAAA//8AALgAAAAAAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
   
7. AAAAAAAAAAAAAAAA0AAAAA4fug4AtAnNIbgBTM0hVGhpcyBwcm9ncmFtIGNhbm5v
   
8. dCBiZSBydW4gaW4gRE9TIG1vZGUuDQ0KJAAAAAAAAADu0+b/qrKIrKqyiKyqsois
   
9. iNKJra+yiKyqsomsurKIrDjsjK2rsoisOOyKrauyiKxSaWNoqrKIrAAAAAAAAAAA
   
10. AAAAAAAAAAAAAAAAAAAAAFBFAABkhgMArmrmaAAAAAAAAAAA8AAiAAsCDgAAAgAA
    
11. AAYAAAAAAAAAEAAAABAAAAAAAEABAAAAABAAAAACAAAGAAAAAAAAAAYAAAAAAAAA
    
12. AEAAAAAEAAAAAAAAAwBggQAAEAAAAAAAABAAAAAAAAAAABAAAAAAAAAQAAAAAAAA
    
13. AAAAABAAAAAAAAAAAAAAAHghAAA8AAAAAAAAAAAAAAAAMAAADAAAAAAAAAAAAAAA
    
14. AAAAAAAAAACQIAAAHAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
15. AAAAAAAAAAAAIAAAkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAC50ZXh0AAAA
    
16. 2wEAAAAQAAAAAgAAAAQAAAAAAAAAAAAAAAAAACAAAGAucmRhdGEAAGIDAAAAIAAA
    
17. AAQAAAAGAAAAAAAAAAAAAAAAAABAAABALnBkYXRhAAAMAAAAADAAAAACAAAACgAA
    
18. AAAAAAAAAAAAAAAAQAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
19. AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
20. AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
21. AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
22. AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
23. AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
24. AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
25. AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
26. AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
27. AAAAAAAAAAAAAAAAAAAAAEiB7IgAAAD/FUsQAACJRCRcufX/////FeQPAABIiUQk
    
28. cMdEJEgAAAAASI1UJEhIi0wkcP8VFxAAAIlEJFjHRCRABAAAAIN8JEAAdCUzyf8V
    
29. LBAAAIXAdALrF7noAwAA/xXLDwAAi0QkQP/IiUQkQOvUg3wkQAB1Crj+////6VEB
    
30. AAC5DQAAAP8V6w8AAEiJRCR4SIN8JHgAD4QmAQAASItMJHj/FZcPAABIiUQkaMdE
    
31. JEQAAAAAi0QkREiLTCRoD7cEQYXAdAyLRCRE/8CJRCRE6+ODfCRYAHQmSMdEJCAA
    
32. AAAARTPJRItEJERIi1QkaEiLTCRw/xVlDwAA6bEAAAD/FSIPAABBuAAAQAAz0kiL
    
33. yP8VAQ8AAEiJRCRQSIN8JFAAdRH/FUYPAAD/FeAOAADpngAAAEjHRCQ4AAAAAEjH
    
34. RCQwAAAAAMdEJCgAAEAASItEJFBIiUQkIEG5/////0yLRCRoM9KLTCRc/xXYDgAA
    
35. iUQkYItEJGD/yEjHRCQgAAAAAEyNTCRIRIvASItUJFBIi0wkcP8VbQ4AAP8Vhw4A
    
36. AEyLRCRQM9JIi8j/FW8OAABIi0wkeP8VfA4AAP8Vrg4AAOsN/xWmDgAAuP/////r
    
37. AjPASIHEiAAAAMMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
38. SCIAAAAAAABYIgAAAAAAAGQiAAAAAAAAdCIAAAAAAACAIgAAAAAAAIwiAAAAAAAA
    
39. niIAAAAAAACmIgAAAAAAALYiAAAAAAAAxCIAAAAAAADaIgAAAAAAAOwiAAAAAAAA
    
40. AiMAAAAAAAAAAAAAAAAAADAjAAAAAAAAQiMAAAAAAAAgIwAAAAAAAAAAAAAAAAAA
    
41. AAAAAK5q5mgAAAAADQAAAMQAAACsIAAArAYAAAAAAAAAEAAA2wEAAC50ZXh0JG1u
    
42. AAAAAAAgAACQAAAALmlkYXRhJDUAAAAAkCAAABwAAAAucmRhdGEAAKwgAADEAAAA
    
43. LnJkYXRhJHp6emRiZwAAAHAhAAAIAAAALnhkYXRhAAB4IQAAKAAAAC5pZGF0YSQy
    
44. AAAAAKAhAAAYAAAALmlkYXRhJDMAAAAAuCEAAJAAAAAuaWRhdGEkNAAAAABIIgAA
    
45. GgEAAC5pZGF0YSQ2AAAAAAAwAAAMAAAALnBkYXRhAAABBwIABwERALghAAAAAAAA
    
46. AAAAABIjAAAAIAAAKCIAAAAAAAAAAAAAViMAAHAgAAAAAAAAAAAAAAAAAAAAAAAA
    
47. AAAAAAAAAABIIgAAAAAAAFgiAAAAAAAAZCIAAAAAAAB0IgAAAAAAAIAiAAAAAAAA
    
48. jCIAAAAAAACeIgAAAAAAAKYiAAAAAAAAtiIAAAAAAADEIgAAAAAAANoiAAAAAAAA
    
49. 7CIAAAAAAAACIwAAAAAAAAAAAAAAAAAAMCMAAAAAAABCIwAAAAAAACAjAAAAAAAA
    
50. AAAAAAAAAADSAkdldFN0ZEhhbmRsZQAAFAZXcml0ZUZpbGUAYAJHZXRMYXN0RXJy
    
51. b3IAAEYDSGVhcEFsbG9jAEoDSGVhcEZyZWUAALQCR2V0UHJvY2Vzc0hlYXAAAHsF
    
52. U2xlZXAAQANHbG9iYWxVbmxvY2sAADkDR2xvYmFsTG9jawAAAAZXaWRlQ2hhclRv
    
53. TXVsdGlCeXRlAP4BR2V0Q29uc29sZU1vZGUAAAICR2V0Q29uc29sZU91dHB1dENQ
    
54. AAATBldyaXRlQ29uc29sZVcAS0VSTkVMMzIuZGxsAACSAk9wZW5DbGlwYm9hcmQA
    
55. TQBDbG9zZUNsaXBib2FyZAAAMQFHZXRDbGlwYm9hcmREYXRhAABVU0VSMzIuZGxs
    
56. AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
57. AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
58. AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
59. AAAAAAAAAAAAAAAAAAAAAAAQAADbEQAAcCEAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
60. AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
61. AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
62. AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
63. AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
64. AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
65. AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
66. AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
67. AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
68. AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
69. AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
    
70. -----END CERTIFICATE-----
    
71. 
    

复制代码

c源码, 可自行编译

1. 
   
2. #define UNICODE
   
3. #include<Windows.h>
   
4. #pragma comment(lib, "kernel32")
   
5. #pragma comment(lib, "user32")
   
6. #ifdef _MSC_VER
   
7. #pragma comment(linker,"/entry:the_main /subsystem:console")
   
8. #endif
   
9. 
   
10. int the_main(){
    
11. UINT code_page=GetConsoleOutputCP();
    
12. HANDLE std_out=GetStdHandle(STD_OUTPUT_HANDLE);
    
13. DWORD not_use=0;
    
14. BOOL not_rdc=GetConsoleMode(std_out,&not_use);
    
15. int i=4;
    
16. while(i){
    
17. if(OpenClipboard(NULL))break;
    
18. Sleep(1000);
    
19. i--;
    
20. }
    
21. if(!i)return -2;
    
22. HANDLE cbd=GetClipboardData(CF_UNICODETEXT);
    
23. if(cbd){
    
24. LPTSTR p=(LPTSTR)GlobalLock(cbd);
    
25. unsigned int c=0;
    
26. while(*(p+c))c++;
    
27. if(not_rdc){
    
28. WriteConsoleW(std_out,p,c,NULL,NULL);
    
29. }else{
    
30. void *v=HeapAlloc(GetProcessHeap(),0,4096*1024);
    
31. if(!v){CloseClipboard();return GetLastError();}
    
32. int n=WideCharToMultiByte(code_page,0,p,-1,v,4096*1024,NULL,NULL);
    
33. WriteFile(std_out,v,(DWORD)n-1,&not_use,NULL);
    
34. HeapFree(GetProcessHeap(),0,v);
    
35. }
    
36. GlobalUnlock(cbd);
    
37. CloseClipboard();
    
38. }else{
    
39. CloseClipboard();
    
40. return -1;
    
41. }
    
42. return 0;
    
43. }
    

复制代码

Five66

额, 忘了使用方法了
直接执行sclip.exe就能显示粘贴版内容了
重定向到文本就是sclip.exe > aaa.txt
重定向输出到文件的编码是自适应的, 与chcp代码页一致