使用VBA和WinSCP同步本地和远程文件

时间:2019-01-27 18:56:32

标签: excel vba shell vbscript winscp

我正在尝试使用WinSCP与服务器自动同步本地文件。我收到以下脚本错误:

enter image description here

这是我的vba代码:

Public Sub pullwinscp()
Shell "wscript C:\Users\Aaron\Desktop\SyncSftp.vbs", vbNormalFocus
End Sub

这是我要调用的脚本(保存为.vbs):

open sftp://User:Password@webaddress.org -hostkey="aaaaa-aaa2 aaaaa256 7a:4a:aa:aa:aa:aa:aa:aa:a1:aa:aa:aa:aa:aa:aa:aa"
synchronize local C:\Users\Aaron\Documents\test /home/FTP/Acct Hourly Acctg

有什么主意为什么会出现此错误?

1 个答案:

答案 0 :(得分:1)

您的“ .vbs”不是VBScript代码。那就是WinSCP script

要从VBA运行WinSCP脚本,请使用:

sparkUI

(将Call Shell("C:\path\winscp.com /ini=nul /script=c:\path\SyncSftp.txt") 重命名为SyncSftp.vbs后,因为它不是VBScript)

另请参阅Using VBA to run WinSCP script