Batch Dateinamen aufteilen und in Variable speichern

for /f "tokens=1 delims= - " %%a in %%~ni do @set var1=%%a
for /f "tokens=2 delims= - " %%a in %%~ni do @set var2=%%a

echo var1
echo var2

pause

function Split-Files
{
	Param(
		[Parameter(
			Position = 1,
			Mandatory = $true,
			ValueFromPipeline = $true
		)]
		$Path
	)

	process
	{
		dir $Path | % {
			$dir = $_.BaseName -replace "-","\"

			Write-Host -ForegroundColor Green ("{0} -> {1}" -f $_.BaseName,$dir)
			mkdir -Force $dir
			mv $_ $dir | Out-Null
		}
	}
}

cd "R:\foo"
"." | Split-Files

$src = Resolve-Path .
dir -Exclude $MyInvocation.MyCommand.Name  | % {
	$dir = $_.BaseName -replace "-","\"
	$o = New-Object psobject
	$o | Add-Member Source (Join-Path $src $_.Name)
	$o | Add-Member Dest (Join-Path $src (Join-Path $dir $_.Name))
	$o
	#mkdir -Force $dir | Out-Null
	#mv $_ $dir | Out-Null
}

PS C:\> cd R:\foo
PS R:\foo> .\script.ps1

Source                           Dest
------                           ----
R:\foo\das ist-ein test.txt      R:\foo\das ist\ein test\das ist-ein test.txt
R:\foo\das ist-noch ein test.txt R:\foo\das ist\noch ein test\das ist-noch ein test.txt
R:\foo\das-ist-ein-test.txt      R:\foo\das\ist\ein\test\das-ist-ein-test.txt
R:\foo\das-ist-noch-ein-test.txt R:\foo\das\ist\noch\ein\test\das-ist-noch-ein-test.txt


PS R:\foo>

.\script.ps1 : Die Datei "R:\foo\script.ps1" kann nicht geladen werden. Die Datei "R:\foo\script.ps1" ist nicht digital signiert. Sie
könnend dieses Skript im aktuellen System nicht ausführen. Weitere Informationen zum Ausführen von Skripts und Festlegen der
Ausführungsrichtlinie erhalten Sie in "about_Execution_Policies" unter "http://go.microsoft.com/fwlink/?LinkID=135170"..
In Zeile:1 Zeichen:1
+ .\script.ps1
+ ~~~~~~~~~~~~
    + CategoryInfo          : Sicherheitsfehler: (:) [], PSSecurityException
    + FullyQualifiedErrorId : UnauthorizedAccess

$o | Add-Member -MemberType NoteProperty -Name Dest -Value (Join-Path $src (Join-Path $dir $_.Name))

$src = Resolve-Path .
Get-ChildItem -Exclude $MyInvocation.MyCommand.Name  | % {
	$dir = $_.BaseName -replace "-","\"
	$o = New-Object psobject
	$o | Add-Member -MemberType NoteProperty -Name Source -Value ($src.Path + "\" + $_.Name)
	$o | Add-Member -MemberType NoteProperty -Name Dest -Value ($src.Path + "\" + $dir + "\"+ $_.Name)
	$o
	#New-Item -Path $dir -ItemType Directory -Force | Out-Null
	#Move-Item -Path $_ -Destination $dir | Out-Null
}