Run everywhere

Run everywhere ....

notepad မွာကူးပီး RunEveryWhere.vbs နဲ႔သိမ္းပါ။ ၿပီးရင္ သံုးခ်င္တဲ့ေနရာယူၿပီး သံုးလို႔ရၿပီ။

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