Bat desenvolver bat windows ler arquivo

[Antonio Baptista]

Bom dia .

Preciso ler um arquivo .txt pesquisar  na posicao da linha 28a37 se tiver conteudo imprimir a posicao 16a24

exemplo:

 

00010008000000012345678999910/10/2010
000233779988777987654321888
00038877996655598765432977721/10/2012

 

o resultado seria

123456789
987654329

 

Grato

Rogerio

[ricardo_br]

Qual o objetivo disso? É só para mostrar o resultado na tela ou salvar em algum lugar?

[Antonio Baptista]

@ricardo_br Boa tarde Ricardo,  ir salvando as saidas em um arquivo

[ricardo_br]

Veja se é isso:

 

 

@echo off

if not "%~x1"==".txt" exit
set "Arquivo=%~n1"
set "Extencao=%~x1"

for /f "usebackq delims=" %%a in ("%~1") do call :Editar "%%~a"
start "" notepad.exe "%Arquivo%_Resultado%Extencao%"
exit

:Editar
set "Linha=%~1"
if not [%Linha:~27,9%]==[] for %%a in ("%Linha:~15,9%") do >>"%Arquivo%_Resultado%Extencao%" echo %%~a
goto :EOF

 

 

[Antonio Baptista]

20 minutos atrás, ricardo_br disse:

Veja se é isso:

 

 

@echo off

if not "%~x1"==".txt" exit
set "Arquivo=%~n1"
set "Extencao=%~x1"

for /f "usebackq delims=" %%a in ("%~1") do call :Editar "%%~a"
start "" notepad.exe "%Arquivo%_Resultado%Extencao%"
exit

:Editar
set "Linha=%~1"
if not [%Linha:~27,9%]==[] for %%a in ("%Linha:~15,9%") do >>"%Arquivo%_Resultado%Extencao%" echo %%~a
goto :EOF

 

 

Ricardo é isso mesmo que preciso muito obrigado , voce é 10

[Antonio Baptista]

Ricardo Boa noite.

Estava testando o codigo a principio funcionou , mas quando meu arquivo tem dados apos os brancos ele não pega. se conseguir dar uma olhada te agradeco

exemplo

00010008000000012345678999910/10/2010
000233779988777987654321888                  001
00038877996655598765432977721/10/2012

 

Preciso ler um arquivo .txt pesquisar  na posicao da linha 28a37 se tiver conteudo imprimir a posicao 16a24

exemplo:

 

00010008000000012345678999910/10/2010
000233779988777987654321888
00038877996655598765432977721/10/2012

 

o resultado seria

123456789
987654329

 

Grato

Rogerio

[ricardo_br]

@Antonio Baptista No caso o bat funciona como o esperado pois no caso que você citou:

000233779988777987654321888                  001

 

Não tem nada (só espaços) entre a posição 28 e 37 portanto o bat ignora essa linha, não era isso que você queria?

 

[Antonio Baptista]

33 minutos atrás, ricardo_br disse:

@Antonio Baptista No caso o bat funciona como o esperado pois no caso que você citou:

000233779988777987654321888                  001

 

Não tem nada (só espaços) entre a posição 28 e 37 portanto o bat ignora essa linha, não era isso que você queria?

 

 

Entao sim tera os espacos em branco , mas depois dos espacos tera outros dados , por isso limitei os espacos , me parece que apos os brancos ele se perde se tiver mais dados

[ricardo_br]

tem razão vou dar uma olhada aqui.

 

Veja agora: 

 

@echo off

if not "%~x1"==".txt" exit
set "Arquivo=%~n1"
set "Extencao=%~x1"

for /f "usebackq delims=" %%a in ("%~1") do call :Editar "%%~a"
if exist "%Arquivo%_Resultado%Extencao%" start "" notepad.exe "%Arquivo%_Resultado%Extencao%"
exit

:Editar
set "Linha=%~1"
set "Vazio=%Linha:~27,9%"
if not "%Vazio: =%"=="" for %%a in ("%Linha:~15,8%") do >>"%Arquivo%_Resultado%Extencao%" echo %%~a
goto :EOF

 

[Antonio Baptista]

11 horas atrás, ricardo_br disse:

tem razão vou dar uma olhada aqui.

 

Veja agora: 

 

@echo off

if not "%~x1"==".txt" exit
set "Arquivo=%~n1"
set "Extencao=%~x1"

for /f "usebackq delims=" %%a in ("%~1") do call :Editar "%%~a"
if exist "%Arquivo%_Resultado%Extencao%" start "" notepad.exe "%Arquivo%_Resultado%Extencao%"
exit

:Editar
set "Linha=%~1"
set "Vazio=%Linha:~27,9%"
if not "%Vazio: =%"=="" for %%a in ("%Linha:~15,8%") do >>"%Arquivo%_Resultado%Extencao%" echo %%~a
goto :EOF

 

 

Ricardo Deu certo muito obrigado pelo APOIO a proposito você tem cursos , ou pagina para te seguir ?

Abco

[ricardo_br]

@Antonio Baptista Tem o meu canal no youtube: https://www.youtube.com/user/ricardobohner/videos