Я сейчас глупость спрошу, но может у кого-нибудь номер моей аськи сохранился?

---

Вы таки не поверите, я вспомнил логин/пароль от своего Дайра. не факт что я сюда буду часто заглядывать, но все же хотелось знать кто из ПЧ еще тут.
и Да я рад что все же я вернулся! с чем меня и поздравляем

---

Вы не поверите, но снова буду краток.

8-30, 56 см, 4290 г
Лариса Сергеевна


Спасибо, Любимая

---

Посылка в будущее... =(

Надеюсь таки да отправят...

---

Google Earth в Ubuntu 10.04

под катом статья по сборке

Установка Google Earth в Ubuntu 10.04

Лично я знаю два способа установки Google Earth в Ubuntu 10.04: первый через репозиторий Medibuntu, второй – через deb-пакет googleearth-package в репозиториях Ubuntu.
Метод первый. Установка Google Earth через Medibuntu..
Все крайне просто: в репозитории Medibuntu есть deb-пакеты для Ubuntu 10.04. Загрузить или установить (если у Вас уже подключен репозиторий Medibuntu, как это сделать читаем здесь) Google Earth можно на этой странице. В самом ее низу есть пакеты и для 32-битных, и для 64-битных систем.

Метод второй. С помощью пакета googleearth-package.
В репозитории Medibuntu может содержаться не самая свежая версия программы Google Earth. Однако Вы можете самостоятельно создать свой deb-пакет программы с помощью скрипта, который есть в репозиториях Ubuntu.

1. С помощью Центра приложений Ubuntu или с помощью apt установим пакет googleearth-package
2. Зайдем в терминал и выполним следующую команду:

make-googleearth-package --force

3. Ждем пока скрипт закончит свою работу: как всегда скорость выполнения зависит от Вашего компьютера и скорости соединения с интернетом. По окончании работы скрипта Вы увидите следующий текст:

Success!
You can now install the package with e.g. sudo dpkg -i .deb

4. В домашней папке Вас ждет deb-пакет с именем googleearth_VERSION_ARCH.deb, либо запустим его установку дабл-кликом мыши, либо выполним предлагаемую скриптом установку через dpkg
5. Запустим программу через меню Приложения – Интернет – Google Earth
источник

@темы: Linux

---

Закрытая запись, не предназначенная для публичного просмотра

---

да-да-да

выловленое из Бездны...


xxx: а что вообще такое этот 1С?
xxx: типа МС офиса?
yyy: это база данных в первую очередь
yyy: к ней приделан собственный 1с интерфейс
yyy: и встроенный 1с язык программировани (на руссокм, я когда впервые увидела - со смеху чуть не сдохла)
xxx: ясно
xxx: а блэкджек есть?
yyy: нет, но шлюх полно ))

@темы: bash.org.ru, 1с

---

Adobe flash player VS кодировка cp1251

it's a work

Для большинства линуксоидов известна проблема с кириллицей и виндовыми кодировками в плагине flash player для браузеров. При попытке набора текста кириллицей в любых флеш приложениях, видны были только кракозябры. *nix пользователям приходилось набирать текст в других редакторах, а дальше ctrl+C && ctrl+V. В багрепортах этот баг известен, адоб уже достаточно давно обещался его пофиксить.
Может для кого то это уже и не новость, но наконец то свершилось! В версии Flash Player 10.1 Beta 2 кириллица набивается вполне себе корректно.

Рецепт установки простой.
Проверяем что воспроизводит flash сейчас, для этого в строке браузера набираем about:plugins
Удаляем живущий у нас плагин, далее на всякий случай проверяем не осталось ли чего:
sudo find / -iname *flashplayer*.so //смотрим что консоль кажет)
Что то нашло? Убиваем/бекапим

Далее:
wget download.macromedia.com/pub/labs/flashplayer10/... //забираем архивчик
tar -zxvf flashplayer10_1_p2_linux_121709.tar.gz //распаковываем
cd install_flash_player_10_linux && chmod +x flashplayer-installer && ./flashplayer-installer //переходим в папку с заботливо приготовленным для нас инсталлятором, даем ему права на выполнение, устанавливаем flash

Перезапускаем браузер, все, радуемся жизни.
Для браузера OPERA в папке с самим плагином выполняем sudo cp libflashplayer.so /usr/lib/opera/plugins/ (из конфигов в домашнем каталоге опера наотрез отказалась подхватывать)
Протестировал на ubuntu 9.10 [chrome 4.0249; firefox 3.5.6; opera 10.10]
Для 64 битных систем пробуйте Flash Player 10 for 64-bit Linux, но я не тестил — не на чем.
Для старта 32 битной версии flashplugin в 64 битных версиях ОС пробуйте использовать вот этот костыль.

источник

@темы: Linux

---

грустно...

...

