msxml6.dll error '80020009'

Microsoft VBScript compilation error Out of memory line = 419, col = 28 (line is offset from the start of the script block). FormatDate = DatePart("yyyy", varDate) & "-" & IIF(LEN(DatePart("m", varDate)) = 1, 0, "") & DatePart("m", varDate) & "-" & IIF(LEN(DatePart("d", varDate)) = 1, 0, "") & DatePart("d", varDate)

/main.asp, line 414