Add Edit Search .bat

Discussion forum for all Windows batch related topics.

Moderator: DosItHelp

Post Reply
Message
Author
Willian
Posts: 1
Joined: 09 Dec 2016 13:20

Add Edit Search .bat

#1 Post by Willian » 09 Dec 2016 15:09

Hello friends, I have a question on how to put a field to EDIT my items, someone help me?
Sorry, I'm Brazilian and I had to put it on google translate. Thank you. Follows my .bat code

Code: Select all

@echo Off
mode con cols=60 lines=30

:menuPrin
rem ###Mostra Menu inicial.###
Title Cadastro de Pessoas - Menu Principal
cls
echo  Cadastro de Pessoas
echo.
echo  O que deseja fazer?
echo.
echo.
echo                 1-Cadastrar
echo                 2-Apagar
echo                 3-Pesquisa
echo                 4-Desenvolvedor
echo                 5-Sair
echo.
echo.
set /p "op=Escolha uma opcao: "
 rem ###Validacao para aceitar apenas os valores pre determinados###

if %op% LSS 1 (
echo.
echo ESCOLHA INCORRETA!
echo.
pause
goto menuPrin
)
if %op% GTR 5 (
echo.
echo ESCOLHA INCORRETA!
echo.
pause
goto menuPrin
)
rem ###Fim da validacao para aceitar apenas os valores pre determinados###

if NOT exist codigo.cadp echo 0 > codigo.cadp
rem ###Nesta linha 39 Caso nao exista o arquivo para
rem gravacao e leitura do ultimo codigo cadastrado
rem sera criado o arquivo com codigo zero "0" .###

if %op%==1 set operacao=Cadastrar
if %op%==2 set operacao=Apagar
if %op%==3 set operacao=Pesquisar
if %op%==4 set operacao=Desenvolvedor
if %op%==5 exit

rem ###Cabecalho que sera usado para Cadastrar, Apagar, Pesquisar e Desenvolvedor###.
:tipoOperacao
Title Cadastro de Pessoas - %operacao%
cls
echo  Cadastro de Pessoas - Operacao escolhido: %operacao%
echo.
echo.

if %op%==1 goto Cadastrar
if %op%==2 goto Apagar
if %op%==3 goto Pesquisa
if %op%==4 goto Desenvolvedor
rem ###Fim do cabecalho###

:menuEscolha
cls
echo  Cadastro de Pessoas
echo.
echo.
echo         C-Continuar a %operacao%
echo         M-Menu Principal
echo         S-Sair
echo.
echo.
set /p "escolha=Escolha uma opcao: "
if /I %escolha%==C goto tipoOperacao
if /I %escolha%==M goto menuPrin
if /I %escolha%==S exit

:Cadastrar
set operacao=Cadastrar
set cod=type codigo.cadp

echo Ultimo Codigo Cadastrado
%cod%

rem ###Obtendo dadas para a gravacao###.
echo.
echo.
set /p "codigo=Codigo: "
echo.
set /p "nome=Nome: "
echo.
set /p "endereco=Endereco: "
set /p "numero=Numero: "
set /p "complemento=Complemento: "
set /p "cep=CEP: "
echo.
set /p "telefoneFax=Telefone/Fax: "
set /p "celular=Celular: "
echo.
set /p "cpf=CPF: "
set /p "rg=RG: "
set /p "sexo=Sexo: "
set /p "estadoCivil=Estado Civil: "
echo.
set /p "email=E-mail: "
echo.
set /p "Observacao=Observacao: "
rem ###Fim da obtencao dos dadas.###

rem ###Gravando os dados###
echo %codigo%__NOME: %nome% >> cadastros.cadp
echo %codigo%__ENDERECO: %endereco% >> cadastros.cadp
echo %codigo%__NUMERO: %numero% >> cadastros.cadp
echo %codigo%__COMPLEMENTO: %complemento% >> cadastros.cadp
echo %codigo%__CEP: %cep% >> cadastros.cadp
echo %codigo%__TELEFONE/FAX: %telefoneFax% >> cadastros.cadp
echo %codigo%__CELULAR: %celular% >> cadastros.cadp
echo %codigo%__CPF: %cpf% >> cadastros.cadp
echo %codigo%__RG: %rg% >> cadastros.cadp
echo %codigo%__SEXO: %sexo% >> cadastros.cadp
echo %codigo%__ESTADO CIVIL: %estadoCivil% >> cadastros.cadp
echo %codigo%__E-MAIL: %email% >> cadastros.cadp
echo %codigo%__OBSERVACAO: %observacao% >> cadastros.cadp
echo.  >> cadastros.cadp
echo. %codigo% > codigo.cadp
rem ###Fim da gravacao dos dados###
goto menuEscolha

:Apagar
set cod=type codigo.cadp
echo Ultimo Codigo Cadastrado
%cod%
echo.
echo.

set operacao=Apagar
set /p "apagar=Codigo que deseja apagar: "
find /I /V "%apagar%__" cadastros.cadp > cadastros2.cadp
echo.
echo.
pause
del cadastros.cadp
rename cadastros2.cadp cadastros.cadp
find /I /V "cadastros.cadp" cadastros.cadp > cadastros2.cadp
del cadastros.cadp
rename cadastros2.cadp cadastros.cadp
goto menuEscolha

:Pesquisa
set cod=type codigo.cadp
echo Ultimo Codigo Cadastrado
%cod%
echo.
echo.
set /P "codigoPesq=Codigo para pesquisar: "
if exist cadastros.cadp find /I "%codigoPesq%__" cadastros.cadp
echo.
pause
set operacao=Pesquisar
goto menuEscolha

:Desenvolvedor
echo.
echo.
echo ###########################################################
echo #                                                         #
echo # Cadastro de Pessoas eh um programa livre para cadastrar #
echo # pessoas e seus respectivos dados, produzido por Leomar  #
echo # Ilario como parte dos estudos do MS-DOS com arquivos em #
echo # lote desenvolvida para o Blog Cabeca Nerd.              #
echo #                                                         #
echo #                                                         #
echo # Contato desenvolvedor: blogcabecanerd@gmail.com         #
echo ###########################################################
echo.
echo.
echo.
echo.
echo.
pause
cls
goto menuEscolha
Attachments
CadastroV5.rar
(1.41 KiB) Downloaded 144 times

Squashman
Expert
Posts: 4465
Joined: 23 Dec 2011 13:59

Re: Add Edit Search .bat

#2 Post by Squashman » 09 Dec 2016 15:19

What is your question?

Post Reply