Winrar Dateien per Send To entpacken

Hi,
Systeminfo:
Windows 7 64 Bit
(wenn noch mehr wichtig ist, bitte sagen)

ich versuche gerade ein Script zu schrieben/zusammen zu suchen, das folgendes kann:

(- alle meine Downloads sind in einigen Unterordnern ...)
- per recht klick auf einen Ordner (O:/dl/kp_v1), senden an "entpacken" soll mir das Script automatisch
1. einen Unterordner in D:\Daten\_new\_income\, mit dem namen des Ordners auf den ich rechtklick gemacht habe, erstellen. (in diesem beistpeil soll der Ordner D:\Daten\_new\_income\/kp_v1 erstellt werden
2. alle Dateien aus dem Ordner O:/dl/kp_v1 (immer .part01-partXX) in den Ordner " D:\Daten\_new\_income\/kp_v1" entpacken ...
3. Die Ordner welche in einem Archiv sind sollen auch erstellt werden (und nicht nur die Dateien ohne Ordner entpackt werden ...)


Hmm wer das jetzt alles auf das erste mal kapiert hat, Respekt ...

So mein bisheriger Ansatz


Was klappt:
1. senden an ...
2. dass er alle Dateien in dem Ordner in den anderen Ordner entpackt ...
3. dass er einen (aber falscher Name) Ordner erstellt ...

Was nicht klappt:
1. Die Variable %ak_vz% beinhaltet ein Verzeichnis, eine eben zu hoch (O:/dl/kp_v1 soll entpackt werden dann steht dl in der variablen) --> hiermit verbunden, entpackt es in einen anderen Ordner und erstellt eine Ordner mit falschem Namen aber ändern der variable sollte das Problem beheben ..)
2. beim entpacken sollen die Daten nicht direkt in den Ordner (in jedem Archiv ist ein Ordner mit gepackt, und dieser soll auch mit entpackt werden und nicht direkt alle Dateien in den Hauptordner ...
--> dass hier die daten am ende in dem ordner "D:\Daten\_new\_income\kp_v1\Ordner" landen ... (und nicht direkt in "D:\Daten\_new\_income\kp_v1\"


Könnt ihr mir bitte helfen ...
ich habe schon Ewigkeiten gesucht und weiß einfach nicht wie ich es nennen soll, um den aktuellen Ordnername herauszubekommen ...
Ich hoffe, dass ihr da eine einfache Lösung dafür kennt ...

@echo off & SetLocal

Set Winrar="C:\Program Files\WinRAR\WinRar.exe"  
If Not Exist %WinRar% Echo Kann Winrar.exe nicht finden & Pause & Goto :Eof

set "Ordner=D:\Daten\_new\_income\%~nx1"   
echo %Ordner%

If Not Exist "%Ordner%" MD "%Ordner%"  

IF Exist "%1\*.part1.rar"  %WinRAR% x "%1\*.part1.rar"  -hppasswort "%Ordner%"  
If Exist "%1\*.part01.rar" %WinRAR% x "%1\*.part01.rar" -hppasswort "%Ordner%"  
pause