Avaya CMS VB Scripting

Hello -

Wondering if someone can shed some light on how to pull the prior month via the VB Scripts, but the report is in a daily report; To and From date requirements. It has been a while since I have had to make this happen, but I do remember a code similar to the below that worked. Any ideas how I can make this happen?

Dim ThisMonth
Dim LastMonth
Dim Firstofmonth
Dim Lastofmonth
Dim DateBefore

ThisMonth = Date
LastMonth = DateAdd("m", -1, Date)
Firstofmonth = DateAdd("d", 1, Date - Day(Date))
Lastofmonth = DateAdd("m", 1, Date - Day(Date))
DateBefore = DateAdd("d", -1, Date)

Thanks,
Frank