Dim Oggi as DateTime = DateTime.Now