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

среда, 16 декабря 2009

08:20

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

#post-id: 3430-19-58
#original-date: 16.12.2009 Wed
#original-time: 7:58 PM
#original-day: 3430
#original-host: WinXP Prof SP2 (Build 2600)

Проблему Global Hotkeys решила вот так:

'====================================================================
Public Function GetInputDesktopName() As BStr
  Dim hWinSta As API_HANDLE
  Dim hDesk As API_HANDLE
  
  Const DESIRED_ACCESS = DESKTOP_SWITCHDESKTOP Or DESKTOP_ENUMERATE Or DESKTOP_CREATEWINDOW
  
  hDesk = OpenInputDesktop(0, C_FALSE, DESIRED_ACCESS)
  If hDesk = 0 Then GoTo hExitSub
  
  hWinSta = GetProcessWindowStation()
  If hWinSta = 0 Then GoTo hExitSub
  
  GetInputDesktopName = MyGetUserObjectInformation(hWinSta) & "\" & _
                        MyGetUserObjectInformation(hDesk)
  
hExitSub:
  If hWinSta <> 0 Then CloseWindowStation (hWinSta)
  If hDesk <> 0 Then CloseHandle hDesk
End Function

Private Function MyGetUserObjectInformation(ByVal hObject As API_HANDLE) As BStr
  Dim Buff() As Byte
  Dim RC As Long
  Dim nBuff As Long
  Dim lpnBuff As Long
  
  ReDim Buff(0 To 0)
  nBuff = 0
  
  RC = GetUserObjectInformation(hObject, UOI_NAME, Buff(0), nBuff, lpnBuff)
  If RC = 0 And Not (nBuff < lpnBuff) Then Exit Function
  
  ReDim Buff(0 To lpnBuff + 10)
  nBuff = lpnBuff
  
  RC = GetUserObjectInformation(hObject, UOI_NAME, Buff(0), nBuff, lpnBuff)
  If RC = 0 Then Exit Function
  
  MyGetUserObjectInformation = asGetStringFromPointerByAnyA(Buff(0))
End Function

Просто я не указывала оконную станцию в CreateProcess(), и Windows почему-то подставляла оконную станцию сервиса, хотя запускающая программа вполне себе жила в оконной станции пользователя.

#music: Don Veca\Road Rash 3\Title Screen

URL

08:20

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

#post-id: 3430-17-19
#original-date: 16.12.2009 Wed
#original-time: 5:19 PM
#original-day: 3430
#original-host: WinXP Prof SP2 (Build 2600)

www.gstatic.com/GoogleInternetAuthority/GoogleI...

Это они для себя или у них теперь свой Верисигн есть?

URL

08:19

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

#post-id: 3430-14-43
#original-date: 16.12.2009 Wed
#original-time: 2:43 PM
#original-day: 3430
#original-host: WinXP Prof SP2 (Build 2600)

Конструкция:

- Второй рабочий стол.
- BAT файл запускающий RunAppAs.
- RunAppAs, запускающий Global Hotkeys под другим пользователем.
- Global Hotkeys, видима на втором рабочем столе.
- Global Hotkeys запускает саму себя на активном рабочем столе.
- Global Hotkeys #2 запускает FAR.
- FAR не виден нигде, но запущен.

Предположение: почему-то оно стартовало не на том рабочем столе.

Проверка показала:

Window station name: Service-0x0-bea28$
Object type: WindowStation

Desktop name: PrivateDesktop1_D47619B2-75FC-43AC-BDC5-EEA5CB6733E6
Object type: Desktop

В итоге имя рабочего стола действительно то самое, но оконная станция немного не та. Почему - БП. Будем пилить...

URL

08:19

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

#post-id: 3430-11-52
#original-date: 16.12.2009 Wed
#original-time: 11:52 AM
#original-day: 3430
#original-host: WinXP Prof SP2 (Build 2600)

Первый, Среда, 23 декабря.
00.40 Фильм "Пьяный мастер".

Тоже из серии Кимики-сан, Урд и Ли ^^

URL

вторник, 15 декабря 2009

16:09

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

#post-id: 3429-19-38
#original-date: 15.12.2009 Tue
#original-time: 7:38 PM
#original-day: 3429
#original-host: WinXP Prof SP2 (Build 2600)

Пишет Vesper:

15.12.2009 в 18:22

Кику вынула связку из четырех больших круглых бусин из белого нефрита, нанизанных через определенные промежутки на крепкую шелковую нить. Марико внимательно слушала объяснения Кику, глаза ее раскрылись шире, чем когда либо, веер замелькал. Когда Кику закончила, она с любопытством посмотрела на бусы:
        – Ах, со дес! Ну, Анджин сан, – твердо начала она, – эти бусы называются   кономи-синзу , жемчужины наслаждения, и сеньор или сеньора могут одинаково пользоваться ими. Саке, Анджии сан?
        – Спасибо.
        – И женщина, и мужчина могут пользоваться ими, бусины аккуратно помещают в задний проход и потом, в момент Облаков и Дождя, бусины медленно, одну за другой, вытаскивают.

(с) "Сёгун" (и поиском находятся, только картинок нет)))

URL комментария

URL