Vbscript 使用Replace函数替换子字符串值

下面的代码在测试文件夹中查找超过5天未被访问的任何文件，如果找到一个，它会将文件路径分配给mRoot，然后不起作用的是使用Replace方法在mRoot字符串中查找IP，并将其替换为新的，我让它在弹出窗口中显示mRoot的样子，以确保它发生变化（或不发生变化）。我似乎无法更改IP。有人能帮忙吗？我对VBS非常陌生，所以我希望这是显而易见的（无论它是否可行）。谢谢

Set oFileSys = WScript.CreateObject("Scripting.FileSystemObject")

sRoot = "\\192.168.1.104\test\" 


today = Date 
Set aFolder = oFileSys.GetFolder(sRoot)
Set aFiles = aFolder.Files      
    For Each file in aFiles
        FileAccessed = FormatDateTime(file.DateLastAccessed, "2")
        If DateDiff("d", FileAccessed, today) > 5 Then
           Set objShell = Wscript.CreateObject("Wscript.Shell")
            mRoot = file
            Call Replace(mRoot,"\\192.168.1.104","\\192.168.1.105")
            objShell.Popup mRoot,, "My Popup Dialogue box"
           'oFileSys.MoveFile file, mRoot
        End If
    Next

---

尝试

mRoot=Replace（mRoot，\\192.168.1.104，“\\192.168.1.105”）

就是这样做的！非常感谢。我会标记为答案，当它变得可用时，再次感谢你！