умер дед... Светлая память...

---

---

Закрытая запись, не предназначенная для публичного просмотра

---

Пойти узнать, какой ты котик uborshizzza.livejournal.com/711777.html

@темы: Улыбнуло

---

Закрытая запись, не предназначенная для публичного просмотра

---

И снова ДНСы

www.dnsserverlist.org/

После перехода по ссылке сервис предлагает 3 наиболее быстрых dns для вашего ip

---

журнал регистраций

Вряд ли кому кроме меня понадобится. кодинг в 1с.

Добавить в какой-либо общий модуль процедуру

// Универсальная процедура, регистрирующая изменения реквизитов объекта (справочник, документ, план обмена, ПВХ)
// в журнале регистрации
Процедура РегистрацияИзмененийРеквизитовОбъекта(Объект) Экспорт
Перем МетаданныеОбъекта;

Если НЕ Объект.Ссылка.Пустая() Тогда
МетаданныеОбъекта = Объект.Метаданные();

СтрокаСобытие = "Данные.ИзменениеРеквизитов." + МетаданныеОбъекта.Имя;
ПрежнийОбъект = Объект.Ссылка;

СтрокаСообщениеРеквизит = "Изменён реквизит ";
СтрокаСообщениеТабЧасть = "Изменена таб.часть ";
СтрокаСообщениеТабЧастьУдалено = "Удалено ";
СтрокаСообщениеТабЧастьДобавлено = "Добавлено ";

ЭтоСправочник = Справочники.ТипВсеСсылки().СодержитТип(ТипЗнч(Объект.Ссылка));
ЭтоПланОбмена = ПланыОбмена.ТипВсеСсылки().СодержитТип(ТипЗнч(Объект.Ссылка));
ЭтоПВХ = ПланыВидовХарактеристик.ТипВсеСсылки().СодержитТип(ТипЗнч(Объект.Ссылка));
ЭтоДокумент = Документы.ТипВсеСсылки().СодержитТип(ТипЗнч(Объект.Ссылка));

Если ЭтоДокумент Тогда
Если ПрежнийОбъект.Номер <> Объект.Номер Тогда
ЗаписьЖурналаРегистрации(СтрокаСобытие, УровеньЖурналаРегистрации.Предупреждение, МетаданныеОбъекта, Объект.Ссылка, СтрокаСообщениеРеквизит + " номер " + Символы.ВК + "Прежний: " + ПрежнийОбъект.Номер + ". Новый: " + Объект.Номер);
КонецЕсли;
Если ПрежнийОбъект.Дата <> Объект.Дата Тогда
ЗаписьЖурналаРегистрации(СтрокаСобытие, УровеньЖурналаРегистрации.Предупреждение, МетаданныеОбъекта, Объект.Ссылка, СтрокаСообщениеРеквизит + " дата " + Символы.ВК + "Прежний: " + ПрежнийОбъект.Дата + ". Новый: " + Объект.Дата);
КонецЕсли;
Иначе
Если СокрЛП(ПрежнийОбъект.Наименование) <> СокрЛП(Объект.Наименование) Тогда
ЗаписьЖурналаРегистрации(СтрокаСобытие, УровеньЖурналаРегистрации.Предупреждение, МетаданныеОбъекта, Объект.Ссылка, СтрокаСообщениеРеквизит + " наименование " + Символы.ВК + "Прежнее: " + ПрежнийОбъект.Наименование + Символы.ВК + "Новое: " + Объект.Наименование);
КонецЕсли;
Если СокрЛП(ПрежнийОбъект.Код) <> СокрЛП(Объект.Код) Тогда
ЗаписьЖурналаРегистрации(СтрокаСобытие, УровеньЖурналаРегистрации.Предупреждение, МетаданныеОбъекта, Объект.Ссылка, СтрокаСообщениеРеквизит + " код " + Символы.ВК + "Прежний: " + ПрежнийОбъект.Код + ". Новый: " + Объект.Код);
КонецЕсли;
Если ЭтоСправочник Тогда
Если МетаданныеОбъекта.Иерархический И (ПрежнийОбъект.Родитель <> Объект.Родитель) Тогда
ЗаписьЖурналаРегистрации(СтрокаСобытие, УровеньЖурналаРегистрации.Предупреждение, МетаданныеОбъекта, Объект.Ссылка, "Изменена группа " + Символы.ВК + "Прежняя: " + ПрежнийОбъект.Родитель + Символы.ВК + "Новая: " + Объект.Родитель);
КонецЕсли;
Если (МетаданныеОбъекта.Владельцы.Количество() <> 0) И (ПрежнийОбъект.Владелец <> Объект.Владелец) Тогда
ЗаписьЖурналаРегистрации(СтрокаСобытие, УровеньЖурналаРегистрации.Предупреждение, МетаданныеОбъекта, Объект.Ссылка, "Изменён владелец элемента " + Символы.ВК + "Прежний: " + ПрежнийОбъект.Владелец + Символы.ВК + "Новый: " + Объект.Владелец);
КонецЕсли;
КонецЕсли;
КонецЕсли;

