Hello,
Using
FBSL, you can then execute the following code once, it'll self compile as an EXEcutable, and then follow the instructions...
#Option Explicit
#AppType Console
'// FILENAME/FOLDER RENAMER with UNC support
Cls
If Not STANDALONE Then
Fbsl2Exe(Command(1), fbsl_console)
ExitProgram(0)
End If
If CommandCount() <> 3 Then
Print., "*****************************"
Print "Usage : RENAMER Source Target"
Print "*****************************",.
Pause
ExitProgram(-1)
End If
Dim $source = Command(1)
Dim $target = Command(2)
Print "> Renaming ", source, " to ", target
Dim %result = MoveF(source, target)
If result <> 1 Then
Print "< Last error returned : ", GetLastError()
Else
Print "< ", source, " successfully renamed to ", target
End If
