среда, 29 мая 2013 г.

Как активировать режим Бога в Windows 7

     Этот режим позволит вам управлять всеми настройками Windows (Vista, 7, 8) из удобного графического меню.
     Для его активации необходимо создать на рабочем столе новую папку и переименовать ее следующим образом: GodMode.{ED7BA470-8E54-465E-825C-99712043E01C}
     После это иконка папки приобретет вид иконки панели управления. Внутри папки можно будет увидеть ссылки на настройки, сгруппированные по категориям.

    Есть отзывы, что на x64 это не работает. Не замечал, может быть какие-то отдельные настройки и не работают

Найдено на  http://habrahabr.ru

вторник, 28 мая 2013 г.

Пример вывода данных в MS Word из 1С 7.7

Еще один пример работы с Word из 1С 7.7, увидел тут .

Word = CreateObject("Word.Application");
Word.Documents.Add();
Word.Documents(1).Content.InsertAfter(“Уважаемый “ + СокрЛП(Директор)+"!");
MyRange = Word.Documents(1).paragraphs.last.range;
MyRange.Bold = 1;
Word.Documents(1).paragraphs.last.Alignment = 1; //center
Word.Documents(1).Content.InsertParagraphAfter();
Word.Documents(1).Content.InsertAfter("Вы нам должны "+Сумма);
Word.Documents(1).Content.InsertAfter(" "+СокрЛП(Валюта));
Word.Documents(1).paragraphs.last.range.Bold = 0;
Word.Documents(1).paragraphs.last.Alignment = 0; //left
Цифирь = Word.Documents(1).range (Word.ActiveDocument.paragraphs.last.range.End – 1 -СтрДлина(Строка(СокрЛП(Сумма)))-1-СтрДлина(Строка(СокрЛП(Валюта))),
Word.ActiveDocument.paragraphs.last.range.End – 1 -СтрДлина(Строка(СокрЛП(Валюта))));
Цифирь.Font.ColorIndex = 6; //wdRed
// показываем полученный текст
Word.Visible = 1;


Есть несколько тонкостей, на которые следует обратить внимание:
• вызывается объект “Word.Application”;
• нельзя передавать константы Word в качестве параметров функций – только их численные значения. А чтобы быстро узнать их значения, достаточно создать макрос в Word, а в нем воспользоваться процедурой MsgBox(). Например, если передать ей wdRed в качестве параметра, то получим 6 – значение константы;
• вместо True и False надо использовать 1 и 0;
• “Documents(1)” указывает на первый из открытых документов. Надежнее использовать “ActiveDocument” (ведь если Word уже был запущен, то ваш документ может оказаться не первым) – пример просто показывает, что работают оба варианта;
• обратите внимание, что объектом “Range” может быть как весь объект другого вида (слово, абзац, документ), так и конкретная область (ср. “MyRange” и “Цифирь”).
Основным источником информации на эту тему является файл справки по VBA для MS Word.

Удаление данных из Active Directory после неудачного понижения роли контроллера домена

Цитата отсюда: http://support.microsoft.com/kb/216498/ru - перед употреблением обязательно читать полностью.

Удалять руками пришлось после того как умер резервный контроллер домена 2003, расположенный на виртуальной машине, и в журнале событий главного КД постоянно сыпались ошибки, связанные с усопшим.

"Первый метод: только для Windows Server 2003 с пакетом обновления 1 (SP1) или более поздним пакетом обновления

Нажмите кнопку Пуск и последовательно выберите пункты Программы, Стандартные и Командная строка.
  1. В командной строке введите ntdsutil и нажмите клавишу ВВОД.
  2. Введите metadata cleanup и нажмите клавишу ВВОД. Для фактического выполнения удаления необходимо указать дополнительные параметры.
  3. Введите команду connections и нажмите клавишу ВВОД. Это меню предназначено для подключения к серверу, на котором происходят изменения. Если текущий пользователь не обладает правами администратора, перед подключением следует указать другую учетную запись. Для этого введите команду set creds имя_доменаимя_пользователяПароль и нажмите клавишу ВВОД. В случае использования пустого пароля введите null.
  4. Введите команду connect to server имя_сервера и нажмите клавишу ВВОД. Появится сообщение о подключении к серверу. При возникновении ошибки убедитесь, что доступен контроллер домена, который используется для подключения, а текущая учетная запись обладает правами администратора на сервере.

    Примечание. Если выполняется подключение к удаляемому серверу, то при попытке его удаления (действие 15) может появиться следующее сообщение об ошибке:
     
     Ошибка 2094. Невозможно удалить объект DSA0x2094 
     
  5. Введите команду quit и нажмите клавишу ВВОД. Появится меню Metadata Cleanup.
  6. Введите команду select operation target и нажмите клавишу ВВОД.
  7. Введите команду list domains и нажмите клавишу ВВОД. Появится список доменов леса с номерами.
  8. Введите команду select domain номер и нажмите клавишу ВВОД, где номер – номер домена, которому принадлежит удаляемый сервер. Выбранный домен используется для проверки того, является ли удаляемый сервер последним контроллером в этом домене.
  9. Введите команду list sites и нажмите клавишу ВВОД. Появится список узлов с номерами.
  10. Введите команду select site номер и нажмите клавишу ВВОД, где номер – номер узла, которому принадлежит удаляемый сервер. Появится подтверждение выбранного домена и узла.
  11. Введите команду list servers in site и нажмите клавишу ВВОД. Появится список серверов узла с номерами.
  12. Введите команду select server номер, где номер – номер удаляемого сервера. Появится подтверждение, которое содержит имя выбранного сервера, его DNS-имя и местонахождение учетной записи.
  13. Введите команду quit и нажмите клавишу ВВОД. Появится меню Metadata Cleanup.
  14. Введите команду remove selected server и нажмите клавишу ВВОД. Должно появиться сообщение об успешном удалении сервера. (Мне повезло, на этом работа по удалению закончилась) Появление следующего сообщения об ошибке свидетельствует о том, что объект NTDS Settings был удален из Active Directory ранее другим администратором или в результате репликации успешного удаления объекта после запуска программы DCPROMO.
     
    Ошибка 8419 (0x20E3)
    Не удается найти объект DSA

    Примечание. Это сообщение об ошибке также может появиться при подключении к удаляемому контроллеру домена. Программа Ntdsutil не должна подключаться к контроллеру домена, который будет удаляться при очистке метаданных.
  15. Введите в каждом меню команду quit и нажмите клавишу ВВОД, чтобы завершить работу с программой Ntdsutil. Появится сообщение об отключении от сервера.
  16. Удалите запись типа cname в зоне _msdcs.корневой_домен_леса на сервере DNS. Предположим, контроллер домена будет установлен повторно и его роль будет повышена. В этом случае создается новый объект NTDS Settings с новым идентификатором GUID и новой записью типа cname в DNS. Если не удалить старую запись типа cname, то она может быть использована существующими контроллерами домена.

    Кроме того, рекомендуется удалять имя компьютера и другие связанные с ним записи DNS. По истечении срока аренды адреса DHCP, выделенного данному серверу, другой компьютер может получить этот IP-адрес.
  17. С помощью консоли управления DNS удалите в DNS запись A. Запись А также называют записью узла. Для удаления записи типа А щелкните ее правой кнопкой мыши и выберите команду Удалить. Удалите также запись типа cname в контейнере _msdcs. Для этого разверните контейнер _msdcs, правой кнопкой мыши щелкните запись cname и выберите команду Удалить.

    Внимание! Если удаляется DNS-сервер, необходимо удалить ссылку на данный контроллер домена на вкладке Серверы имен. Для этого в консоли DNS выберите имя домена в списке Зоны прямого просмотра и удалите сервер на вкладке Серверы имен.

    Примечание. Кроме того, сервер необходимо удалить из зон обратного просмотра (если они используются).
  18. Если удаленный компьютер был последним контроллером в дочернем домене, который также удаляется, следует с помощью средства ADSIEdit удалить объект trustDomain дочернего домена. Для этого выполните следующие действия:
    1. Выберите в меню Пуск пункт Выполнить, введите команду adsiedit.msc и нажмите кнопку .
    2. Разверните контейнер Domain NC.
    3. Разверните DC=имя_домена, DC=COM, PRI, LOCAL, NET.
    4. Разверните узел CN=System.
    5. Щелкните правой кнопкой мыши объект Trust Domain и выберите команду Удалить.
  19. Для удаления контроллера домена с помощью оснастки "Active Directory – cайты и службы" Для этого выполните следующие действия:
    1. Запустите оснастку "Active Directory – сайты и службы".
    2. Разверните элемент Узлы.
    3. Разверните узел сервера. По умолчанию используется узел Default-First-Site-Name.
    4. Разверните элемент Сервер.
    5. Щелкните правой кнопкой мыши контроллер домена и выберите команду Удалить.
  20. При использовании репликации DFS в системе Windows Server 2008 или более поздней версии текущая версия средства Ntdsutil.exe не выполняет очистку объекта репликации DFS. В этом случае объекты репликации DFS для доменных служб Active Directory (AD DS) можно исправить вручную с помощью оснастки Adsiedit.msc. Для этого выполните действия, указанные ниже.
    1. Войдите на контроллер домена как администратор домена.
    2. Запустите оснастку Adsiedit.msc.
    3. Подключитесь к контексту именования по умолчанию.
    4. Найдите следующий контейнер топологии репликации DFS:
      CN=Topology,CN=Domain System Volume,CN=DFSR-Globalsettings,CN=System,DC=Your Domain,DC=Domain Suffix
      .
    5. Удалите объект CN msDFSR-Member с именем старого компьютера."

