<% If Request.Form("Action")= "insert" Then InsertEvento() End If sTitlePage = GetTranslation("CALENDAR_INSERT") %> <% DisplayAddEvento("") %>