$s_Read = ''
$i_PID = Run(@ComSpec & ' /C ipconfig', '', @SW_HIDE, 6)
While 1
$s_Read &= StdoutRead($i_PID)
If @error Then ExitLoop
Sleep(1)
WEnd
$s_Read = _OEMToAnsi($s_Read)
ConsoleWrite($s_Read)
MsgBox(32, '', $s_Read)
Func _OEMToAnsi($sOEM)
Local $a_AnsiFName = DllCall('user32.dll', 'Int', 'OemToChar', 'str', $sOEM, 'str', '')
If @error = 0 Then
Return $a_AnsiFName[2]
Else
Return $sOEM
EndIf
EndFunc ;==>_OEMToAnsi