[文本处理] 批处理怎样获取某字符串在另一字符串中出现的位置

 
@echo off&setlocal enabledelayedexpansion
set /p sStrQ=请输入你想查的字符串:
set iNum=0
set "StrQ=!sStrQ!*"
call :GetNum
set Line=0
for /f "delims=" %%i in ('findstr /n .* 1.txt') do (
set /a Line=!Line!+1
set sStrL=%%i 
set sStrL1=!sStrL:%sStrQ%=!
if not "!sStrL1!"=="!sStrL!" (
set sStrLp=!sStrL:%sStrQ%=#!
set iPnum=1
call :GetPosition
call :Echo 
)
)
:GetNum
set sStr=!StrQ:~0,1!
set StrQ=!StrQ:~1!
if not "!sStr!"=="*" (set /a iNum=!iNum!+1) else (goto :eof)
goto :GetNum
:GetPosition
set sStrLp1=!sStrLp:~0,1!
set sStrLp=!sStrLp:~1!
if not "!sStrLp1!"=="#" (set /a iPnum=!iPnum!+1) else (goto :eof)
goto :GetPosition
:Echo
echo 此字符串出现在第!Line!行第!iPnum!位置.
echo\&echo\
set EndL=iPnum!+!iNum!
echo 此字符串结束在!EndL!位置
echo\&echo\
echo 任意键继续
pause>nul
goto :eof
 
 
 
复制代码

@echo off
setlocal enabledelayedexpansion
set "test=1234568as7df55safd28ieutksadfadfkdeisuASksdf"
set num=0

:main
set input=
set /p input=  请输入要查找的字符或字符串: 
if not defined input goto main
call :ie
pause&goto :eof

:ie
for /l %%a in (0,1,200) do (
        if "!test:~%%a,1!"=="" (
                set /a num+=1
                if "!input:~%num%,1!"=="" (
                        goto :eof
                    ) else (
                        goto ie
                    )
            )
        if "!input:~%num%,1!"=="!test:~%%a,1!" (
                set /a _num=%%a+1
                call echo  字符"!input:~%num%,1!"在%%_num%%位置
                set _num=
            )
    )
echo.
goto :eof
复制代码

@echo off&setlocal enabledelayedexpansion
set var=fsafsfafafsdfaf
echo %var%
for /l %%i in (1 1 100) do (
  if defined var (
     if /i "!var:~0,1!"=="a" set wei=!wei! %%i
	 set var=!var:~1!
))
echo\&echo a出现的位置是 %wei%
pause>nul
复制代码

@echo off&setlocal enabledelayedexpansion
set var=123abc567abcldfkjgjfjdabcadooooslkfjafjaaboocdsjfabc7111222k
echo  请输入要查找的字符串,如: abc
set /p sur= 
if /i "!sur!"=="a" (set var=!var!b) else set var=!var!a
set cscs=0
cls
call :sss sur ci
call :sss var zong
:lis
  call set str=%%var:*!sur!=%%
  call set str2=%%var:!sur!=%%
  if "!var!"=="!str2!" goto ok 
  set /a cscs+=1
  call :sss str wei
  set /a max=zong-wei,q=max-ci+1
  set wz=!wz! !q!-!max!位
  set var=!str!&set y=y
goto lis
:sss
  set %2=0
  for /l %%i in (0 1 200) do (
     if not "!%1:~%%i,1!"=="" set /a %2+=1
  )
goto :eof
:ok
  echo  字符串 !sur! 共出现 !cscs! 次
  if not defined y goto end
  echo\&echo  分别位于
  echo\&echo !wz!
:end
pause>nul
复制代码