Очистка вирт памяти w2003 без рестарта?

monkkey · Отправлено: **15:17, 04-07-2005** | #2

Этот скрипт точно работает на 2003 (forum.windowsfaq.ru)

' use "." for local computer
' Use "PowerOff_Force" for a forced poweroff

On error resume next

ShutDown "COMPUTER_NAME", "reboot"

Sub ShutDown(sNode, sAction)

Const EWX_LOGOFF = 0
Const EWX_SHUTDOWN = 1
Const EWX_REBOOT = 2
Const EWX_FORCE = 4
Const EWX_POWEROFF = 8

on Error Resume Next

Set oWMI = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate,(Shutdown)}!\\" _
& sNode & "\root\cimv2")

Set colOperatingSystems = oWMI.ExecQuery _
("Select * from Win32_OperatingSystem")
For Each obj in colOperatingSystems
Set oOS = obj : Exit For
Next

sAction = LCase(sAction)

Select Case sAction
Case "logoff"
iCmd = EWX_LOGOFF
Case "logoff_force"
iCmd = EWX_LOGOFF + EWX_FORCE
Case "shutdown"
iCmd = EWX_SHUTDOWN
Case "shutdown_force"
iCmd = EWX_SHUTDOWN + EWX_FORCE
Case "reboot"
iCmd = EWX_REBOOT
Case "reboot_force"
iCmd = EWX_REBOOT + EWX_FORCE
Case "poweroff"
iCmd = EWX_POWEROFF
Case "poweroff_force"
iCmd = EWX_POWEROFF + EWX_FORCE
Case Else
' Default value
iCmd = EWX_POWEROFF
End Select

oOS.Win32shutdown iCmd
EndSh:
End Sub

Файл подкачки можно сделать фиксированным, 1,5 размера ОЗУ, тогда не будет ругаться.

ayarm · Отправлено: **12:42, 05-07-2005** | #3

monkkey
Спасибо, попробую

Цитата:

Файл подкачки можно сделать фиксированным, 1,5 размера ОЗУ, тогда не будет ругаться.

А про файл подкачки я знаю, спасибо

Просто сервак при динамическом увеличении начинает тормозить

Может фиксированный размер свопа действительно поможет

Спасибо еще раз

Удачи! :о)))

Pupkin · Отправлено: **13:16, 08-07-2005** | #4

Цитата:

Может фиксированный размер свопа действительно поможет

Однозначно поможет. Только вот размер = 1,5 Озу - это не всегда, а зависит от ваших выполняемых задач.

ayarm · Отправлено: **15:14, 08-07-2005** | #5

Цитата:

Однозначно поможет. Только вот размер = 1,5 Озу - это не всегда, а зависит от ваших выполняемых задач

Спасибо

Завтра буду делать

Оперативки 512, дкмаю своп сделать 1Г

Задачи... Скуль практически не загруженный, базы 1с, сетевой файл сервер, терминалы стоят но клиенты пока не подлючаются, вот и все

спасибо за ответ

ColdZero · Отправлено: **16:41, 08-07-2005** | #6

Цитата:

Спасибо Завтра буду делать Оперативки 512, дкмаю своп сделать 1Г Задачи... Скуль практически не загруженный, базы 1с, сетевой файл сервер, терминалы стоят но клиенты пока не подлючаются, вот и все

Если у тебя стоят базы 1с, то это уже ж..па. Срочно набавляй оперативки. А своп в среднем делают 2 х "размер оперативки"
Если же у тебя еще будет сервер терминалов и клиенты будут подключаться - хм...тормоза жуткие будут..
Сколько хоть терминалов-то планируется подключать?

ayarm · Отправлено: **13:24, 09-07-2005** | #7

Сделал своп 1024Мб

monkkey, без входа скрипт не работает

((
А вообще кто нибудь пробовал ребутить машину БЕЗ ЛОГИНА?
Может у меня чего не так в политиках?
Вроде все облазил и проверил

Цитата:

Если у тебя стоят базы 1с, то это уже ж..па. Срочно набавляй оперативки. А своп в среднем делают 2 х "размер оперативки"
Если же у тебя еще будет сервер терминалов и клиенты будут подключаться - хм...тормоза жуткие будут..
Сколько хоть терминалов-то планируется подключать?

Да пока тормозов не наблюдалось, за исключением, когда было переаолнение свопа

Терминалов не знаю сколько будет, пока только я и еще один админ и то периодически

Прекрастно знаю, что для терминал сервера надо минимум 1Гб памяти

Спасибо всем за советы

Но вопрос остался открытым
КАК РЕБУТИТЬ 2003/ХР НЕ ЛОГИНЯСЬ В СИСТЕМЕ?

Delirium · Отправлено: **07:56, 13-07-2005** | #8

могу предложить программу одного моего знакомого, там можно не только ребутить но и еще кучу мелких фишек делать

пиши на Публикация адреса почтового ящика - Нарушение правил раздела форума п. 7 п. 5