Como criar um bot de views para o Youtube usando o bloco de notas

 

creditos a esse maninho aqui:    • Como Desenvolver um Bot para o YouTub...   script aqui! Dim startmundo Set Fso = CreateObject("Scripting.FileSystemObject") Set InputFile = fso.OpenTextFile("coloque seu atalho aqui") 'ESTE SCRIPT FOI DESENVOLVIDO PELO STARTMUNDO 'TODOS OS DIREITOS RESERVADOS copartilhe o video ajude mais pessoas Do While Not (InputFile.atEndOfStream) VIDEOS = InputFile.ReadLine set startmundo = CreateObject("WScript.Shell") 'startmundo.Run("" & VIDEOS) startmundo.Run "CMD /C start chrome -incognito " & VIDEOS & "",0,false wscript.sleep 10000 Loop Dim fim fim=MsgBox("processo finalizado",vbinformation,"FIM") Wscript.Quit

No lugar de "copie seu caminho" você coloca onde fica o script O meu fica: C:\Users\Pedro\desktop\script