понедельник, 27 мая 2013 г.

Ошибка при установке Microsoft Office. Службе установщика Windows не удаётся обновить один или несколько защищённых файлов Windows

Описание:
При установке Microsoft Office 2007/2010 на компьютер с операционной системой Windows XP может возникнуть проблема: в процессе установки появляется сообщение "Ошибка при установке Microsoft Office. Службе установщика Windows не удаётся обновить один или несколько защищённых файлов Windows.".

На Windows Vista и Windows 7 Microsoft Office ставится без проблем, однако, как показывает практика, часто возникает желание поставить офис на Windows XP.

После появления ошибки выполняется полный откат изменений.

Решение:
1) Найти папку по следующему адресу Program Files/Common Files/Microsoft Shared/web server extensions/40/bin
2) Скачать файл fp4autl.dll с машины с такой же версией Windows, или найти в интернет.
3) Поместить полученный файл в вышеуказанную папку.

Если Windows покажет сообщение:"Файлы, нужные для правильной работы Windows, были заменены неизвестными версиями. Для обеспечения стабильной работы системы Windows необходимо восстановить оригинальные версии этих файлов.", смело игнорируем его.

4) Заново запускаем установку Microsoft Office. На этот раз она должна пойти без ошибок, по крайней мере без этой :)

P.S. Если ошибка повторяется, пробуем перегрузить компьютер. После этого обязательно проверяем, есть ли необходимый файл в нужной папке (пункты 1 и 2). Если нет, то повторяем вышеуказанные действия.

Эмуляторы устройств TP-LINK

Крайне полезная вещь для ознакомления с функционалом устройства - на сайте производителя.

Наглядно демонстрирует, например, что именно умеет тот или иной WiFi-роутер.

http://www.tp-link.com/en/support/emulators/

Коллекции драйверов: ссылки

http://driverpacks.net/ - богатая коллекция драйверов, сгруппированная по категориям и доступная к скачиванию через торренты.

http://drp.su/ru/ - это самая популярная программа для автоматической установки, обновления и поиска драйверов. Поможет скачать драйвера бесплатно.
Это универсальный менеджер установки драйверов для всех версий Windows. В отличие от встроенной в Windows 7 функции обновления драйверов, этой программой можно пользоваться даже без наличия Интернета и для поиска/установки драйверов не только на устройства популярных вендеров (как в случае с Windows Update).

Эксперимент с обезьянами: формирование общества.

Клетка. В ней 5 обезьян. К потолку подвязана связка бананов. Под ними
лестница. Проголодавшись, одна из обезьян подошла к лестнице с явными
намерениями достать банан. Как только она дотронулась до лестницы, вы
открываете кран и со шланга поливаете ВСЕХ обезьян очень холодной водой.
Проходит немного времени, и другая обезьяна пытается полакомится
бананом. Те же действия с вашей стороны.
ОТКЛЮЧИТЕ ВОДУ.
Третья обезьяна, одурев от голода пытается достать банан, но остальные
хватают ее, не желая холодного душа.
А теперь, уберите одну обезьяну из клетки и замените ее новой обезьяной.
Она сразу же, заметив бананы, пытается их достать. К своему ужасу, она
увидела злые морды остальных обезьян атакующих ее. После третьей попытки
она поняла, что достать банан ей не удастся. Теперь уберите из клетки
еще одну из первоначальных пяти обезьян и запустите туда новенькую. Как
только она попыталась достать банан, все обезьяны дружно атаковали ее,
причем и та, которую заменили первой (да еще с энтузиазмом).
И так, постепенно заменяя всех обезьян, вы придете к ситуации, когда в
клетке окажутся 5 обезьян, которых водой вообще не поливали, но которые
не позволят никому достать банан.
Почему?
ПОТОМУ, ЧТО ТАК ТУТ ЗАВЕДЕНО!

(C) очень многие

воскресенье, 26 мая 2013 г.

Платон. Апология Сократа.

Нашел на oper.ru фрагмент текста, придется читать полностью :)

"После государственных людей ходил я к поэтам — и к трагическим, и к дифирамбическим, и ко всем прочим, — чтобы хоть тут уличить себя в том, что я невежественнее их. Брал я те из их произведений, которые, как мне казалось, всего тщательнее ими обработаны, и спрашивал у них, что именно они хотели сказать, чтобы, кстати, научиться от них кое-чему. Стыдно мне, афиняне, сказать вам правду, а сказать все-таки следует. Одним словом, чуть ли не все там присутствовавшие лучше могли бы объяснить творчество этих поэтов, чем они сами. Таким образом, и о поэтах я узнал в короткое время, что не благодаря мудрости могут они творить то, что творят, но благодаря какой-то природной способности и в исступлении, подобно гадателям и прорицателям; ведь и эти тоже говорят много хорошего, но совсем не знают того, о чем говорят. Нечто подобное, как мне показалось, испытывают и поэты; и в то же время я заметил, что из-за своего поэтического дарования они считают себя мудрейшими из людей и во всем прочем, а на деле это не так. Ушел я и оттуда, думая, что превосхожу их тем же самым, чем и государственных людей.
Наконец пошел я и к тем, кто занимается ручным трудом. Я сознавал, что сам, попросту говоря, ничего не умею, зато был уверен, что уже среди них найду таких, кто знает много хорошего. Тут я не ошибся; в самом деле они умели делать то, чего я не умел, и в этом были мудрее меня. Но, афиняне, мне показалось, что они грешили тем же, чем и поэты: оттого что они хорошо владели своим делом, каждый из них считал себя самым мудрым также и во всем прочем, даже в самых важных вопросах, и это заблуждение заслоняло собою ту мудрость, какая у них была; так что, желая оправдать слова оракула, я спрашивал сам себя, что бы я для себя предпочел: оставаться ли таким, как есть, и не быть ни мудрым их мудростью, ни невежественным их невежеством или, как они, быть и мудрым и невежественным. И я отвечал самому себе и оракулу, что лучше уж мне оставаться как есть."

