Dim FilePath As String = "Le chemin du fichier en question" If IO.File.Exists(FilePath) Then Dim File As New IO.FileInfo(FilePath) Dim FileLength As Long = File.Length MessageBox.Show("Taille du fichier : " & FileLength & " octet(s)") End If
Mon problème est que j'ai des films dans mon réseau local et je veux les protéger contre la copie
j'ai essayé toutes les méthodes et les logiciels de protection, mais le résultat est négatif, et je pense que la solution passe par l'identification de la taille des copies, en d'autres termes pour Empêcher la copie des fichiers que leurs taille plus 600MB
ET Merci beaucoup
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionDecryptFile("c:\mon_Film.avi","c:\mon_Film.avi")
CryptFile("c:\mon_Film.avi","c:\mon_Film.avi")