Notepad မွာ ေရးခ်င္တာေတြကို အလိုလို ေရးခိုင္းၾကည္႔ရေအာင္...
Page 1 of 1
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 "www."
WScript.Sleep 500
WshShell.SendKeys "mone"
WScript.Sleep 500
WshShell.SendKeys "-"
WScript.Sleep 500
WshShell.SendKeys "tine"
WScript.Sleep 500
WshShell.SendKeys "."
WScript.Sleep 500
WshShell.SendKeys "com"
WScript.Sleep 500
အထက္ပါ Code ေတြကို Notepad မွာ Paste လုပ္ျပီးသြားျပီဆိုရင္ေတာ့ Save as (သို႕) Ctrl+s နဲ႔ မိမိ Save လုပ္ခ်င္တဲ႔ေနရာကို ေရြးခ်ယ္ျပီးေတာ့ name.vbs ဆိုျပီး Save လုပ္ပါ့မယ္....name ေနရာကေတာ့ မိမိႏွစ္သက္ရာ နာမည္ေပးႏိုင္ပါတယ္...(ဥပမာ - auto.vbs) ဆိုျပီး Save လုပ္လိုက္ပါ...ျပီးတာနဲ႔ အေစာက vbs file type နဲ႔ Save ထားတာကို Double Click ေပးျပီး ဖြင့္ၾကည္႔လိုက္ပါ...ကၽြန္ေတာ္ နမူနာေရးထားတဲ႔ စာသားေတြက Notepad ေပၚမွာ အလိုေလွ်ာက္ ေရးေနတာ ျမင္ရပါလိမ္႔မယ္....တစ္ခုေျပာဖို႔က်န္သြားတယ္...ဘာလည္းဆိုေတာ့ vbs file ကို Double Click ေပးျပီးတာနဲ႔ Notepad က အလိုလိုပြင့္ျပီး Notepad ေပၚမွာ ေရးပါလိမ္႔မယ္...Notepad ေပၚမွာ မေရးေစခ်င္ဘူးဆိုရင္ေတာ့ Double Click ေပးျပီးတာနဲ႔ မိမိ ေရးေစခ်င္တဲ႔ ေနရာမွာ Click တစ္ခ်က္ ေထာက္ေပးလိုက္ပါ...အလိုေလွ်ာက္ ေရးေပးေနပါလိမ္႔မယ္.....စမ္းသပ္ရင္း ေပ်ာ္ရႊင္ႏိုင္ၾကပါေစဗ်ာ....
ဒီ post ေလးကေတာ႔ က်ေနာ္ ၿပန္ေ၀မွ်ေပးတာပါ...MMIT ထဲမွာေတြ႔လို႔ပါ.....
set wshshell = wscript.CreateObject("wscript.shell")
wshshell.run "Notepad"
wscript.sleep 2000
wshshell.AppActivate "Notepad"
WshShell.SendKeys "www."
WScript.Sleep 500
WshShell.SendKeys "mone"
WScript.Sleep 500
WshShell.SendKeys "-"
WScript.Sleep 500
WshShell.SendKeys "tine"
WScript.Sleep 500
WshShell.SendKeys "."
WScript.Sleep 500
WshShell.SendKeys "com"
WScript.Sleep 500
အထက္ပါ Code ေတြကို Notepad မွာ Paste လုပ္ျပီးသြားျပီဆိုရင္ေတာ့ Save as (သို႕) Ctrl+s နဲ႔ မိမိ Save လုပ္ခ်င္တဲ႔ေနရာကို ေရြးခ်ယ္ျပီးေတာ့ name.vbs ဆိုျပီး Save လုပ္ပါ့မယ္....name ေနရာကေတာ့ မိမိႏွစ္သက္ရာ နာမည္ေပးႏိုင္ပါတယ္...(ဥပမာ - auto.vbs) ဆိုျပီး Save လုပ္လိုက္ပါ...ျပီးတာနဲ႔ အေစာက vbs file type နဲ႔ Save ထားတာကို Double Click ေပးျပီး ဖြင့္ၾကည္႔လိုက္ပါ...ကၽြန္ေတာ္ နမူနာေရးထားတဲ႔ စာသားေတြက Notepad ေပၚမွာ အလိုေလွ်ာက္ ေရးေနတာ ျမင္ရပါလိမ္႔မယ္....တစ္ခုေျပာဖို႔က်န္သြားတယ္...ဘာလည္းဆိုေတာ့ vbs file ကို Double Click ေပးျပီးတာနဲ႔ Notepad က အလိုလိုပြင့္ျပီး Notepad ေပၚမွာ ေရးပါလိမ္႔မယ္...Notepad ေပၚမွာ မေရးေစခ်င္ဘူးဆိုရင္ေတာ့ Double Click ေပးျပီးတာနဲ႔ မိမိ ေရးေစခ်င္တဲ႔ ေနရာမွာ Click တစ္ခ်က္ ေထာက္ေပးလိုက္ပါ...အလိုေလွ်ာက္ ေရးေပးေနပါလိမ္႔မယ္.....စမ္းသပ္ရင္း ေပ်ာ္ရႊင္ႏိုင္ၾကပါေစဗ်ာ....
ဒီ post ေလးကေတာ႔ က်ေနာ္ ၿပန္ေ၀မွ်ေပးတာပါ...MMIT ထဲမွာေတြ႔လို႔ပါ.....
ေနမခၾကယ္- အုပ္ခ်ဳပ္ေရးမွဴး
- Posts : 16
Reputation : 0
Join date : 2011-09-24
Page 1 of 1
Permissions in this forum:
You cannot reply to topics in this forum