Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- @echo off
- title Kontakt Manager
- cd C:\
- md Kontakte
- cd C:\Kontakte
- color a
- :main
- @echo off
- cls
- color b
- echo.
- echo %date% by Shasa2308
- echo --------------------------------
- echo.
- echo Weahle die Ziffern fuer das Programm.
- echo.
- echo 01 Neuen Kontakt erstellen
- echo 02 Alle Kontakte anzeigen
- echo 03 Ganzen Ordner anzeigen
- set /p klick=
- if %klick%==01 goto neu
- if %klick%==02 goto anzeigen
- if %klick%==03 goto ordner zeigen
- exit
- :neu
- cd C:\KontaktManager
- cls
- echo.
- echo Kontakte werden nur bei diesen Gruppen gespeichert.
- echo Freunde; Firmen; Familie; Gesundheit
- echo.
- set /p a=Gruppe:
- set /p b=Vorname:
- set /p c=Nachname:
- set /p d=Telefon:
- set /p e=Handy:
- set /p f=e-mail:
- set /p g=Bundesland:
- set /p h=Stadt:
- set /p i=Postleitzahl:
- set /p j=Strasse:
- if %a%==Freunde goto Freunde
- if %a%==Firmen goto Firmen
- if %a%==Familie goto Familie
- if %a%=Gesundheit goto Gesundheit
- :Freunde
- echo Gruppe: %a% >> Freunde.txt
- echo Vorname: %b% >> Freunde.txt
- echo Nachname: %c% >> Freunde.txt
- echo Telefon: %d% >> Freunde.txt
- echo Handy: %e% >> Freunde.txt
- echo e-mail: %f% >> Freunde.txt
- echo Bundesland: %g% >> Freunde.txt
- echo Stadt: %h% >> Freunde.txt
- echo Postleitzahl %i% >> Freunde.txt
- echo Strasse %j% >> Freunde.txt
- echo ------------------------------- >> Freunde.txt
- pause >NUL
- goto main
- :Firmen
- echo Gruppe: %a% >> Firmen.txt
- echo Vorname: %b% >> Firmen.txt
- echo Nachname: %c% >> Firmen.txt
- echo Telefon: %d% >> Firmen.txt
- echo Handy: %e% >> Firmen.txt
- echo e-mail: %f% >> Firmen.txt
- echo Bundesland: %g% >> Firmen.txt
- echo Stadt: %h% >> Firmen.txt
- echo Postleitzahl %i% >> Firmen.txt
- echo Strasse %j% >> Firmen.txt
- echo ------------------------------- >> Firmen.txt
- pause >NUL
- goto main
- :Familie
- echo Gruppe: %a% >> Familie.txt
- echo Vorname: %b% >> Familie.txt
- echo Nachname: %c% >> Familie.txt
- echo Telefon: %d% >> Familie.txt
- echo Handy: %e% >> Familie.txt
- echo e-mail: %f% >> Familie.txt
- echo Bundesland: %g% >> Familie.txt
- echo Stadt: %h% >> Familie.txt
- echo Postleitzahl %i% >> Familie.txt
- echo Strasse %j% >> Familie.txt
- echo ------------------------------- >> Familie.txt
- pause >NUL
- goto main
- :Gesundheit
- echo Gruppe: %a% >> Gesundheit.txt
- echo Vorname: %b% >> Gesundheit.txt
- echo Nachname: %c% >> Gesundheit.txt
- echo Telefon: %d% >> Gesundheit.txt
- echo Handy: %e% >> Gesundheit.txt
- echo e-mail: %f% >> Gesundheit.txt
- echo Bundesland: %g% >> Gesundheit.txt
- echo Stadt: %h% >> Gesundheit.txt
- echo Postleitzahl %i% >> Gesundheit.txt
- echo Strasse %j% >> Gesundheit.txt
- echo ------------------------------- >> Gesundheit.txt
- pause >NUL
- goto main
- :anzeigen
- cls
- echo.
- echo Freunde; Firmen; Familie; Gesundheit
- echo.
- echo Gebe den Gruppennamen ein.
- set /p klick=
- if %klick%==Freunde goto Freundeshow
- if %klick%==Firmen goto Firmenshow
- if %klick%==Familie goto Familieshow
- if %klick%==Gesundheit goto Gesundheitshow
- :Freundeshow
- cls
- TYPE Freunde.txt
- pause >NUL
- goto main
- :Firmenshow
- cls
- TYPE Firmen.txt
- pause >NUL
- goto main
- :Familienshow
- cls
- TYPE Familie.txt
- pause >NUL
- goto main
- :Gesundheitshow
- cls
- TYPE Gesundheit.txt
- pause >NUL
- goto main
- :ordner zeigen
- cls
- start C:\Kontakte
- pause >NUL
- goto main
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement