#include <FileConstants.au3>

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Local $hGUI = GUICreate("",700,300)
Local $mybutton = GUICtrlCreateButton ("Информировать консольно", 0, 0,400,100) 

GUISetState(@SW_SHOW, $hGUI)

While 1
$msg = GUIGetMsg()
if  $msg = $GUI_EVENT_CLOSE then
ExitLoop
endif

if  $msg = $mybutton then
Local $sFilePath = "cmdconsole.cmd"
Local $hFileOpen = FileOpen($sFilePath,  $FO_OVERWRITE)
Local $mytext="@echo off"& @CRLF & "chcp 65001>NUL" &@CRLF &"echo простое консольное информирование"&  @CRLF & "pause"

FileWrite($hFileOpen, $mytext)

RunWait(@ComSpec & " /c " & $sFilePath)
endif

WEnd