Thursday, 1 September 2011

VBS ျဖင့္ Run Box တစ္ခု တည္ေဆာက္ျခင္း

VBS ျဖင့္ Run Box တစ္ခု တည္ေဆာက္ျခင္း

ဒီလုိဗ်ာ က်ေနာ္တုိ႔ သုံးေလ့ရွိတဲ့ run box က တစ္ခ်ဳိ႕အင္တာနက္ဆုိင္ေတြပိတ္ထာ
းက်တယ္။ ဒါေၾကာင့္ vbs ရဲ႕ေရးထားတဲ့ run box အတြက္ code ေလးကုိ ေဆာင္ထားရတယ္။

Dim cmd
cmd = InputBox("Type Your Command...eg.>>> cleanmgr","Run Command Prompt","cleanmgr")
Dim ws
Set ws = WScript.CreateObject("WScript.Shell")
On Error Resume Next
ws.Run(cmd)
ws.Quit

ဒီ code ေလးကုိ notepad ထဲမွာထည့္ၿပီး filename ကုိ RunEveryWhere.vbs လုိ႔ေပးၿပီး run box တစ္ခုအနဲ႔ သုံးလုိ႔ရပါၿပီဗ်ာ။
Ref: http://www.myanmaritresource.info

No comments:

Post a Comment