Статья в Wiki.
Текст полностью.

пятница, 24 мая 2013 г.

Усложнение сущностей :) Желающим выбрать велосипед.

На момент публикации автором планировал покупать велосипед, зацепило. Цитирую полностью, т.к. журнал сменил владельца. Жаль, некоторые статьи были очень _бодрые_.

"Люди "в теме" очень любят переусложнять вопрос, которым занимаются.

Взять, к примеру, фотографию. Сколько копий ломается на форумах относительно преимуществ одной техники над другой, как сложно разобраться во всём этом неофиту, какими страшными бюджетами на минимальный приличный комплект его пугают... А на самом деле, как я убедился со временем, всё гораздо проще - на совершенно разную технику люди снимают совершенно по-разному, поэтому не суть важно, чем будет пользоваться любитель. Или извечный вопрос "какой нож носить для самообороны". Ооо, сколько многословных дискуссий на эту тему! А на самом деле, ответ-то в сущности прост: любой. Главное - носи, блеать.

Это всё к чему: в связи с наступлением весны и переездом в центр города, у меня появился очередной порыв купить велосипед. Стоило чуть-чуть почитать интернет на эту тему, как пришла пора то ли рассмеяться, то ли ужаснуться: почитать велосипедные форумы, так возникает ощущение, что велик - агрегат посложнее самолёта. Что выбрать его можно, только изучив огромный объём теории и практики, посоветовавшись с различными гуру (причём, уровень высокомерия к этой среде покруче фотографического), и уж конечно, стоить это будет больше любой суммы, которую вы неосторожно озвучите в качестве ориентира. Страсти какие-то творятся на любом форуме и в любой статье - непонятные англицизмы, советы по сбору какого-то конструктора... про ашанбайки какие-то хихикают.
...
Выглядит очень забавно. Я, конечно же, понимаю, что какая-то экстремальная езда, а уж тем паче - спорт или туризм, это дело, требующее серьёзного знания вопроса, и, разумеется, довольно приличных денег. Как и в любой сфере, серьёзная задача требует для решения серьёзного же подхода. Но ей-Богу, большинство неофитов-то как в фотографии хотят снимать кошечек и цветочки, как с ножом не будут тренироваться по снарядам и выступать на турнирах, так и тут - тупо хотят покатать жопу в своё удовольствие, а не увлечённо ковыряться в железках и собирать конфигурацию мечты. Ну надо же проще быть))

В конце концов, ездил я когда-то на обычном совковом велосипеде, уж не помню каком - и ничего. Конечно, экстримом всяким или велотуризмом на нём не позаниматься, спортивного результата не показать, но вроде он не развалился в ходе эксплуатации, и я на нём не убился. Совершенно не разбираясь в трансмиссиях и амортизаторах)) А так, возникает ощущение, что большинству публики на этих ресурсах в жизни не хватает более серьёзных проблем. "

Найдено когда-то здесь Danny King's "The Lad Diaries" - Why so serious?

Восстановление стека TCP/IP в Windows XP

Мне статья помогла после того, как в декабре 2012 года, AVAST решил, что файл tcpip.sys - страшный и ужасный вирус.Сегодня нашел ее в закладках, решил сохранить на всякий случай :)
 
Парочка решений, как восстановить систему с аналогичной проблемой, есть тут и тут.

Далее - одна большая цитата от http://milleniumbug.livejournal.com/.


"Возможно, вы сталкивались с вирусами/троянами, после лечения которых перестает нормально работать сеть («компьютер не выходит в интернет»). Как человек, угробивший кучу времени на борьбу с этим замечательным явлением на нескольких компьютерах, считаю нужным записать рецепт.

