Rename FileName using UFT

Set obj = createobject("Scripting.FileSystemObject")

f1 = "E:\test\New Text Document.txt"
f2 = "E:\test\old Text Document.txt"

If obj.FileExists(f1) Then
    obj.MoveFile f1,f2
End If