Set ie = CreateObject("InternetExplorer.Application")
ie.visible=true
ie.navigate "toster.ru"
do until not(ie.Busy) and ie.ReadyState=4
wscript.sleep 10
loop
set html = ie.Document
set div=html.getElementsByClassName("layout__topbar_add-question")
if div.length>0 then
set a=div(0).getElementsByClassName("btn btn_green btn_add-question")
if a.length>0 then
a(0).click()
end if
end if