在 lotus notes 脚本中，我需要完整的逻辑来从当前日期减去三十天

Question

在 lotus notes 脚本中，我需要完整的逻辑来从 CCYYMMDD 格式的当前日期中减去三十天，我想使用 print 语句打印此日期，以便我看到结果。我需要完整版本的 lotus notes 脚本，包括所有使用变量的定义和数据类型。我尝试使用多种方式，要么在打印时获得空结果，要么获得数据类型不匹配。我需要你的帮助。谢谢

Answer 1

Dim dt As New NotesDateTime("")
dt.SetNow
dt.SetAnyTime
dt.AdjustDay -30
Print Format(dt.LSLocalTime, "YYYYMMDD")