Как может проявляться проблема:
  • Команда ipconfig выдает ошибку.
  • Не работает получение адреса по dhcp (команда ipconfig /renew).
  • «Странные знаки» вместо IP-адреса в выводе команды ping.
  • Касперский при запуске выдает ошибки типа «Сбой при запуске монитора HTTP-трафика».
  • ActiveSync при запуске выдает ошибку типа «TCP/IP network transport is not installed».
  • В диспетчере устройств при включенном «Показать скрытые устройства» в разделе «Драйверы устройств не Plug and Play» драйвер протокола TCP/IP не виден или показан как отключенный и отображается сообщение об ошибке.
Могут, естественно, быть и другие симптомы.

Как можно бороться:
Внимание! Текст писался давно и про Windows XP. Вполне допускаю, что в более современных версиях названия папок, файлов, кнопок в окнах и прочего отличаются. Более того, эти рецепты могут вообще не подойти. Используйте с умом, пожалуйста :)

Начинаю я со сканирования всех жестких дисков с аварийного диска Касперского со свежими базами. Править недолеченную винду — удовольствия мало, да и смысла может не быть.

Если у каких-то сетевых соединений IP-адреса назначены вручную, выписываем их или делаем скриншоты. На следующем шаге эти настройки скорее всего слетят.

Даем команду netsh int ip reset, перезагружаемся. Помогло? Замечательно. Нет? Едем дальше.

Даем команду netsh winsock reset, перезагружаемся. Это может не работать на Windows до SP2. После этого действия может слететь интеграция в стек TCP/IP антивирусов, фаерволлов, клиентов для проксей. Правится или повторной установкой нужных галок в настройках этих программ, или их переустановкой.

Простые методы закончились :) Возможно, поврежден или остутствует файл tcpip.sys. Восстановить его можно командой expand X:\i386\tcpip.sy_ c:\windows\system32\tcpip.sys, где X: — буква диска с дистрибутивом. После восстановления перезагружаемся.

Возможно, дело в каких-то еще системных файлах, потертых или измененных. Запустить проверку с восстановлением из дистрибутива по необходимости можно командой sfc /scannow. Мне не помогло, работало долго, но ошибок никаких не нашло.

Видел рекомендацию воспользоваться софтинкой http://www.snapfiles.com/get/winsockxpfix.html — мне не помогло, но «десять баксов-то не лишние» — вдруг кому поможет. Софтинка небольшая, около мегабайта весит.

Можно попробовать заново установить протокол TCP/IP. В свойствах подключения к локальной сети на вкладке Общие щелкаем Установить -> Протокол -> Добавить. В окне Выбор сетевых протоколов щелкаем Установить с диска, вводим путь C:\windows\inf, нажимаем ОК. Выделяем Протокол Интернета (TCP/IP), нажимаем ОК. Проверяем настройки IP, перезагружаемся.

Можно попробовать в диспетчере устройств удалить и установить заново сетевую карту. Я не пробовал.

Полная переустановка TCP/IP (собственно, статья скопирована из-за него :) ):
Если ничего из вышеперечисленного не восстановило работоспособность, осталась еще одна процедура, помогающая избежать переустановки Windows. Кстати, переустановка «поверх», с сохранением настроек, программ и документов, может не устранить проблему. Пробовал, сталкивался.

Итак, отращиваем бороду, покупаем бубен, надеваем толстые очки и засучиваем рукава.

