-
IT café
Ajánlott ingyenes Windows programok
Androidos kérdéssel irány az Android alkalmazások topik!
Új hozzászólás Aktív témák
-
ArchElf
addikt
válasz VIPowER #5417 üzenetére
VbScriptben kb 10 sor...
Dim oWMI, oProc, cProc, oWS, sProc, sRun
sProc = "notepad.exe"
sRun = "akarmi.cmd"
Set oWS = CreateObject("WScript.Shell")
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" _
& "." & "\root\cimv2")
Do
Set cProc = objWMIService.ExecQuery _
("Select * from Win32_Process Where Name = '" & sProc & "' ")
If cProc.Count = 0 Then Exit Do
WScript.Sleep(100)
Loop
oWS.Run sRunsProc -> amit figyelsz
sRun -> amit indítasz
Ha nem az aktuális könyvtárban van (vagy nem elérhető a PATH környezeti változó által) amit indítasz, akkor teljes útvonal kell neki.AE
[ Szerkesztve ]
Csinálok egy adag popcornt, és leülök fórumozni --- Ízlések és pofonok - kinek miből jutott --- Az igazi beköpőlégy [http://is.gd/cJvlC2]
Új hozzászólás Aktív témák
- Autómatricák a legjobb minőségben, több ezer minta! PH tagoknak 30% kedvezmény!
- Windows, Office licencek a legolcsóbban, egyenesen a Microsoft-tól - 2990 Ft-tól!
- Canva Pro előfizetés - 1 éves
- Bitdefender Total Security 3év/3eszköz! - "Tökéletes védelem most kedvező áron..."
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
Állásajánlatok
Cég: Alpha Laptopszerviz Kft.
Város: Pécs
Cég: Ozeki Kft.
Város: Debrecen