Variablen aus Txt datei erstellen

@echo off
:start
@echo off

set Speicherort=%1%\\\SERVER\001 Kunststoff-ServerDisketten_Sicherung\

@echo Geben Sie den Namen des Kundens an bei Doppelnamen untersrich verwenden: Beispiel: Sedus_Boettner
@echo off 
set /p Kunde=
@echo Genem Sie die Artikelnummer bzw Artikelbezeichnung und Werkzeugnummer ein, falls nicht vorhanden tippen Sie bitte 0 ein: Beispiel 992008_0 (Artikelnummer/ Artikelbezeichnung_Werkzeugnummer)
@echo off
set /p Werkzeug=
@echo Geben Sie die Maschine an auf welcher die Diskette erstellt wurde. Achten Sie dabei auf die Einhaltung der Namen: 35to, 75to, 125to, 170to, 175to, 250to, 330to, 420to.
@echo off
set /p Maschine=

@echo off
set count=0
for %%i in (A:\*) do set /a count+=1
if "%count%"=="0" goto Fehler1  
goto Kopier

:Kopier
mkdir \\SERVER\001 Kunststoff-ServerDisketten_Sicherung\%Kunde%\%Werkzeug%\%Maschine%\%date%\
xcopy A: \\SERVER\001 Kunststoff-ServerDisketten_Sicherung\%Kunde%\%Werkzeug%\%Maschine%\%date%\



@echo off
set count=0
for %%i in (\\SERVER\001 Kunststoff-ServerDisketten_Sicherung\%Kunde%\%Werkzeug%\%Maschine%\%date%\*) do set /a count+=1
if "%count%"=="0" goto Fehler  
goto Erfolg

:Erfolg

echo msgbox"Ihre Diskette wurde erfolgreich übertragen",vbInformation , "Diskettenstatus"> %temp%\msg.vbs   

%Temp%\msg.vbs 

erase %temp%\msg.vbs

goto Ende


:Fehler

echo msgbox"Ihre Diskette wurde nicht übertragen",vbInformation , "Diskettenstatus"> %temp%\msg.vbs   

%Temp%\msg.vbs 

erase %temp%\msg.vbs

goto Ende

:Fehler1
echo msgbox"Ihre Diskette wurde nicht übertragen da keine Diskette vorhanden ist",vbInformation , "Diskettenstatus"> %temp%\msg.vbs   

%Temp%\msg.vbs 

erase %temp%\msg.vbs

goto Ende

:Ende

Exit

Goto Indexssuche
:Ende
@echo Der Prozess ist jetzt beendet, Sie können das Programm nun beenden
Pause
@echo off
:Indexerweiterung
:Indexssuche
@echo Geben Sie den gesuchten Kundennamen ein
@echo off
set /P wort=Suche nach Kunde:
find /I "%wort%" logbuch.txt  

if errorlevel 1 GOTO Kundeanlegen

if errorlevel 0 echo Bitte wählen Sie nun das Entsprechnde Werkzeug aus der Liste aus oder Suchen Sie per Eingabe
goto Werkzeugliste


goto Ende

:Kundeanlegen
@echo Ihr Kunde wurde nicht gefunden, Sie können nun einen neuen Kunden anlegen Oder X drücken um das Programm zu verlassen.
@echo Geben Sie den Namen des Kundens an bei Doppelnamen untersrich verwenden: Beispiel: Sedus_Stoll
@echo off 
set /p Kundeneu=
echo >> %Kundeneu%.txt
@echo 
Pause

:Werkzeugliste 
@echo Hier findet sich die Suchroutine für die Werkzeugabfrage
Rem wertabfrage(dateispeicherortabfgrage aus der datei logbuch.txt)für die entprechende Kundenkennung
Rem wenn dateiabfrage erfolgreich dann zeige die Datei als Liste an oder ermögliche dem Nutzer die Datei nach einem Namem/Nummer zu durchsuchen
for /f "tokens=1,* delims=:" %%i in ('findstr /n  $ /Kunden/%wort%.txt') do @(   
02.
        for /L %%a in (2,2,6) do @if %%i==%%a @echo %%j 
03.
)




Pause

 \\SERVER\001 Kunststoff-ServerDisketten_Sicherung\%Kunde%\%Werkzeug%\%Maschine%\%date%\