#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <MsgBoxConstants.au3>
       
Local $hGUI = GUICreate("Сведения о пути к скрипту",700,300)
Local $idButton = GUICtrlCreateButton("Получить сведения", 0, 250,185, 25)
Local $myinfo = GUICtrlCreateLabel("", 0, 0, 700,200)
GUICtrlSetFont($myinfo,20)
GUISetState(@SW_SHOW, $hGUI)

While 1
$msg = GUIGetMsg()
if  $msg = $GUI_EVENT_CLOSE then
ExitLoop
endif
if  $msg = $idButton then
Local $info = "Полный путь к данному скрипту " & @ScriptFullPath
GUICtrlSetData($myinfo,$info)

EndIf

WEnd