批处理中如何直接执行vbs开方计算代码并将值传递给批处理变量

winload

比如：
@echo off
Setlocal EnableDelayedExpansion
set a=3
set b=7
vbs代码：c=sqr(a^2+b^2)
echo %c%
pause
如何直接在批处理中执行上面这段vbs代码并变量 c 可以直接在批处理中引用

went

1. @echo off
   
2. set "a=3"
   
3. set "b=7"
   
4. set "code=CreateObject("Scripting.FileSystemObject").GetStandardStream(1).Write(sqr(%a%^2+%b%^2))(close)"
   
5. for /f "delims=" %%i in ('mshta "vbscript:%code%"') do set "c=%%i"
   
6. echo %c%
   
7. pause&exit

复制代码

winload

回复 2# went


    太感谢了！问题已解决！