ComObjError(false)
process = iexplore.exe
Loop
{
   prev := ErrorLevel
   Process, Close, %process%
   Process, Exist, %process%
}
until !ErrorLevel or (prev = ErrorLevel)
oIE := ComObjCreate("InternetExplorer.Application") 
oIE.visible := True, oIEHWND := oIE.HWND 
WinMaximize ahk_id %oIEHWND%  

YoutubeUpload:
oIE.navigate("https://www.youtube.com/upload")
While oIE.readyState != 4 || oIE.document.readyState != "complete" || oIE.busy
   Sleep, 10
text := oIE.document.documentElement.InnerText
If InStr(text, "This page can’t be displayed")
   GoTo, YoutubeUpload
FileDelete, %A_ScriptDir%/WinWait.ahk
FileAppend, 
(
#NoTrayIcon
WinWait, Choose File to Upload
WinActivate, Choose File to Upload
WinWaitActive, Choose File to Upload
ControlSetText, Edit1, "145.mp4", Choose File to Upload
ControlClick, Button1, Choose File to Upload,,,, NA
ExitApp
), %A_ScriptDir%/WinWait.ahk
Run, %A_ScriptDir%/WinWait.ahk
oIE.document.querySelector("img[class=""init-upload-action-icon yt-sprite""]").click()
FileDelete, %A_ScriptDir%/WinWait.ahk
oIE.document.querySelector("input[name=""title""]").value := "name"
oIE.document.querySelector("textarea[name=""description""]").value := "description"
oIE.document.querySelector("button[class=""yt-uix-button yt-uix-button-size-default yt-uix-button-primary yt-uix-button-empty hide-in-initial save-all-button""]").click()
loop
{
   clipboard := text := oIE.document.documentElement.InnerText
   if InStr(text, "your video has been published at h")
      break
   sleep, 100
}
msgbox, done