Step 1:-Open Notepad.
Step 2:-Type the following code
set wshshell = wscript.CreateObject("wScript.Shell")
wshshell.run "Notepad"
wscript.sleep 1400
wshshell.sendkeys "D"
wscript.sleep 1000
wshshell.sendkeys "O"
wscript.sleep 1000
wshshell.sendkeys "N"
wscript.sleep 1000
wshshell.sendkeys "T"
wscript.sleep 1000
wshshell.sendkeys "R"
wscript.sleep 1000
wshshell.sendkeys "E"
wscript.sleep 1000
wshshell.sendkeys "A"
wscript.sleep 1000
wshshell.sendkeys "D"
wscript.sleep 1000
wshshell.sendkeys "T"
wscript.sleep 1000
wshshell.sendkeys "H"
wscript.sleep 1000
wshshell.sendkeys "I"
wscript.sleep 1000
wshshell.sendkeys "S"
Step 3:-Save the file as "Filename.vbs"
Step 4:-Now Open the saved file to see the magic.