Внимание! Текст писался давно и про Windows XP. Вполне допускаю, что в более современных версиях названия папок, файлов, кнопок в окнах и прочего отличаются. Более того, эти рецепты могут вообще не подойти. Используйте с умом, пожалуйста :)

  1. Открываем в блокноте файл c:\windows\inf\nettcpip.inf.
  2. Находим секцию [MS_TCPIP.PrimaryInstall]..
  3. В записи Characteristics = 0xA0 замеяем 0xA0 на 0x80.
  4. Сохраняем, закрываем.
  5. Открываем Сетевые подключения, там открываем свойства Подключения к локальной сети.
  6. На вкладке Общие щелкаем Установить -> Протокол -> Добавить.
  7. В окне Выбор сетевых протоколов щелкаем Установить с диска.
  8. Вводим путь C:\windows\inf, нажимаем ОК.
  9. Выделяем Протокол Интернета (TCP/IP), нажимаем ОК. Теперь в свойстве подключения стало возможно снести TCP/IP.
  10. Выделяем Протокол Интернета (TCP/IP), нажимаем кнопку Удалить, затем ОК.
  11. Запускаем regedit, удаляем ветки реестра HKLM\System\CurrentControlSet\Services\Winsock и HKLM\System\CurrentControlSet\Services\Winsock2.
  12. Перезагружаемся.
  13. В файле c:\windows\inf\nettcpip.inf меняем обратно 0x80 на 0xA0, сохраняем, закрываем.
  14. Открываем Сетевые подключения, там открываем свойства Подключения к локальной сети.
  15. На вкладке Общие щелкаем Установить -> Протокол -> Добавить.
  16. Выделяем Протокол Интернета (TCP/IP), нажимаем ОК.
  17. При необходимости восстанавливаем настройки адресов IP, перезагружаемся. TCP/IP работает.

Предпоследний пункт может не сработать, выдав «расширенную ошибку». Возможно, если не менять обратно файл nettcpip.inf, этой ошибки не возникнет. Дело в том, что системная база безопасности почему-то оказывается в неправильном состоянии. Как быть в этом случае? Для проверки сначала запускаем команду:

esentutl /g c:\windows\security\Database\secedit.sdb

Если в выводе между строчками Checking database integrity и Integrity check successful нет никаких сообщений, что что-то не так, значит с базой все в порядке. У меня было сообщение типа This operation may find that this database is corrupt.

Пробуем восстановление базы (у меня не сработало):

esentutl /r c:\windows\security\Database\secedit.sdb

Делаем ремонт базы:

esentutl /p c:\windows\security\Database\secedit.sdb

После этого запуск с ключом /g должен показать, что база в порядке, и TCP/IP установится. Эти манипуляции с базой безопасности могут что-то такое сделать с групповыми политиками, так что если вы ими пользуетесь, проверьте, все ли там в порядке.

Надеюсь, все написанное здесь вам не пригодится, а если все-таки пригодится, то сэкономит немало времени и нервов. "

Оригинал тут: http://milleniumbug.livejournal.com/9703.html?nojs=1

А действительно, почему? Может соя разная? :)

xxx: Почему, если "соевая кулинария" лежит в отделе, как вы написали, "здорового питания" - они офигенски полезна. Соевый соус (к суши всяким) - тоже круто и полезно. А если добавлена, например, в колбасу - то страшный яд, ГМО и причина рака?

Источник: http://bash.im/quote/420594

четверг, 23 мая 2013 г.

В Windows 7 сбились ассоциации файлов

Симптомы:
Не открывается ни одна программа или документ. 
На все действия выскакивает, например, Windows Media Center. (программа произвольная, у каждого своя - на какую сбились настройки)
И на всех иконках и EXE-шниках значок этой программы.


Решение:
Пуск - Выполнить - regedit.
Вкладки HKEY_CURRENT_USER > Software > Microsoft > Windows > CurrentVersion > Explorer > FileExts > .exe выделить вкладку UserChoice и удалить её.
Перезагрузка компьютера. 

В журнале приложений регистрируется событие с кодом 8

В журнале событий каждые 2 минуты регистрируется такое событие:

