Shortcut za SHUTDOWN i PowerDown pri Win2000P

[g_velev]

Kak da si napravia shortcut na desktopa za gasene na kompiutyra pr win 2000p?

pri XP, znam kak, no pri 2000 nomera ne stava!!

[d-rRoss]

Iavno si nov, no i za drugite "novaci"

!!!Podobni temi sa raziskvani v foruma predi godini i sa poso4eni resheniata im.

Molia polzvaite funkciata "tarsene" predi da zadadeta vapros, mnogo neshta gi ima v arhivite...kakto se kazva "arhivite sa jivi" !!!



Otgovor na vaprosa ti:



---------------------------



dim OpSysSet, obj

Set OpSysSet = GetObject("winmgmts:{impersonationLevel=impersonate," & _

"(Shutdown)}//./root/cimv2").ExecQuery _

("SELECT * FROM Win32_OperatingSystem" &_

" WHERE Primary=true")



For Each obj In OpSysSet

obj.Win32Shutdown(8)

Next

---------------------------



Copy-paste v notepad, posle save as "ime na faila.VBS"

[DHCP]

d-r Ross ami ako iskam da syzdam shortcut za lock computer?

[d-rRoss]

UUUfffffff !!!

Ama naistina ste pi4ove!

---------------------------



rundll32.exe user32.dll,LockWorkStation



---------------------------

Start meniu/Programs/Accessories/notepad copy tuka, paste tam - save as "alabala.cmd"

[g_velev]

<blockquote id="quote"><font size="1" face="Verdana, Arial, Helvetica" id="quote">quote:<hr height="1" noshade id="quote">Originally posted by d-rRoss


Iavno si nov, no i za drugite "novaci"

!!!Podobni temi sa raziskvani v foruma predi godini i sa poso4eni resheniata im.

Molia polzvaite funkciata "tarsene" predi da zadadeta vapros, mnogo neshta gi ima v arhivite...kakto se kazva "arhivite sa jivi" !!!



Otgovor na vaprosa ti:



---------------------------



dim OpSysSet, obj

Set OpSysSet = GetObject("winmgmts:{impersonationLevel=impersonate," & _

"(Shutdown)}//./root/cimv2").ExecQuery _

("SELECT * FROM Win32_OperatingSystem" &_

" WHERE Primary=true")



For Each obj In OpSysSet

obj.Win32Shutdown(8)

Next

---------------------------



Copy-paste v notepad, posle save as "ime na faila.VBS"

<hr height="1" noshade id="quote"></blockquote id="quote"></font id="quote">

MErsi mnogo za infoto. Deistva bezotkazno.

Bi li mi kazal ot kyde da pro4eta oste hitrinki za win2000P, moje i za XP

10X in advance !!!

[d-rRoss]

Kato na4alo tuka:

http://www.setcom.bg/news/forum_lite...?TOPIC_ID=4657