string - 尝试使用 VB 脚本保存时出现类型错误

Question

我正在尝试使用以下脚本，它在以下粗体代码行上给我一个类型错误。

 Option Explicit

 Dim xlApp
 Dim xlBook
 Dim Filename
 Dim Format

 Set xlApp = CreateObject("Excel.Application")
 Set xlBook = xlApp.Workbooks.Open("\\denfs1\home\davidvan\desktop\shane spread sheet 2.xlsm", 0, True)

 xlApp.Run "Mail_Body"
 **xlBook.SaveAS Filename=("H:Contrabutions spread sheet" & Format(Date,"MM/DD/YYYY")& ".xlsm")**
 xlBook.close
 xlApp.Quit


 Set xlBook = Nothing
 Set xlApp = nothing

我觉得我需要将文件名定义为字符串，但不确定如何在不出错的情况下做到这一点

Answer 1

1. VBScript 中没有 Format() 函数（相对于 VBA），请查找 FormatDateTime() 代替
2. VBScript 中没有命名参数（VBA 中的语法涉及“:=”），使用纯字符串作为 .SaveAs 方法的第一个参数
3. VBScript 解析器在字符串连接运算符周围不需要空格