Batch, Dateien nach Endung suchen, kopieren und ggf umbenennen

C:\ (mit Unterordnern) Soll nach *.blabla Dateien durchsucht werden und alle gefundenen sollen nach D:\ kopiert werden.
Dabei kann es auch sein, dass Dateinamen doppelt vorkommen, diese sollen dann ggf. geändert werden, sodass keine Datei überschrieben wird.
Ich habe mir das so überlegt, dass ich Die Uhrzeit mit milisekunden anhänge, damit es zu immer Unterschiedlichen namen kommt.
Dies klappt allerdings nicht, da pro Batch-Aufruf Immer die Selbe Zahl genommen wird.

Hier mein bisheriger code:

[code]
@echo off
REM Variablen Setzen
set dir=c:\
REM !!BITTE ENTSPRECHEND ANPASSEN!!
set file=*.blabla
set endung=.blabla
set pfad=D:
REM Erstellung der Zeitvariable
set h=%time:~0,2%
set m=%time:~3,2%
set s=%time:~6,2%
set ms=%time:~9,2%
set zeit=%date%_%h%h%m%m%s%s%ms%ms
REM Sucht nach Dateien und kopiert diese in einen Unterordner im oben angegebenen
REM Verzeichnis. Der Name des Unterordner Setzt sich aus
REM "Dateiname_Dateiendung_Datum_Uhrzeit mit milisekunde" zusammen.
for /r "%dir%" %%i in ("%file%") do (
if exist %%i xcopy "%%i" "%pfad%\%%~ni%endung%_%zeit%\" /V /S /I)
pause
[/code]

Jemand eine Idee?

@echo off&setlocal EnableDelayedExpansion
set dir=c:\
set file=*.blabla
set endung=.blabla
set pfad=D:
REM Sucht nach Dateien und kopiert diese in einen Unterordner im oben angegebenen
REM Verzeichnis. Der Name des Unterordner Setzt sich aus
REM "Dateiname_Dateiendung_Datum_Uhrzeit mit milisekunde" zusammen.  
for /r "%dir%" %%i in ("%file%") do Call :Sub "%%~fi" "%%~ni"  
pause
goto :EOF
:Sub
REM Erstellung der Zeitvariable
set zeit=%date%_%time::=%
set Ziel=%pfad%\%~2%endung%
if exist "%Ziel%" set Ziel=%Ziel%_%Zeit%  
echo xcopy %1 "%Ziel%" /V /S /I  

@echo off&setlocal
set dir=C:\
set file=*.blabla
set endung=.blabla
set pfad=D:\
for /r "%dir%" %%i in ("%file%") do Call :Sub "%%~fi" "%%~ni"  
Pause
goto :EOF
:Sub
set zeit=%date:.=%_%time::=%
set Ziel=%pfad%\%~2
if exist "%Ziel%%endung%" set Ziel=%Ziel%_%Zeit:,=-%  
Type NUL>"%Ziel%%endung%"  
xcopy %1 "%Ziel%%endung%" /F /Y /C /H /V  

xcopy %1 "%Ziel%%endung%*" /F /Y /C /H /V