[qeraser]

nod201
Мне кажется, что это связано с шифрованием данных, попробуй если есть отключить в свойствах

[nod201]

100% это не связано с твиками реестра!!

так дай подумать
ест две диска
первый это дистриб каторый шетаютса ориганил
второй этот дистриб взято из первого дистриба и напичканно разними твиками
так если устанавит с первый диска с оригиналной дистрибом то я тогого не встречаю а если с второго устанавит то разные угражение вижу про потерание типа качестве файла и все это проверанно в одном машине на файловый системе НТФС (с: нтфс 10 гектар d: фат32 138 гектаров)

с уважением...

Мне кажется, что это связано с шифрованием данных, попробуй если есть отключить в свойствах

это где в свойствах в диске или еще гдето моно по точнее...

[boss911]

nod201

Читаем статью из FAQ для касперского!!

как автоматом создать дополнительную панель инструментов на р/столе?
(та что можно создать ч-з контекстное меню панели задач)

[IVAndron]

Всем привет!

boss911: по теме Поставить галочку "при подключении вывести значок в области уведомлений"

ссылка: http://forum.ru-board.com/topic.cgi?...0012&start=840

текст:

Выводим значок сетевого подключения в трей - neticon.vbs

Код:

' use "." for local computer 
sComputer = "." 
 
'Constants for WMI StdRegProv 
Const HKCR = &H80000000 
Const HKCU = &H80000001 
Const HKLM = &H80000002 
 
Const NetBase = "SYSTEM\CurrentControlSet\Control\Network\" 
 
On Error Resume Next 
 
Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & sComputer & "\root\default:StdRegProv") 
 
' Finding the right place in registry is not so easy 
' You must find the SettingID for the correct network adapter 
 
' Get adapter collection 
Set oAdapters = GetObject("winmgmts:").ExecQuery("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled=True") 
 
' Get all subkeys under NetBase in an array 
iRC = oReg.EnumKey(HKLM, NetBase, aRegKeys) 
 
' Поиск адаптера с именем подключения "Подключение по локальной сети" 
' или с именем "Подключение по локальной сети 2" 
If (Err.Number = 0) And (iRC = 0) Then 
   On Error Goto 0 
   bAdapterFound = False 
   For Each oAdapter In oAdapters 
     sSettingID = oAdapter.SettingID 
     ' Loop through all registry keys 
     For i = 0 To Ubound(aRegKeys) 
       sKeyName = NetBase & aRegKeys(i) & "\" & sSettingID & "\Connection" 
       oReg.GetStringValue HKLM, sKeyName, "Name", sValue 
       If sValue = "Подключение по локальной сети" or sValue = "Подключение по локальной сети 2" Then 
         '' bAdapterFound = True 
         ' WScript.Echo "Updating this setting id: " & sSettingID 
         ' WScript.Echo "Registry path: " & sKeyName 
         ' Now we can get to the network icon setting in registry 
         oReg.SetDWORDValue HKLM, sKeyName, "ShowIcon", 1 
         '' Exit For 
       End If 
     Next 
     If bAdapterFound Then 
       Exit For 
     End If 
   Next 
 
   ' WScript.Echo "Finished, you must log off and on to see the change" 
 
Else 
   WScript.Echo "Error in WMI registry parsing!" 
End If

[boss911]

IVAndron

Спасибо, работает, только заключи свой скрипт в тег [code] плиз!!

[IVAndron]

boss911

цитата: заключи свой скрипт в тег [code]

Это не мой код, сам нашел его только вчера по указанной ссылке.

Если надо то можно еще тамже снять галочку с "Уведомлять при ограниченном или отсутствующем подключении"
нужно добавить после строки (или перед-не важно)

oReg.SetDWORDValue HKLM, sKeyName, "ShowIcon", 1

строку

oReg.SetDWORDValue HKLM, sKeyName, "IpCheckingEnabled", 0

Удачи

Как автоматизировать установку кодовой страницы таблицы преобразования 20880 (IBM EBCDIC - кирилица русская) в "Язык и региональные стандарты"?

[boss911]

IVAndron

Это не мой код ...

Ну млин, да не важно чей это скрипт, важно, что ты его выложил!! Нажми редактировать свое сообщение, выдели скрпипт и нажми на панели управления редактора заначок # или с двух концов скрипта постав [СОDE]текст[/СОDE]

[bogomolv]

IVAndron
Мой вариант AutoIt-скрипта рассчитан на одно соединение, но значительно проще:

Код:

Opt('ExpandVarStrings', 1)
$net=RegRead('HKLM\SYSTEM\CurrentControlSet\Control\Class\{4D36E972-E325-11CE-BFC1-08002bE10318}\0001','NetCfgInstanceId')
If Not @error Then
  $net='HKLM\SYSTEM\CurrentControlSet\Control\Network\{4D36E972-E325-11CE-BFC1-08002BE10318}\$net$\Connection'
  RegWrite($net,'IpCheckingEnabled','REG_DWORD','0') ;Отключить уведомление об огранченном соединении в SP2
  RegWrite($net,'ShowIcon','REG_DWORD','1') ;При подключении вывести значок в области уведомлений
EndIf

[IVAndron]

Всем привет!

bogomolv
Полностью с тобой согласен Я и сам не сторонник громоздких кодов.
Правда пока нет времени на освоение AutoIt, так что думаю как твою идею воплотить в командный файл или скрипт...

Народ повторюсь..

Как автоматизировать установку кодовой страницы таблицы преобразования 20880 (IBM EBCDIC - кирилица русская) в "Язык и региональные стандарты"?