maffi
Goto Top

Erster buchstabe aus einer Variable

Hallo liebe Community

ich habe ein kleines Archivierungsprogramm geschrieben, das wie folgt aussieht
setlocal 

set ordner=leer
set zeile=0
set limit=3

dir f:\krankenhaus\programm\verarbeiten /b > f:\krankenhaus\programm\rar.txt
findstr /n .* f:\krankenhaus\programm\rar.txt > f:\krankenhaus\programm\n_rar.txt

:anfang

set /a zeile=%zeile%+1

if %zeile%==%limit% goto weiter 
for /f "tokens=2 delims=:" %%i in ('findstr "%zeile%:" f:\krankenhaus\programm\n_rar.txt') do set "ordner=%%i"  
c:
cd programme\winrar\

rar a -o+ -s -ilog -r -m5 -y "F:\Krankenhaus\Archiv\%ordner%.rar" "F:\Krankenhaus\Programm\verarbeiten\%ordner%\*.*"  
if exist F:\Krankenhaus\Archiv\Rar.Archiv.log echo %name% wurde archiviert >> Rar.Archiv.log
if not exist F:\Krankenhaus\Archiv\Rar.Archiv.log echo %name% wurde archiviert > Rar.Archiv.log
goto anfang

:weiter


der inhalt der n_rar.txt sieht so aus
1:Gestmann_Otto_30.12.2008_111959
2:Cestmann_Otto_30.12.2008_111959
3:Mestmann_Otto_30.12.2008_111959
4:Nachname_Dr. Vorname

momentan werde alle archive in einen Ordner gepackt, (f:\krankenhaus\Archiv) ich möchte gerne in dem krankenhaus\archiv eine Ordner Struktur anlegen von a-z , ich müsste also aus 1:Gestmann_Otto_30.12.2008_111959 den ersten buchstaben G auslesen, und den nach möglichkeit in eine variable packen, um ihm den pfad F:\Krankenhaus\Arch\g\ zuzuweisen bzw F:\Krankenhaus\Arch\%variable%\.

grüße
Manuel

Content-ID: 106010

Url: https://administrator.de/contentid/106010

Ausgedruckt am: 22.11.2024 um 15:11 Uhr

GhostScripter
GhostScripter 14.01.2009 um 17:22:13 Uhr
Goto Top
Moin,

hättetst Du das in Entwicklung » Programmiersprachen » Batch & Shell geschrieben, wäre der Beitrag sicher besser beantwortet worden.

aber mal ein ungetesteter Schnellschuss:
for /F "tokens=2 delims=:" %%a in (n_rar.txt) DO call :up1 %%a  

goto :EOF

:up1
set V=%1
echo %V:~0,1%
In %V:~0,1% steht der erste Buchstabe.

exit
GS
Maffi
Maffi 15.01.2009 um 09:40:10 Uhr
Goto Top
Funktioniert, Dankeschön face-smile