給非隱藏文件添加標志的批處理為何提示有不是內(nèi)部或外部命令

@echo off&setlocal ENABLEDELAYEDEXPANSION&chcp 936>nul
rem 給當前目錄內(nèi)的非隱藏文件添加ok標志 20:53 -6-12
rem （文件名含有“證券清算文件.txt”字符串的，擴展名為.ok的文件 不進行處理）
(
echo dt = CreateObject(scripting.filesystemobject^).GetFile(Wscript.Arguments(0^)^).DateLastModified
echo Wscript.Echo Split(dt,  ^)(0^) ^& | ^& Split(dt,  ^)(1^)
)>%tmp%getime.vbs
set lf=^
:: 上面必須空兩行
for /f %%a in ('copy/z %~s0 nul')do set cr=%%a
for /f tokens=1-2 delims== %%a in ('set $out 2^>nul')do set %%a=
for /f delims= %%a in (
%= dir命令后面跟文件通配符 =%
' dir/a-d/b *.* 2^>nul ^|find /v 證券清算文件.txt '
)do if %%~nxa neq %~nx0 if %%~xa neq .ok (
set nxa=%%~nxa
set fa=%%~fa
for /f tokens=1-4 delims=-| %%A in (
'cscript //nologo %tmp%getime.vbs !fa!'
)do set y=%%A&set m=0%%B&set d=0%%C&set tm=0%%D
set ymd=!y!!m:~-2!!d:~-2!
for %%p in ($out!ymd!)do set %%p=!%%p!%%~nxa|%%~za|!ymd!|!tm:~-8!n
set file=!ymd!證券清算文件.txt
set/p=<nul>!nxa!.ok
set/p=<nul>!file!.ok
echo !nxa!&echo ................................... OK^^!
)
for /f tokens=1-2 delims== %%a in ('set $out')do (
set s=%%b&set file=%%a
for %%f in (!cr!!lf!)do set/p=!s:n=%%~f!<nul>!file:*$out=!證券清算文件.txt
)
pause
nclick="copycode($('code0'));">復制代碼