-
GAMEPOD.hu
A topic a Microsoft Windows 7 operációs rendszerrel kapcsolatban felmerülő kérdésekkel fogalkozik:
Gyakori hibajelenség: A Windows Update csak keres-keres (svchost.exe jelentős a processzorterhelés), de nem talál frissitéseket. Itt a megoldás (Az angol nyelvű forrásanyag: http://wu.krelay.de/en/ )
Új hozzászólás Aktív témák
-
krealon
veterán
válasz szatocs1981 #63603 üzenetére
"Script-tel szeretném módosítani W7 alatt az egyik környezeti változót "
batch, vbscript, powershell?
-
brd
nagyúr
válasz szatocs1981 #63603 üzenetére
Igazi admin jog kell hozzá (tehát emelt szintű):
Batch-ben: setx /m foo val
VBS-ben:
Set objShell = CreateObject("WScript.Shell")
Set objEnv = objShell.Environment("SYSTEM")
objEnv("foo") = "val"PS-ben:
[Environment]::SetEnvironmentVariable("foo", "val", "Machine")[ Szerkesztve ]
The only real valuable thing is intuition.
-
brd
nagyúr
válasz szatocs1981 #63612 üzenetére
Miért nem tudod?
Még kérni is lehet jogot a scriptnek, ezt tedd az elejére:If Not WScript.Arguments.Named.Exists("elevate") Then
CreateObject("Shell.Application").ShellExecute WScript.FullName _
, """" & WScript.ScriptFullName & """ /elevate", "", "runas", 1
WScript.Quit
End IfThe only real valuable thing is intuition.
-
brd
nagyúr
válasz szatocs1981 #63614 üzenetére
Ki kell nézni az adott szolgáltatás részleteiből a "Service Name" sorból a szolgáltatás nevét, pl. a képeden az elsőnél AxInstSV lenne. Aztán pl. a következő kódban az első sorban a servicename-et kicserélni arra (idézőjel maradjon):
strServiceName = "servicename"
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
Set colListOfServices = objWMIService.ExecQuery("Select * from Win32_Service Where Name ='" & strServiceName & "'")
For Each objService in colListOfServices
objService.StopService()
NextMondjuk én ezeket inkább batch-ből oldanám meg (a változó beállítását is, és a szolgáltatás leállítását is), mert úgy 2 sor az egész (vagy 3, ha el is akarod indítani utána a szolgáltatást):
net stop AxInstSV
setx /m foo val
net start AxInstSVThe only real valuable thing is intuition.
Új hozzászólás Aktív témák
• A topikban Alapelveink értelmében tilos a warez témák tárgyalása!
• Hozzászólás előtt olvasd el az összefoglalót!
• Tilos az OFF!
- Bivalyerős lett a Poco F6 és F6 Pro
- Hobby elektronika
- Befellegzett az Alone in the Dark rebootját fejlesztő csapatnak
- Autóápolás, karbantartás, fényezés
- Az Apple is mesterséges intelligenciával turbózza fel a teljes kínálatot
- Parfüm topik
- Autós topik
- A fociról könnyedén, egy baráti társaságban
- EAFC 24
- Politika
- További aktív témák...
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! LEGOLCSÓBB! Automatikus 0-24
- Vírusirtó, Antivirus VPN kulcsok
- Game Pass Ultimate előfizetések 1 - 25 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN!
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.