Тип события: Ошибка
Источник события: crypt32
Категория события: Отсутствует
Код события: 8
Дата: 02.11.2010
Время: 11:57:19
Пользователь: Н/Д
Компьютер: COMPUTER
Описание:
Ошибка получения автоматического обновления последовательного номера стороннего корневого списка из: с кодом ошибки: Возврат из операции произошел из-за превышения времени ожидания.

Если видим это, открываем "Установка/удаление программ" - "Установка компонентов Windows", и снимаем там флажок с "Обновление корневых сертификатов".
 
Почитать тут:
http://support.microsoft.com/kb/317541/ru
http://alex-tesla.livejournal.com/4113.html

Не работает заливка ячеек в MS Excel

Описание и симптомы:
Не работает заливка ячеек в MS Excel 2003.
Заливка ячеек и цвет шрифта наблюдается только в режиме просмотра и во время ввода данных, а после ввода все становится черно-белым.
Условное форматирование 100% не причем
Если зайти в систему под другим пользователем, всё нормально.
Переустановка Excel не помогает.

Решение:
Отключаем "Панель управления > Специальные возможности > Экран > Высокая контрастность"

А первый раз решил проблему удалением профиля пользователя :)

Глубокая мысль

Цитата:
В Петербурге весной таял лёд на Неве, и переходить через реку по льду стало опасно. Градоначальник распорядился поставить полицейских на берегу Невы и запрещать переход по льду. Какой–то крестьянин, несмотря на крики городового, пошёл по льду, провалился и стал тонуть. Городовой спас его от гибели, а крестьянин вместо благодарности стал упрекать его: «Чего смотрите?» Городовой говорит ему: «Я же тебе кричал». — «Кричал! Надо было в морду дать!»
(c) Лосский, Н. Характер русского народа
в Сб.: Философия: хрестоматия, — М., Изд–во РАГС, 2006. — с. 579. 

Нашел на oper.ru. Там же, в комментариях:
 
Разговаривают двое:
- Вот ты знаешь, кого в мире больше, людей с визуальным или аудиальным восприятием?
- С кинестетическим. Пока в морду не дашь, нихрена не воспринимают!



Как включить telnet в windows 7

Пуск - Панель управления - Программы и компоненты - Включение или отключение компонентов Windows - Клиент Telnet

Или в командной строке ввести
Пуск - cmd - в появившемся окне правой мышкой на приложение - запуск от имени Администратора:

dism /online /Enable-Feature /FeatureName:TelnetClient

Если список компонентов пустой, правим реестр (проверено только на Win32):
Пуск - regedit - HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Windows
для параметра CSDVersion вместо "200" поставить "0"


1С неправильно расчитывает номер недели в году

     Для определения номера недели в конфигурациях 1С обычно используется стандартная функция НомерНеделиГода(). Судя по всему, 1С считает по американской системе:
"По европейской норме (DIN 1355 / ISO 8601) первой неделей года считается неделя, содержащая 4 января данного года (http://vsegost.com/Catalog/62/6263.shtml). А в США первой неделей считается любая неделя, содержащая первое января, независимо от числа дней".
     Чтобы 1С возвращала номер недели, совпадающий с "человеческими" календарями и ежедневниками, предлагается использовать следующую функцию:

Функция глНомерНеделиГода(_дата) Экспорт

   ЧетвертоеЯнваря = НачГода(_дата) + 3; 
   НачалоПервойНедели = НачНедели(ЧетвертоеЯнваря);  

   Если _дата < НачалоПервойНедели Тогда
      // дата принадлежит последней неделе прошлого года.
      Возврат глНомерНеделиГода(Дата(ДатаГод(_дата)-1, 12, 31));
   Иначе
      // получаем разницу дат в неделях.
      КоличествоНедель = Цел((НачНедели(_дата) - НачалоПервойНедели)/7);
      Возврат 1 + КоличествоНедель;
   КонецЕсли;

КонецФункции   // глНомерНеделиГода()



Обсуждение здесь: http://forum.infostart.ru/forum26/topic61578/