VBS ျဖင့္ Run Box တစ္ခု တည္ေဆာက္ျခင္း
ဒီလုိဗ်ာ က်ေနာ္တုိ႔ သုံးေလ့ရွိတဲ့ run box က တစ္ခ်ဳိ႕အင္တာနက္ဆုိင္ေတြပိတ္ထာDim cmd
cmd = InputBox("Type Your Command...eg.>>> cleanmgr","Run Command Prompt","cleanmgr")
Dim ws
Set ws = WScript.CreateObject("WScript.
On Error Resume Next
ws.Run(cmd)
ws.Quit
ဒီ code ေလးကုိ notepad ထဲမွာထည့္ၿပီး filename ကုိ RunEveryWhere.vbs လုိ႔ေပးၿပီး run box တစ္ခုအနဲ႔ သုံးလုိ႔ရပါၿပီဗ်ာ။
Ref: http://www.myanmaritresource.
No comments:
Post a Comment
daweiit@gmail.com