中国DOS联盟

@echo off
set/p input=输入:
set str=%input%

:loop
set str=%str:~1%
set/a n+=1
if not "%str%" == "" goto loop

for /f "skip=1 delims=:" %%i in ('^(echo "%input%"^&echo.^)^|findstr /o ".*"') do set/a l=%%i-5
if %n% == %l% (
  echo 字符串 %input% 不包含双字节字符
) else (
  echo 字符串 %input% 包含双字节字符
)
pause>nul
exit

@echo off
set/p input=:

>ascw.vbs echo Wscript.echo ascw(wscript.arguments(0))

for /f %%i in ('"cscript //nologo ascw.vbs %input%"') do (
  if %%i leq 255 (
    echo %input% 不是双字节字符
  ) else (
    echo %input% 是双字节字符
  )
)
pause

@echo off
set/p input=:

>ascw.vbs echo str=wscript.arguments(0):result="不":for i=1 to len(str):if ascw(mid(str,i,1))^>255 then:result="":exit for:end if:next:Wscript.echo result^&"包含双字节字符"

for /f %%i in ('"cscript //nologo ascw.vbs %input%"') do echo %input% %%i
pause