ich möchte Verzeichniss umbennen (mit Xbase++) unter W2K/XP.
(unter W98 funktionierte es ...)
Verzeichnis von D:\ALASKA\FTP2BBS
18.11.06 00:20 <DIR> .
18.11.06 00:20 <DIR> ..
16.12.06 05:11 <DIR> 1122
16.12.06 05:11 <DIR> 1123
16.12.06 05:11 <DIR> 1124
16.12.06 05:11 <DIR> 1125
aus 1122 soll 20061122 werden. Nun hab ich es zuerst "direkt" versucht
Code: Alles auswählen
PRIVATE cDummy,cFile
...
FOR i = 1 TO nDirZahl
cFile := aFiles[i,F_NAME]
cDummy := STR(YEAR(DATE()),4)+cFile
? RunShell( "/C RENAME &cFile.* &cDummy.*")
NEXT
Code: Alles auswählen
FOR i = 1 TO nDirZahl
cFile := aFiles[i,F_NAME]
cDummy := STR(YEAR(DATE()),4)+cREN
cREN := "RENAME "+cFile".* "+cDummy+".*"
cBAT := cBAT+cREN+cCRLF
NEXT
cBAT := cBAT+"WAIT"
MemoWrit( "REN_ME.BAT", cBAT )
INKEY(3)
RunShell( "","REN_ME.BAT",.T.)
RunShell( "/C REN_ME.BAT")
In der "REN_ME.BAT" steht nun :
Code: Alles auswählen
RENAME 1122.* 20061122.*
RENAME 1123.* 20061123.*
RENAME 1124.* 20061124.*
RENAME 1125.* 20061125.*
WAIT
aber dann im Norton Commander starte (lädt eine Command.com) dann
geht es und die Verzeichnisse werden umbenannt ?!
wo liegt bei mir der "Denkfehler" ? wieso geht es 3x nicht und mit 1x ja ?
gruss by OHR
Jimmy
p.s. mit SHFILE (von Thomas Braun) geht es auch nicht und eine andere
"rename" API hab ich nicht gefunden.