prova cosi'
Directory.CreateDirectory(Server.MapPath("") & "\FileDisponibili\" & nomeDir)