$objShell = ObjCreate("WScript.Shell")
$Zieldir = $objShell.Environment("System")
$Sourcedir = $objShell.Environment("System")
$str = _
"Zieldir:" & @LF & _
$MACS("Zieldir") & @LF & _
"Sourcedir:" & @LF & _
$BCM("Sourcedir")


If FileExists ($Sourcedir & "\par\par.ihs") then 
	If FileExists ($Zieldir & "\test\par\par.ihs") then 
		FileDelete ($Zieldir & "\test\par\par.ihs")
	else 
		FileMove ($Sourcedir & "\\par\par.ihs",$Zieldir & "\test\par\par.ihs", 0)
	EndIf
Else
	FileMove ($Sourcedir & "\par\par.ihs",$Zieldir & "\test\par\par.ihs", 0)
EndIf