Amazing Notepad Trick

Amazing Notepad Tricks

Hi guys! It's ship service to amazing for all, next coding re-create inwards notepad too salvage equally "anyname.vbs" too ship your friends.
It's non a virus or spam simply for fun.

Notepad amazing trick

Open notepad re-create next code too glue on notepad too thence salvage equally whatsoever name.vbs

WScript.Sleep 1800
WScript.Sleep 1000
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "notepad"
WScript.Sleep 100
WshShell.AppActivate "Notepad"
WScript.Sleep 500
WshShell.SendKeys "Hel"
WScript.Sleep 500
WshShell.SendKeys "lo "
WScript.Sleep 500
WshShell.SendKeys ", how"
WScript.Sleep 500
WshShell.SendKeys "are"
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys "you"
WScript.Sleep 500
WshShell.SendKeys "? "
WScript.Sleep 500
WshShell.SendKeys "I a"
WScript.Sleep 500
WshShell.SendKeys "m al"
WScript.Sleep 500
WshShell.SendKeys "so "
WScript.Sleep 500
WshShell.SendKeys " th"
WScript.Sleep 500
WshShell.SendKeys "ank"
WScript.Sleep 500
WshShell.SendKeys "s! "
WScript.Sleep 500
WshShell.SendKeys " visit"
WScript.Sleep 500
WshShell.SendKeys " Musk"
WScript.Sleep 500
WshShell.SendKeys "anweb "
WScript.Sleep 500
WshShell.SendKeys ".blogs "
WScript.Sleep 500
WshShell.SendKeys "pot. "
WScript.Sleep 500
WshShell.SendKeys "com "