ITWARE -II-

လူအမ်ားစုုကေတာ့ Notepad  ကိုစာရိုုက္တာေလာက္နဲ႔ပဲၿပီးေနၾကတာပါ။ ဒီေန႔ေတာ့ Notepad ေလးကိုအသံုးျပဳျပီးလုပ္ရမယ့္ Ghost keyboard
typing ဆိုတာေလးနဲ႔မိတ္ဆက္ေပးခ်င္ပါတယ္။ Keyboard ကိုမထိပဲ စာေတြေပၚလာတာေၾကာင့္ Ghost keyboard typing လုိ႔ေခၚတာပါ။ ဆိုလိုတာကေတာ့ ကိုယ္ကစာမရိုက္ပဲ စာေတြသူ႔အလိုလိုေပၚလာတာပါ။ အဲ့လိုေပၚလာေအာင္လည္း Notepad မွာတင္ႀကိဳတင္ၿပီးစာေရး ထားရမွာပါ။ ေကာင္မေလးကိုရည္းစားစကားေျပာခ်င္လဲရတာေပါ့။ မန္မိုရီစတစ္ထဲဒီဖိုင္ေလးထည့္ေပးလိုက္ၿပီးဟိုကဖြင့္လဲဖြင့္လိုက္
ေရာ.. " I love you " .... ေၾကြဘီေလကြီးရယ္။ ႀကိတ္ၿပီးစိတ္ကူးယဥ္မေနနဲ႔ဦး။ဘာပဲျဖစ္ျဖစ္နည္းပညာတစ္ခုတိုးတာေပါ့။
ဘာေဆာ့ဝဲလ္မွလည္းမလိုဘူး။ Notepad ရွိရုံနဲ႔ျဖစ္တယ္ ...

ေအာက္က ကုဒ္ေတြကို Copy ကူးၿပီး Notepad ထဲထည့္လိုက္ပါ။

set wshshell = wscript.CreateObject("wScript.Shell")
wshshell.run "Notepad"
wscript.sleep 400
wshshell.sendkeys "W"
wscript.sleep 100
wshshell.sendkeys "E"
wscript.sleep 120
wshshell.sendkeys "L"
wscript.sleep 200
wshshell.sendkeys "C"
wscript.sleep 100
wshshell.sendkeys "O"
wscript.sleep 140
wshshell.sendkeys "M"
wscript.sleep 100
wshshell.sendkeys "E"
wscript.sleep 50
wshshell.sendkeys "F"
wscript.sleep 50
wshshell.sendkeys "R"
wscript.sleep 120
wshshell.sendkeys "O"
wscript.sleep 160
wshshell.sendkeys "M"
wscript.sleep 200
wshshell.sendkeys "I"
wscript.sleep 100
wshshell.sendkeys "T"
wscript.sleep 100
wshshell.sendkeys "W"
wscript.sleep 100
wshshell.sendkeys "A"
wscript.sleep 100
wshshell.sendkeys "R"
wscript.sleep 100
wshshell.sendkeys "E"
wscript.sleep 100
wshshell.sendkeys "2"
wscript.sleep 100

notepad ထဲအေပၚကကုဒ္ေတြ ေရာက္သြားၿပီဆိုရင္ save မွတ္လိုက္ပါ။ Name ကိုေတာ့အဆင္ေျပရာေပးႏိုင္ပါတယ္။
ဒါေပမယ့္ Name အေနာက္မွာ .vbs ဆိုတဲ့ extension ေလးကိုရိုက္ထည့္ေပးရပါမယ္။ ေနာက္ၿပီးေအာက္က tab ေလးမွာ
All Files ကိုေျပာင္းေပးဖိုပလိုပါတယ္။ ၿပီးရင္ save မွတ္လို႔ရပါၿပီ။

save မွတ္ၿပီးသြားရင္ေတာ့ ဖိုင္ေလးကို Run လိုက္ပါ။ Automatic ကိုယ္ေရးထားတဲ့စာေတြေပၚလာမွာျဖစ္ပါတယ္။
အဆင္ေျပပါေစ။

Double quote (" ") ႏွစ္ခုၾကားထဲက စာလံုးအႀကီးနဲ႔ေရးထားတဲ့ေနရာမွာ ကိုယ္ေရးခ်င္တာအစားထိုးၿပီးေရးႏိုင္ပါတယ္။
ေအာက္က 100, 200 အဲ့ဒိဂဏန္းေတြကေတာ့ အေႏွးအျမန္ခ်ိန္တာပါ။