Un petit script en VBS fait celà très bien...
Il faut utiliser FSO (File System Object) pour ouvrir le fichier, une fois le fichier ouvert tu le transfert dans une string et tu appelles la fonction len() qui te retourne la longueur.
En gros qqch de ce genre :
Code :
- sFile = InputBox("Saisir le nom du fichier :", "Ouvrir le fichier" )
- If sFile <> "" Then
- Set oFSO = WScript.CreateObject("Scripting.FileSystemObject" );
- strFile = oFSO.OpenTextFile(sFile, 1)
- Msgbox("Le fichier fait " & Len(strFile) & " caractères" )
- End If
|
Message édité par Requin le 09-06-2004 à 10:58:39