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

пятница, 21 ноября 2008

11:12

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

#post-id: 3040-14-01
#original-date: 21.11.2008 Fri
#original-time: 2:01 PM
#original-day: 3040
#original-host: WinXP Prof SP2 (Build 2600)

Тема на форуме: "Как ездить на шпильках". Отбросив вариант с обратными поворотами, мозг выдаёт: "Может не надо?" ^^'

http://www.ladyauto.ru/forum/thread.php?threadid=4707&boardid=39&styleid=1

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

Эээээ... Видимо дама не видела как Бунта в лайв экшне гонял босиком и перед выходом обувь выкидывал на асфальт ^___^

URL

11:12

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

#post-id: 3040-02-14
#original-date: 21.11.2008 Fri
#original-time: 2:14 AM
#original-day: 3040
#original-host: WinXP Prof SP2 (Build 2600)

Вот этим наверное все когда-то занимались:

Option Explicit

Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Declare Function ShowWindow Lib "user32" (ByVal hWnd As Long, ByVal nCmdShow As Long) As Long
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

Public Const SW_HIDE = 0
Public Const SW_SHOW = 5

Declare Function GetWindow Lib "user32" (ByVal hWnd As Long, ByVal wCmd As Long) As Long

Public Const GW_HWNDFIRST = 0
Public Const GW_HWNDLAST = 1
Public Const GW_HWNDNEXT = 2
Public Const GW_HWNDPREV = 3
Public Const GW_OWNER = 4
Public Const GW_CHILD = 5
Public Const GW_MAX = 5

Public Sub Main()
  Dim hWnd As Long
  Dim hButton As Long
  
  'находим хандл окна таскбара
  hWnd = FindWindow("Shell_TrayWnd", "")
  
  'делаем его невидимым
  ShowWindow hWnd, SW_HIDE
  
  'Sleep 2000
  MsgBox "Нажмите ""Ok"" для возвращения TaskBar", vbInformation
  
  'делаем его видимым
  ShowWindow hWnd, SW_SHOW
  
  hButton = GetWindow(hWnd, GW_CHILD)
  ShowWindow hButton, SW_HIDE
  MsgBox "Нажмите ""Ok"" для возвращения кнопки Пуск", vbInformation
  ShowWindow hButton, SW_SHOW
End Sub

URL

11:12

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

#post-id: 3040-01-49
#original-date: 21.11.2008 Fri
#original-time: 1:49 AM
#original-day: 3040
#original-host: WinXP Prof SP2 (Build 2600)

Вот этот мега-кавайй обматерили злые жжшники >_<

#music: MANUEL\SUPER EUROBEAT presents Initial D 4th Stage D Selection +\Let's Go, Come On

URL