නෝට් පෑඩ් එකක් ඔටෝ ලියවෙන විදියට හදමු ද?

ඔයාලට කියල දෙන්න යන්නෙ Windows වල ඔටෝ ලියවෙන නෝට් පෑඩ් එකක් එකක් හදන විදිහයි. මේක ඔයාලගෙ යාලුවො බයකරන්න, පොඩි විහිළුවක් කරන්න අවස්ථානුකූලව යොදා ගන්න එකනම් ඔයාලගෙ වැඩක්.

මුලින්ම මන් මේ පහල දෙන code එක notepad එකට past කරගන්නකෝ. ඊට පස්සෙ FIle > Save As ගිහින් කැමති නමක් දීල අගට .vbs කියල Save කරගන්න. (Ex: AutoWriting.vbs) ඊට පස්සෙ ඉතින් තියෙන්නෙ open කරල බලන එක තමා. බය වෙන්නනම් දෙයක් නෑ..........


set wshshell = wscript.CreateObject("wscript.shell")
wshshell.run "Notepad"
wscript.sleep 500
wshshell.AppActivate "Notepad"
WshShell.SendKeys "I"
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys "L"
WScript.Sleep 500
WshShell.SendKeys "O"
WScript.Sleep 500
WshShell.SendKeys "V"
WScript.Sleep 500
WshShell.SendKeys "E"
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys "Y"
WScript.Sleep 500
WshShell.SendKeys "O"
WScript.Sleep 500
WshShell.SendKeys "U"
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys "!"
WScript.Sleep 500
WshShell.SendKeys "!"
WScript.Sleep 500
WshShell.SendKeys "!"
WScript.Sleep 500
WshShell.SendKeys "!"
WScript.Sleep 500
WshShell.SendKeys "!"
WScript.Sleep 500
WshShell.SendKeys "!"
WScript.Sleep 500
WshShell.SendKeys " >> I LOVE YOU!!!!!!"

≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈
◄◄අපිත් එක්ක එකතු වෙන්න►►
◄◄https://www.facebook.com/groups/anammanamgodakde/►►
◄◄අනං මනං ගොඩක් දේවල්.......►►
≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈≈