ကၽြန္ေတာ္တင္လာခဲ႔တဲ႔ ပို႔စ္ေတြမွာ
သံုးလို႔ေကာင္းမယ္႔ ေစာ့၀ဲ ၊ လိုအပ္မယ္ ထင္တဲ႔ ေစာ့၀ဲ ၊ ကြန္ပ်ဴတာနဲ႔
ပတ္သတ္ျပီး အသံုး၀င္မယ္႔ Tip and Trick ေတြကိုခ်ည္းပဲ တင္လာခဲ႔တာဆိုေတာ့
ကၽြန္ေတာ္ဆိုဒ္ကို လာလည္တဲ႔ ကြန္ပ်ဴတာနဲ႔ ပတ္သတ္ျပီး စိတ္၀င္စားတဲ႔
သူေတြလည္း ပ်င္းေနေလာက္ေရာေပါ့....ဒီတစ္ခါ အပ်င္းေျပေလး ျဖစ္သြားေအာင္ Code
ေတြကို အသံုးျပဳျပီးေတာ့ Notepad မွာ ပဲ ျဖစ္ေစ ၊ က်န္တဲ႔ ေရးလုိ႔ရတဲ႔
ေနရာမွာပဲ ျဖစ္ေစ ကိုယ္ေရးခ်င္တာေတြကို အလိုေလွ်ာက္
ေရးခုိင္းၾကရေအာင္လားဗ်ာ....
ပထမဆံုး အေနနဲ႔ Notepad ကို အသစ္ဖြင့္ဖို႔အတြက္ Start\Notepad (သို႔) Win+R-->notepad ဆိုျပီး နည္းလမ္းႏွစ္သြယ္ထဲကေနမွ မိမိႏွစ္သက္တဲ႔ ပံုစံနဲ႔ Notepad ကို ဖြင့္လိုက္ပါ့မယ္....Notepad ပြင့္လာျပီ ဆိုရင္ေတာ့ ေအာက္မွာ ေဖာ္ျပထားတဲ႔ Code ေတြကို Notepad ေပၚမွာ ကူးထည္႔လုိက္ပါ....
set wshshell = wscript.CreateObject("wscript.shell")
wshshell.run "Notepad"
wscript.sleep 2000
wshshell.AppActivate "Notepad"
WshShell.SendKeys "Sky is Blue"
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys "I love is true"
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys "Leaf is green"
WScript.Sleep 500
WshShell.SendKeys" "
WScript.Sleep 500
WshShell.SendKeys "I love is clean"
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys " Rose is Red"
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys "I love is best"
WScript.Sleep 500အထက္ပါ Code ေတြကို Notepad မွာ Paste လုပ္ျပီးသြားျပီဆိုရင္ေတာ့ Save as (သို႕) Ctrl+s နဲ႔ မိမိ Save လုပ္ခ်င္တဲ႔ေနရာကို ေရြးခ်ယ္ျပီးေတာ့ name.vbs ဆိုျပီး Save လုပ္ပါ့မယ္....name ေနရာကေတာ့ မိမိႏွစ္သက္ရာ နာမည္ေပးႏိုင္ပါတယ္...(ဥပမာ - autotype.vbs) ဆိုျပီး Save လုပ္လိုက္ပါ...ျပီးတာနဲ႔ အေစာက vbs file type နဲ႔ Save ထားတာကို Double Click ေပးျပီး ဖြင့္ၾကည္႔လိုက္ပါ...ကၽြန္ေတာ္ နမူနာေရးထားတဲ႔ စာသားေတြက Notepad ေပၚမွာ အလိုေလွ်ာက္ ေရးေနတာ ျမင္ရပါလိမ္႔မယ္....တစ္ခုေျပာဖို႔က်န္သြားတယ္...ဘာလည္းဆိုေတာ့ vbs file ကို Double Click ေပးျပီးတာနဲ႔ Notepad က အလိုလိုပြင့္ျပီး Notepad ေပၚမွာ ေရးပါလိမ္႔မယ္...Notepad ေပၚမွာ မေရးေစခ်င္ဘူးဆိုရင္ေတာ့ Double Click ေပးျပီးတာနဲ႔ မိမိ ေရးေစခ်င္တဲ႔ ေနရာမွာ Click တစ္ခ်က္ ေထာက္ေပးလိုက္ပါ...အလိုေလွ်ာက္ ေရးေပးေနပါလိမ္႔မယ္.....စမ္းသပ္ရင္း ေပ်ာ္ရႊင္ႏိုင္ၾကပါေစဗ်ာ....
ပထမဆံုး အေနနဲ႔ Notepad ကို အသစ္ဖြင့္ဖို႔အတြက္ Start\Notepad (သို႔) Win+R-->notepad ဆိုျပီး နည္းလမ္းႏွစ္သြယ္ထဲကေနမွ မိမိႏွစ္သက္တဲ႔ ပံုစံနဲ႔ Notepad ကို ဖြင့္လိုက္ပါ့မယ္....Notepad ပြင့္လာျပီ ဆိုရင္ေတာ့ ေအာက္မွာ ေဖာ္ျပထားတဲ႔ Code ေတြကို Notepad ေပၚမွာ ကူးထည္႔လုိက္ပါ....
set wshshell = wscript.CreateObject("wscript.shell")
wshshell.run "Notepad"
wscript.sleep 2000
wshshell.AppActivate "Notepad"
WshShell.SendKeys "Sky is Blue"
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys "I love is true"
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys "Leaf is green"
WScript.Sleep 500
WshShell.SendKeys" "
WScript.Sleep 500
WshShell.SendKeys "I love is clean"
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys " Rose is Red"
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys "I love is best"
WScript.Sleep 500အထက္ပါ Code ေတြကို Notepad မွာ Paste လုပ္ျပီးသြားျပီဆိုရင္ေတာ့ Save as (သို႕) Ctrl+s နဲ႔ မိမိ Save လုပ္ခ်င္တဲ႔ေနရာကို ေရြးခ်ယ္ျပီးေတာ့ name.vbs ဆိုျပီး Save လုပ္ပါ့မယ္....name ေနရာကေတာ့ မိမိႏွစ္သက္ရာ နာမည္ေပးႏိုင္ပါတယ္...(ဥပမာ - autotype.vbs) ဆိုျပီး Save လုပ္လိုက္ပါ...ျပီးတာနဲ႔ အေစာက vbs file type နဲ႔ Save ထားတာကို Double Click ေပးျပီး ဖြင့္ၾကည္႔လိုက္ပါ...ကၽြန္ေတာ္ နမူနာေရးထားတဲ႔ စာသားေတြက Notepad ေပၚမွာ အလိုေလွ်ာက္ ေရးေနတာ ျမင္ရပါလိမ္႔မယ္....တစ္ခုေျပာဖို႔က်န္သြားတယ္...ဘာလည္းဆိုေတာ့ vbs file ကို Double Click ေပးျပီးတာနဲ႔ Notepad က အလိုလိုပြင့္ျပီး Notepad ေပၚမွာ ေရးပါလိမ္႔မယ္...Notepad ေပၚမွာ မေရးေစခ်င္ဘူးဆိုရင္ေတာ့ Double Click ေပးျပီးတာနဲ႔ မိမိ ေရးေစခ်င္တဲ႔ ေနရာမွာ Click တစ္ခ်က္ ေထာက္ေပးလိုက္ပါ...အလိုေလွ်ာက္ ေရးေပးေနပါလိမ္႔မယ္.....စမ္းသပ္ရင္း ေပ်ာ္ရႊင္ႏိုင္ၾကပါေစဗ်ာ....
No comments:
Post a Comment