Если МетаданныеОбъекта.Реквизиты.Количество() > 0 Тогда
Для каждого МетаданныеРеквизиты Из МетаданныеОбъекта.Реквизиты Цикл
Реквизит = МетаданныеРеквизиты.Имя;
НовыйРеквизитЗначение = Объект[Реквизит];
ПрежнийРеквизитЗначение = ПрежнийОбъект[Реквизит];
Если ТипЗнч(НовыйРеквизитЗначение) = Тип("Строка") Тогда
НовыйРеквизитЗначение = СокрЛП(НовыйРеквизитЗначение);
КонецЕсли;
Если ТипЗнч(ПрежнийРеквизитЗначение) = Тип("Строка") Тогда
ПрежнийРеквизитЗначение = СокрЛП(ПрежнийРеквизитЗначение);
КонецЕсли;
Если ПрежнийРеквизитЗначение <> НовыйРеквизитЗначение Тогда
ЗаписьЖурналаРегистрации(СтрокаСобытие, УровеньЖурналаРегистрации.Предупреждение, МетаданныеОбъекта, Объект.Ссылка, СтрокаСообщениеРеквизит + Реквизит + Символы.ВК + "Прежний: " + Строка(ПрежнийРеквизитЗначение) + Символы.ВК + "Новый: " + Строка(НовыйРеквизитЗначение));
КонецЕсли;
КонецЦикла;
КонецЕсли;

Если МетаданныеОбъекта.ТабличныеЧасти.Количество() > 0 Тогда

// Определяем список проверяемых реквизитов табличных частей,
// чтобы не забивать журнал регистрации лишними записями.
// Для каждой конфигурации определить свой список, либо удалить проверку
// Здесь приведён пример для Управления Торговлей.
ПроверяемыеРеквизитыТабЧасти = Новый Структура("Номенклатура, ЕдиницаИзмерения, Количество, Цена, Сумма, СтавкаНДС, СерияНоменклатуры, ХарактеристикаНоменклатуры, СерияНоменклатурыНовая, ХарактеристикаНоменклатурыНовая, СерияНоменклатурыСтарая, ХарактеристикаНоменклатурыСтарая, Проект, ЗаказПокупателя, Сделка, ДокументПартии, ДокументРасчетовСКонтрагентом, СуммаВзаиморасчетов, ДоговорКонтрагента, Контрагент, СтатьяДвиженияДенежныхСредств, ПроцентСкидкиНаценки, НаименованиеТовара, ЗаказПоставщику, ДокументПоступления, ДокументОснование, ИсходноеРазмещение, НовоеРазмещение, СуммаТовара, СуммаПлатежа, Размещение, УвеличениеДолгаКонтрагента, УменьшениеДолгаКонтрагента, КоличествоУчет, ДокументРезерва, ТипЦен, Валюта, Пользователь, ВидЗадолженности, ВидОперации");

//This code is ported from www.kb.mista.ru/article.php?id=115
Для Каждого МДТЧ ИЗ МетаданныеОбъекта.ТабличныеЧасти Цикл
ИмяТЧ = МДТЧ.Имя;
ТЧ1 = Объект[ИмяТЧ];
ТЧ2 = ПрежнийОбъект[ИмяТЧ];
ТЧ1Количество = ТЧ1.Количество();
ТЧ2Количество = ТЧ2.Количество();
Если ТЧ1Количество <> ТЧ2Количество Тогда
ЗаписьЖурналаРегистрации(СтрокаСобытие, УровеньЖурналаРегистрации.Предупреждение, МетаданныеОбъекта, Объект.Ссылка, СтрокаСообщениеТабЧасть + ИмяТЧ + Символы.ВК + "Прежняя: " + Строка(ТЧ2Количество) + ". Новая: " + Строка(ТЧ1Количество));
КонецЕсли;
Если ТЧ1Количество = ТЧ2Количество Тогда
СтрокаСообщение = СтрокаСообщениеРеквизит;
ИначеЕсли ТЧ2Количество > ТЧ1Количество Тогда
СтрокаСообщение = СтрокаСообщениеТабЧастьУдалено;
ИначеЕсли ТЧ2Количество < ТЧ1Количество Тогда
СтрокаСообщение = СтрокаСообщениеТабЧастьДобавлено;
КонецЕсли;

Для Инд = 0 По Макс(ТЧ1Количество - 1, ТЧ2Количество - 1) Цикл
Для Каждого МДРТЧ ИЗ МДТЧ.Реквизиты Цикл
Реквизит = МДРТЧ.Имя;

