MAm sprawe tego typu mialem batche pod 98 i tam dzialalo np polecnie COICE ale udalo mi sie zalatwic to za sprawa zmiennych ale teraz program mi sie zapetla

pomorzczie zeby nie robil tej funkcji drugi raz

to batch:

ECHO OFF
:START
CLS
ECHO.
ECHO.
ECHO.
ECHO WYBIERZ KIERUNEK KOPIOWANIA:
ECHO.
ECHO 9 – kopia z BIURA na KLUCZYK
ECHO 8 – kopia z KLUCZYKA do NOTEBOOKA
ECHO 7 – kopia z NOTEBOOKA na KLUCZYK
ECHO 6 – kopia z KLUCZYKA do BIURA
echo.
ECHO 5 – kopia z PAVOXU na KLUCZYK
ECHO 4 – kopia z KLUCZYKA do NOTEBOOKA
ECHO 3 – kopia z NOTEBOOKA na KLUCZYK
ECHO 2 – kopia z KLUCZYKA do PAVOXU
ECHO.
ECHO 1 – rezygnacja



set /p DRIVENUM=Wcisnij klawisz z listy (1–5):

If %DRIVENUM% EQU 9 goto BIUROK
If %DRIVENUM% EQU 8 goto KLUCZYKN1
If %DRIVENUM% EQU 7 goto N1KLUCZYK
If %DRIVENUM% EQU 6 goto KBIURO
If %DRIVENUM% EQU 5 goto PAVOXK
If %DRIVENUM% EQU 4 goto KLUCZYKN2
If %DRIVENUM% EQU 3 goto N2KLUCZYK
If %DRIVENUM% EQU 2 goto KPAVOX
IF %DRIVENUM% EQU 1 goto KONIEC

:KPAVOX

COPY E:\KH2005\PAVOX\*.* H:\2005\PAVOX\*.*

:N2KLUCZYK

XCOPY C:\KH2005\PAVOX E:\KH2005\PAVOX /s /e

:N2KLUCZYK

XCOPY E:\KH2005\PAVOX C:\KH2005\PAVOX /s /e

:PAVOXK

COPY H:\KH2005\PAVOX\*.* C:\2005\PAVOX\*.*

:KBIURO


XCOPY E:\KH2005\COMPANA P:\KH2005\COMPANA /s /e
XCOPY E:\KH2005\GAMBITEX P:\KH2005\GAMBITEX /s /e
XCOPY E:\KH2005\SERENA P:\KH2005\SERENA /s /e
XCOPY E:\KH2005\TECHPLAS P:\KH2005\TECHPLAS /s /e

:N1KLUCZYK


XCOPY C:\KH2005\COMPANA E:\KH2005\COMPANA /s /e
XCOPY C:\KH2005\GAMBITEX E:\KH2005\GAMBITEX /s /e
XCOPY C:\KH2005\SERENA E:\KH2005\SERENA /s /e
XCOPY C:\KH2005\TECHPLAS E:\KH2005\TECHPLAS /s /e

:KLUCZYKN1

XCOPY E:\KH2005\COMPANA C:\KH2005\COMPANA /s /e
XCOPY E:\KH2005\GAMBITEX C:\KH2005\GAMBITEX /s /e
XCOPY E:\KH2005\SERENA C:\KH2005\SERENA /s /e
XCOPY E:\KH2005\TECHPLAS C:\KH2005\TECHPLAS /s /e

:BIUROK

XCOPY P:\KH2005\COMPANA E:\KH2005\COMPANA /s /e
XCOPY P:\KH2005\GAMBITEX E:\KH2005\GAMBITEX /s /e
XCOPY P:\KH2005\SERENA E:\KH2005\SERENA /s /e
XCOPY P:\KH2005\TECHPLAS E:\KH2005\TECHPLAS /s /e