Public Function UploadSimple(ByVal File As FileUpload, ByVal Destination As String) As String
Dim NomDuDocument As String = File.PostedFile.FileName
Dim NomDoc As String = System.IO.Path.GetFileName(NomDuDocument)
File.PostedFile.SaveAs(Destination & NomDoc)
Return NomDoc
End Function