[kaster]

Вот тебе самый извращенный метод, который я когда-либо видел
Даже не знаю, зачем я написал такой скрипт

Код:

#include <Array.au3>
RunWait(@ComSpec & ' /c net user > "' & @ScriptDir & '\1.txt"', '', @SW_HIDE)
If Not FileExists(@ScriptDir & '\converter.bat') Then
    $bat = FileOpen(@ScriptDir & '\converter.bat', 2)
    $bat_content = '@echo off' & @CRLF & _
        'if [%2]==[] (' & @CRLF & _
            @TAb & 'echo Convert dos866 to win1251' & @CRLF & _
            @TAb & 'echo Usage: dos2win input.file output.file' & @CRLF & _
            @TAb & 'exit /b 1' & @CRLF & _
        ')' & @CRLF & _
        'set out=%2' & @CRLF & _
        'chcp 866 >nul' & @CRLF & _
        'for /f "tokens=*" %%a in (%1) do call :convert %%a' & @CRLF & _
        'goto :eof' & @CRLF & _
        '' & @CRLF & _
        ':convert' & @CRLF & _
        'chcp 1251 >nul' & @CRLF & _
        'echo %*>>%out%' & @CRLF & _
        'chcp 866 >nul'
    FileWrite($bat, $bat_content)
    FileClose($bat)
EndIf
FileChangeDir(@ScriptDir)
ShellExecuteWait(@ScriptDir & '\converter.bat', '1.txt 2.txt', @ScriptDir, '', @SW_HIDE)
;Sleep(100)
$hUsers = FileOpen(@ScriptDir & '\2.txt', 0)
$sum = ''
While 1
    $line = FileReadLine($hUsers)
    If @error = -1 Then ExitLoop
    $line = StringStripWS($line, 4)
    If StringInStr($line, 'Учетные') OR _
        StringInStr($line, '---') OR _
        StringInStr($line, 'Команда выполнена') Then
            ContinueLoop
    Else
        $sum &= $line & ' '
        ;For $i = 1 to $a
    EndIf
WEnd
;MsgBox(0, '', $sum)
FileClose($hUsers)
FileDelete(@ScriptDir & '\2.txt')
$sum = StringStripWS($sum, 2)
$aUsers = StringSplit($sum, ' ')
For $i = 1 to $aUsers[0]
    RunWait(@ComSpec & ' /c net user ' & $aUsers[$i] & ' > "' & @ScriptDir & '\' & $aUsers[$i] & '.txt"', '', @SW_HIDE)
    FileChangeDir(@ScriptDir)
    ShellExecuteWait(@ScriptDir & '\converter.bat', $aUsers[$i] & '.txt ' & $aUsers[$i] & '_mod.txt', @ScriptDir, '', @SW_HIDE)
Next

После того, как выполниться скрипт, найдешь в папке с ним текстовые файлы

Код:

username.txt
username_mod.txt

Второй - это в читабельном виде

[Vagac]

Спасибо То что надо