Лингрин :: Резиденция Линды Кайе — @дневники: асоциальная сеть

пятница, 24 декабря 2010

06:41

Тотальная неудачница и убийца жёстких дисков.

#post-id: 3803-17-28
#original-date: 24.12.2010 Fri
#original-time: 5:28 PM
#original-day: 3803
#original-host: WinXP Home SP3 (Build 2600)

Оказывается, в MSXML нельзя через removeChild удалять атрибуты. Более того, если получить узел атрибута, то родителя у него не будет! Что делать? Оказывается, что у нормальных узлов есть свойство Attributes, в котором есть функция removeNamedItem(). Но кто ж знал?

URL

06:41

Тотальная неудачница и убийца жёстких дисков.

#post-id: 3803-02-56
#original-date: 24.12.2010 Fri
#original-time: 2:56 AM
#original-day: 3803
#original-host: WinXP Home SP3 (Build 2600)

Я всё думала, когда у меня дойдут руки до Notepad2 чтобы свою сборку также научить заменять Блокнот как это делает уже официальная версия. И тут меня осенило! Пишем вот такую бяку и делаем всё как в инструкции с сайта:

http://flos-freeware.ch/doc/notepad2-Replacement.html

Attribute VB_Name = "modMain"
Option Explicit

'====================================================================
Public Sub Main()
  'asRegisterAppPath
  'InitCommonControls
  'If Not asIsInIDE Then asSetWindowResIconAll asGetThunderMainHandle(), IDI_APPICON
  
  Dim Cmd As BStr
  Dim RC As Long
  
  Cmd = Command
  Cmd = Trim(Cmd)
  
  If Left(Cmd, 1) = """" Then
    RC = InStr(2, Cmd, """")
    
    If RC = 0 Then
      MsgBox Cmd, vbCritical
      Exit Sub
    End If
    
    Cmd = Mid(Cmd, RC + 1)
    Cmd = Trim(Cmd)
  Else
    RC = InStr(2, Cmd, " ")
    
    If RC = 0 Then
      MsgBox Cmd, vbCritical
      Exit Sub
    End If
    
    Cmd = Mid(Cmd, RC + 1)
    Cmd = Trim(Cmd)
  End If
  
  ShellExecute 0, "open", "D:\Utils\Notepad2\Notepad2.exe", Cmd, CurDir, SW_SHOWDEFAULT
End Sub

Только в реестре никакого /z не пишем. Просто что-то вроде этого:

"I:\StartNotepad2.EXE"

URL

06:41

Тотальная неудачница и убийца жёстких дисков.

#post-id: 3802-23-40
#original-date: 23.12.2010 Thu
#original-time: 11:40 PM
#original-day: 3802
#original-host: WinXP Home SP3 (Build 2600)

02.08.2010 в 21:06

Пишет PsiRat:

02.08.2010 в 12:55

Пишет Julber:

04.02.2010 в 23:44

Пишет Южный_Ветер:

Хохотал до истерики, всётаки фанатичные люди это неисчерпаемый ресурс планеты

Полиция штата Пенсильвания начала обыскивать холмы вокруг Джонстауна, после сообщения о пропаже трёх активистов организации по защите прав животных. Активисты пропали после того как выразили протест ношению кожаной одежды байкерами на крупном местном слете мотоциклистов.
Двоих активистов сотрудники закусочной нашли в мусорных контейнерах.
Один был привязан к дереву скотчем.
"Что то пошло не так !??", сокрушался поражённый организатор акции протеста. "Это ужасно, ужасно неправильно"
Организатор акции призвал активистов с криками "Убийцы!" забросать мотоциклистов шариками заполненными красной жидкостью изображающей кровь. Так они решили защитить животных от мотоциклистов носящих кожаную одежду...

Организатор рассказал, что устав кидаться шариками с фальшивой кровью в взрослых женщин, одетых в меха, они решили выразить протест прямо на слёте клуба мотоциклистов, в надежде показать им как защитники прав животных возмущены бессмысленным использованием кожи для производства одежды и мотоаксессуаров. "На самом деле банды мотоциклистов злоупотребляют кожаной одеждой и мы решили, что настало время дать им понять, что мы с ними не согласны......а значит они должны остановиться!"

По словам очевидцев, активисты прибыли на байк-слёт на винтажном Volkswagen Van "1960 и начали забрасывать байкеров шариками с подкрашенной водой, имитирующей кровь, и кричать "Ты убийца" проходящим мимо. Тут же поднялся шум.

"Они нассали на меня!" - говорит один из активистов. "Они схватили меня, сказали что я выгляжу как француз, стали называть меня LaTrene и привязали меня изолентой к дереву чтобы можно было ссать на меня весь день!"

"Я...Я пытался показать своё возмущение байкеру в тяжёлом кожаном жилете, а он даже не обратил на это внимания. Я назвал его убийцей, а он ответил, что я ничего не смогу доказать. Потом он заставил меня ездить с ним на мотоцикле весь день и не отпускал меня, потому что его подруги не было в городе, а я, по его словам, почти женщина"

Ачитать дальше

URL записи

URL