// При необходимости проверку можно удалить
Если НЕ ПроверяемыеРеквизитыТабЧасти.Свойство(Реквизит) Тогда
Продолжить;
КонецЕсли;

Если Инд >= ТЧ1Количество Тогда
НовыйРеквизитЗначение = Неопределено;
Иначе
НовыйРеквизитЗначение = ТЧ1[Инд][Реквизит];
КонецЕсли;
Если Инд >= ТЧ2Количество Тогда
ПрежнийРеквизитЗначение = Неопределено;
Иначе
ПрежнийРеквизитЗначение = ТЧ2[Инд][Реквизит];
КонецЕсли;

Если (ЗначениеЗаполнено(ПрежнийРеквизитЗначение) И ЗначениеЗаполнено(НовыйРеквизитЗначение)) ИЛИ (НЕ ЗначениеЗаполнено(ПрежнийРеквизитЗначение) И ЗначениеЗаполнено(НовыйРеквизитЗначение)) ИЛИ (ЗначениеЗаполнено(ПрежнийРеквизитЗначение) И НЕ ЗначениеЗаполнено(НовыйРеквизитЗначение)) Тогда
Если ТипЗнч(НовыйРеквизитЗначение) = Тип("Строка") Тогда
НовыйРеквизитЗначение = СокрЛП(НовыйРеквизитЗначение);
КонецЕсли;
Если ТипЗнч(ПрежнийРеквизитЗначение) = Тип("Строка") Тогда
ПрежнийРеквизитЗначение = СокрЛП(ПрежнийРеквизитЗначение);
КонецЕсли;
Если НовыйРеквизитЗначение <> ПрежнийРеквизитЗначение Тогда
ЗаписьЖурналаРегистрации(СтрокаСобытие, УровеньЖурналаРегистрации.Предупреждение, МетаданныеОбъекта, Объект.Ссылка, СтрокаСообщение + ИмяТЧ + "." + Реквизит + " в строке " + (Инд + 1) + Символы.ВК + "Прежний: " + Строка(ПрежнийРеквизитЗначение) + Символы.ВК + "Новый: " + Строка(НовыйРеквизитЗначение));
КонецЕсли;
КонецЕсли;

КонецЦикла;
КонецЦикла;
КонецЦикла;
КонецЕсли;

КонецЕсли;

КонецПроцедуры



Создать подписку на событие для документов

Источник = ДокументОбъект

Событие = ПередЗаписью

Назначить обработчик события

Процедура ПередЗаписьюДокументаПередЗаписью(Источник, Отказ, РежимЗаписи, РежимПроведения) Экспорт

//Изменения будем регистрировать для случаев проведения или отмены проведения,
//так как для простой записи контроль не имеет особого смысла
Если НЕ Отказ И ((РежимЗаписи = РежимЗаписиДокумента.Проведение) ИЛИ (РежимЗаписи = РежимЗаписиДокумента.ОтменаПроведения)) Тогда
РегистрацияИзмененийРеквизитовОбъекта(Источник);
КонецЕсли;

КонецПроцедуры

Создать подписку на событие для справочников (ПВХ, планов обменов)

Источник = ПланВидовХарактеристикОбъект, ПланОбменаОбъект, СправочникОбъект

Событие = ПередЗаписью

Назначить обработчик события

//Регистрируем изменения для справочника, плана обмена, ПВХ
//
Процедура ПередЗаписьюОбъектаПередЗаписью(Источник, Отказ) Экспорт

Если НЕ Отказ Тогда
РегистрацияИзмененийРеквизитовОбъекта(Источник);
КонецЕсли;

КонецПроцедуры

на случай если статья канет в лету. (с) Поручик

@темы: 1с, Программинг

---

Несколько интересностей

За достоверность не ручаюсь, но достаточно забавно и в принципе вполне так похоже на правду.

Почему новичков назвают чайниками? Что изначально значило слово "гаджет"? и некоторые другие интересности под катом (в картинках)

(c)копипизженно

@темы: Улыбнуло

---

Когда на небе загораются звезды....

... наверное это кому-нибудь нужно.

Когда в контакт листе вдруг видишь тех у кого ты был в инвиз-листе невольно начинаешь задумываться...

@темы: Мысли ни о чем

---

---

open source

ежели кто-нибудь из ПЧ задумает заиметь себе HP Compaq Mini 110c и поменять предустановленный мелкомягкий софт на опенсорс - обращайтесь, помогу чем смогу.))

а вообще советую брать асус, имхо они адекватнее

@темы: Linux

---

вот странно с одной стороны надо бы что-нибудь написать, только вроде и нечего писать. писать глупости - глупо, а про реал - а оно мне надо?

теперь у меня есть мысля (а стоит ли сохранять дайр и вообще зачем он нужен?), буду ее думать