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