使用vbs上传pscp

Question

我正在尝试在VBScript中创建一个函数，该函数使用pscp命令将文本文件上载到远程服务器。当我运行该函数时，我收到错误

  

80070002 - 系统找不到指定的文件。

下面是函数，我想知道pscp命令是否存在问题，或者是否有其他方法可以在VBScript中上传文件。

Function upload(source, dest)
    WScript.Echo source
    Set system = WScript.CreateObject("WScript.Shell")
    system.Run "pscp -batch -pw [PASSWORD HERE] " & source & " [USERNAME HERE]:" & dest, 0, True
    WScript.Echo "....Finished " & vbCrlf
End Function