[Batch] Codage ANSI/UTF 8

Version imprimable

27/07/2010, 15h28
Virtuoz

[Batch] Codage ANSI/UTF 8

Bonjour,

j'expose mon soucis : je souhaiterai à l'aide d'un batch encoder les fichiers texte d'un répertoire ANSI en UTF 8.

Si vous pouviez m'aider. Merci d'avance
27/07/2010, 17h51
minnesota

Salut,

Il faut faire appel à des utilitaires tiers que tu manipuleras dans ton fichier de commandes.

Cette question ayant été traitée mainte fois, je t'invite à faire une recherche sur le forum, tu trouveras ton bonheur.

@ plus.
28/07/2010, 08h51
Virtuoz

Merci de tes précisions, je vais alors approfondir mes recherches car je ne souhaite pas utiliser un utilitaire.

J'ai trouvé un bout de code intéressant en vbs en revanche :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
<job>
  <reference object="ADODB.Stream" />
  <object id="stmANSI" progId="ADODB.Stream" />
  <object id="stmUTF8" progId="ADODB.Stream" />
  <script language="VBScript">
    Option Explicit

    With stmANSI
      .Open
      .Type = adTypeText
      .LineSeparator = adCRLF
      .Charset = "x-ansi" 'Same as Windows-1252.
      With stmUTF8
        .Open
        .Type = adTypeText
        .LineSeparator = adLF
        .CharSet = "UTF-8"
        .WriteText stmANSI.ReadText(adReadAll)
        .SaveToFile "UTF8.txt", adSaveCreateOverWrite
        .Close
      End With
      .Close
    End With

  </script>
</job>