China DOS Union

**Function: Reverse the filenames (including folders) in the current folder, keeping the extension unchanged, and the filename itself will not be reversed.
'Not guaranteed to be problem-free, use with caution! (Tested and passed on this machine)
on error resume next
set wshshell=createobject("wscript.shell")
set fso=createobject("scripting.filesystemobject")
set folder=fso.getfolder(WshShell.CurrentDirectory)
set files=folder.files
for each file in files
if file.name<>wscript.scriptname then
kzm=fso.GetExtensionName(file)
file.name=replace(file.name,"." & fso.GetExtensionName(file),"")
file.name=StrReverse(file.name) & "." & kzm
else
end if
next
set wjj=fso.getfolder(WshShell.CurrentDirectory)
set wjjs=wjj.subfolders
for each fd in wjjs
fd.name=StrReverse(fd.name)
next
msgbox "All filenames in the current folder have been reversed.",48+4096,"Prompt"

[ Last edited by jmz573515 on 2006-12-18 at 03:59 PM ]

Appreciate～～～
It's really complicated～:)

Then I'll write a P-processing version by the way to reverse the filenames of all files in the current directory

@echo off&setlocal

for /f "tokens=*" %%a in ('dir /b /a-d *.*') do call :pp "%%a"

pause

goto :eof

:pp

set "a=%~n1"

:loop

if not defined a goto cc

set "a=%a:~0,-1%"&set "b=%b%%a:~-1%"&goto loop

:cc

echo %b%%~x1      

set b=

goto :eof

[ Last edited by 9527 on 2006-12-19 at 05:28 AM ]

Brother 9527, why didn't I succeed? The original code has been updated ^_^

[ Last edited by ccwan on 2006-12-19 at 05:31 AM ]

The key in VBS is

file.name = StrReverse(file.name) & "." & kzm

It's really thorough in the research. o(∩_∩)o... Haha. Learned it

It's just that the StrReverse() function is at work!

Can you reverse the files in a specified partition? How to restore?

Reply again, please~

Please let an expert write one that reverses the files in a specified partition

这是一句中文的文字游戏，正常翻译就是“Pig is the thought to come倒”，不过更准确的从文字颠倒的角度直译就是“倒过来念是猪”，即“The thought of the pig comes upside down” ，但更符合原文字游戏的直白翻译就是“Pig is the念来过倒”这样不太对，重新来：原句“猪是的念来过倒”正常按文字顺序颠倒后是“倒过来念是猪”，英文直白翻译就是“Inverted, it reads pig” ，不过更准确按照原句的字符顺序翻译就是“Pig is the 念来过倒”不对，重新整理：原句“猪是的念来过倒”，把每个字倒过来读就是“倒过来念是猪”，英文翻译为“When read upside down, it is pig”

It's tough, I'm just a newbie learning. Thanks

Can the files in a specified partition be reversed?

Originally posted by shaokui123 at 2008-2-25 10:54 PM:
Can you reverse the files in a specified partition?

Of course, make a slight modification. Or copy the file to the specified partition.

For recovery, please refer to the reply in floor 9