如题：发一个鄙人十几年来查看脚本存在变量的便捷方法，，，，
该方法是本人自创的，也一直是自己在用，前段时间指导员工脚本错误写法的时候，在他面前展示过。
想来也不是什么高明方法，自己却藏私了那么久确实不该，，，，
-----------废话完，抛步骤---------------
无论什么系统版本的WIN 系统，只要在CMD 窗口下打然后手动编辑 ClsWin.Bat
把每一行，，= 号后面的数据全部清除，，再每一行的前面加上 Set ，，
USERDOMAIN_ROAMINGPROFILE=H027
USERNAME=Administrator
USERPROFILE=C:\Users\Administrator
windir=C:\Windows
，，，，
，，，，，
，，，，，，
----------改成----------
Set USERDOMAIN_ROAMINGPROFILE=
Set USERNAME=
Set USERPROFILE=
Set windir=
Set ，，，，
Set ，，，，，
Set ，，，，，，
--------然后保存，，首行加不加 @Echo off 和尾行加不加 Goto,:Eof 无所谓，反正是调用的，，
用法很简单，，，
在需要调试查看变量的脚本前先调用 Call,路径\ClsWin.Bat
该脚本里存在的系统变量就会被清除干净（该调用只适用当前脚本，不影响系统和其他脚本），，
需要查看脚本变量是否出错或存在多个未知变量无法确定的时候只需要适时加入，，，
Set
Pause>Nul
即可查看当前脚本的所有变量，快捷切方便，连 ECHO.%变量名称% & Pause>Nul 都不用打，输出变量为本文只要Set>本文.TXT即可，，，，，
-----------------以下----获取系统密匙.BAT---脚本为例------ @echo off
- SetLOCAL ENABLEDELAYEDEXPANSION
- For /f "tokens=3" %%i in ('reg query "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "DigitalProductId" 2^>nul') do set DigitalProductId=%%i
- If "!DigitalProductId!"=="" ( Set Key=未获取 )
- Set Row=-1
- For /l %%i in (0,2,327) do (
- Set /a Row+=1
- Set F=!DigitalProductId:~%%i,2!
- Set /a Id!Row!=0X!F:~0,1!*16+0X!F:~1,1!
- )
- Set /a Win10=!Id66!/6^&1
- Set /a Id66=(!Id66!^&0XF7)^|((!Win10!^&2)*4)
- Set Maps=BCDFGHJKMPQRTVWXY2346789
- For /l %%i in (24 -1 0) do (
- Set Current=0
- For /l %%j in (14 -1 0) do (
- Set /a Current*=256
- Set /a J=%%j+52
- Set /a Current=Id!J!+!Current!
- Set /a Id!J!=!Current!/24
- Set /a Current=!Current!%%24
- )
- For /l %%k in (0,1,24) do (
- If !Current!==%%k (
- Set KeyTemp=!Maps:~%%k,1!!KeyTemp!
- )
- )
- Set Last=!Current!
- )
- If !Win10!==1 (
- For /l %%i in (0,1,24) do set keypart1=!KeyTemp:~1,%%i!
- Set Insert=N
- For /l %%i in (1,1,24) do (
- Set L=!L!!KeyTemp:~%%i,1!
- If %%i==!Last! Set L=!L!!Insert!
- )
- Set KeyTemp=!L!
- If !Last!==0 Set KeyTemp=!Insert!!KeyTemp!
- )
- Set 系统密匙=!KeyTemp:~0,5!-!KeyTemp:~5,5!-!KeyTemp:~10,5!-!KeyTemp:~15,5!-!KeyTemp:~20,5!
- :::--------这里是调用区----------------------------
- Call,ClsWin.Bat
- Set
- Pause>Nul
Current=4
DigitalProductId=A40000000300000030303333312D31303030302D30303030312D414131323900EF0C00005B54485D5831392D3938373935000000EF0C10000000343DC5394EBD6E2F090000000000225C9E68915B29CF03000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000BD25BB3
F=B3
Id0=164
Id1=0
Id10=51
Id100=0
Id101=0
Id102=0
Id103=0
Id104=0
Id105=0
Id106=0
Id107=0
Id108=0
Id109=0
Id11=51
Id110=0
Id111=0
Id112=0
Id113=0
Id114=0
Id115=0
Id116=0
Id117=0
Id118=0
Id119=0
Id12=49
Id120=0
Id121=0
Id122=0
Id123=0
Id124=0
Id125=0
Id126=0
Id127=0
Id128=0
Id129=0
Id13=45
Id130=0
Id131=0
Id132=0
Id133=0
Id134=0
Id135=0
Id136=0
Id137=0
Id138=0
Id139=0
Id14=49
Id140=0
Id141=0
Id142=0
Id143=0
Id144=0
Id145=0
Id146=0
Id147=0
Id148=0
Id149=0
Id15=48
Id150=0
Id151=0
Id152=0
Id153=0
Id154=0
Id155=0
Id156=0
Id157=0
Id158=0
Id159=0
Id16=48
Id160=11
Id161=210
Id162=91
Id163=179
Id17=48
Id18=48
Id19=45
Id2=0
Id20=48
Id21=48
Id22=48
Id23=48
Id24=49
Id25=45
Id26=65
Id27=65
Id28=49
Id29=50
Id3=0
Id30=57
Id31=0
Id32=239
Id33=12
Id34=0
Id35=0
Id36=91
Id37=84
Id38=72
Id39=93
Id4=3
Id40=88
Id41=49
Id42=57
Id43=45
Id44=57
Id45=56
Id46=55
Id47=57
Id48=53
Id49=0
Id5=0
Id50=0
Id51=0
Id52=0
Id53=0
Id54=0
Id55=0
Id56=0
Id57=0
Id58=0
Id59=0
Id6=0
Id60=0
Id61=0
Id62=0
Id63=0
Id64=0
Id65=0
Id66=0
Id67=0
Id68=0
Id69=0
Id7=0
Id70=0
Id71=0
Id72=34
Id73=92
Id74=158
Id75=104
Id76=145
Id77=91
Id78=41
Id79=207
Id8=48
Id80=3
Id81=0
Id82=0
Id83=0
Id84=0
Id85=0
Id86=0
Id87=0
Id88=0
Id89=0
Id9=48
Id90=0
Id91=0
Id92=0
Id93=0
Id94=0
Id95=0
Id96=0
Id97=0
Id98=0
Id99=0
Insert=N
J=52
keypart1=W269WFGWXYVC9B4J6C9T83GX
KeyTemp=W269NWFGWXYVC9B4J6C9T83GX
L=W269NWFGWXYVC9B4J6C9T83GX
Last=4
Maps=BCDFGHJKMPQRTVWXY2346789
Row=163
Win10=1
系统密匙=W269N-WFGWX-YVC9B-4J6C9-T83GX
------------诸多变量存在------------
这个方法适用很多脚本调试查看，，灵活运用希望能提升各位编写脚本的水平吧！，呵，，，在各位大神面前献丑了，小小取巧方式勿笑，， |
发表于 2025-8-14 23:20:16