Myitkyina Online
ၿမစ္ၾကီးနားအြန္လိုင္းဖိုရမ္မွၾကိဳဆိုပါတယ္..။
အသင္းသားမၿဖစ္ေသးလွ်င္ Register ကိုႏိုပ္ၿပီးform ၿဖည့္ေပးပါ..။
ေနာက္..မိမိဂ်ီေမးလ္ကိုဖြင့္ၿပီး..အတည္ၿပဳေပးပါ..။
အသင္း၀င္ၿပီးပါက.. login ကိုႏိုပ္ၿပီး၀င္ပါ..။
ေက်းဇူးတင္ပါတယ္..။

ၿမစ္ၾကီးနားအြန္လိုင္းဖိုရမ္ႏွင္ ့မိသဟာယ




Notepad ကို သူကိုယ္တိုင္ေရး ေအာင္ လုပ္ၾကည့္ရေအာင္

View previous topic View next topic Go down

Notepad ကို သူကိုယ္တိုင္ေရး ေအာင္ လုပ္ၾကည့္ရေအာင္

Post  iloveyou on Thu Aug 19, 2010 3:48 pm

Notepad ကို သူကိုယ္တိုင္ေရး ေအာင္ လုပ္ၾကည့္ရေအာင္

ဒီဟာေလးက လုပ္ရတာ ေပ်ာ္စရာေလး တစ္ခုေပါ့ဗ်ာ။ ေနာက္ပီးေတာ့ တကယ္လို႔သာ ဒီ icon ေလးကို notepad icon အျဖစ္ေျပာင္းလိုက္မယ္ဆိုရင္ ေတာ္ေတာ္ေလး ေနာက္လို႔ေကာင္းမယ့္ ေပ်ာ္စရာေလးေပါ့။
၁။ notepad ကိုဖြင့္ပါ
၂။ ဒီေအာက္က script ကို notepad ထဲကို ကူးထည့္လိုက္ပါ။
set wshshell = wscript.CreateObject("wscript.shell")
wshshell.run "Notepad"
wscript.sleep 2000
wshshell.AppActivate "Notepad"
WshShell.SendKeys "H"
WScript.Sleep 500
WshShell.SendKeys "ell"
WScript.Sleep 500
WshShell.SendKeys "o "

ဒီ script ကေလးက noptepad ကို သူကိုယ္တိုင္သူ႔ေပၚမွာ Hello ဆိုပီးေတာ့ ေရးေစပါလိမ့္မယ္။ သင္ႀကိဳက္တဲ့ စာကိုလဲ "......" ႏွစ္ခု ၾကားထဲမွာ ထည့္လို႔ရပါတယ္။

ေနာက္ပီးေတာ့ သင္ႀကိဳက္သေလာက္လဲ လိုင္းေတြထပ္ထည့္လို႔ရပါတယ္ ဒီေအာက္မွာ ျပထားသလိုမ်ိဳးေပါ့ဗ်ာ ............

WScript.Sleep 500
WshShell.SendKeys "insert here your letter of group of letters "

၃။ ပီးရင္ ဒီဖိုင္ေလးကို File>Save as ဆိုပီးေတာ့ save ပါ။ file extension က *.vbs ပါ။ ဥပမာအားျဖင့္ နာမည္က notepad ဆိုရင္ (notepad.vbs) လို႔ save ရပါမယ္။ ေအာ ဒါနဲ႔
file type ေနရာမွာက All File ဆိုတာကို ေရြးေပးရမယ္ေနာ္။
ေနာက္ပီးရင္ အဲ့ save ထားတဲ့ ဖိုင္ကို run လိုက္ရင္ ဒီလိုေပၚလာပါလိမ့္မယ္။

၄။ သင္က အဲ့ဒီ icon ကို doubleclick လုပ္လုိက္ရင္ ။ notepad ပြင့္လာပီးေတာ့ Hello ဆိုပီးေတာ့ run ပါလိမ့္မယ္။



စိတ္၀င္စားရင္ေတာ့
စမ္းၾကည့္လိုက္ပါ


iloveyou
ယာယီတာ၀န္ခံ
ယာယီတာ၀န္ခံ

ေရးသားခ်က္မ်ား : 36
Start Date: : 2010-08-14

Back to top Go down

View previous topic View next topic Back to top

- Similar topics

 
Permissions in this forum:
You cannot reply to topics in this forum