Attachmate Extra宏语法问题：动态日期（减2天）实现及资源求助

Attachmate Extra的宏基于VBScript，你之前的写法错误在于直接在字符串中嵌入函数（VBScript不支持这种语法），且日期计算需要用专门的函数处理。正确代码如下：

' 计算当前日期减2天
Dim targetDate
targetDate = DateAdd("d", -2, Date)
' 格式化为"日+小写月份缩写"的格式（比如"4aug"）
Dim formattedDate
formattedDate = Day(targetDate) & LCase(Left(MonthName(Month(targetDate)), 3))
' 发送最终指令
Sess0.Screen.SendKeys "Show a60:" & formattedDate & ";a"

关键说明：

• DateAdd("d", -2, Date)：Date获取当前系统日期，"d"指定按天计算，-2表示往前推2天
• 日期格式化部分：Day()提取日数字，MonthName()获取月份全称后取前3个字符，转小写后和日拼接，刚好匹配你需要的"4aug"格式
• VBScript中字符串拼接必须用&符号，不能直接把函数写在引号里

• 软件内置帮助：打开Attachmate Extra后按F1，里面有完整的宏编程对象模型（比如Screen、Session对象的方法）、语法示例，是最权威的参考
• VBScript核心语法：Extra宏完全基于VBScript，重点掌握日期处理（Date、DateAdd、FormatDateTime）、字符串操作、变量声明这些基础，能解决大部分宏编写问题
• 社区案例：在Stack Overflow搜索"Attachmate Extra macro"，可以找到大量用户分享的实际问题和解决方案，比如屏幕字段操作、日期格式化这类常见需求

内容的提问来源于stack exchange，提问作者David