Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

Программирование (VB,C#,ASP,.NET): новости, советы, примеры



Выпуск # 441


http://www.kbyte.ru/

 

Новый выпуск!

Здравствуйте дамы и господа!
Очередной выпуск рассылки Kbyte.Ru!

 

Содержание выпуска

Система ЭКСПЕРТ

    Вопрос #001017: Бесплатные программы

    Вопрос #001014: Avi и Mpeg4 в Visual Basic

    Вопрос #000952: Обработка файлов в C# (.NET 2.0)

    Вопрос #000947: Секундомер

    Вопрос #000937: DLOOKUP??

Последнее на форумах

    WM Как мониторить состояние аккумулятора

    Мерцание PictureBox

    переустановка windows

    PictureBox

    Проблемка при работе с регистром

Последние статьи

    Нестандартная форма

    Как узнать размер базы данных MySQL через php

    Взаимодействие с другими сайтами через HTTP (HttpWebRequest и HttpWebResponse)

    Работа с SQL – Запросы

    Использование XML.Serialization

Интересные коды и решения

Юмор на Kbyte.Ru

 

Система ЭКСПЕРТ

 

Система «Эксперт» - уникальная система, которая поможет решить, если не все, то многие Ваши проблемы с программированием и разработкой! Если у Вас есть какой-либо вопрос по программированию или разработке, то Вы всегда можете задать его нашим Экспертам! При этом каких-либо особых действий от Вас не потребуется! Просто отправьте Ваш вопрос на адрес mailto:expert@kbyte.ru, в теме письма укажите тему вопроса, в тексте – сам вопрос, и все! Эксперты дадут Вам ответ в течение 12-24 часов, на тот адрес, с которого Вы отправите вопрос. Все проще простого! Никакой регистрации и заполнение бесконечных форм, просто спросите и получите ответ ;-)


Вопрос #001017: Бесплатные программы

Автор вопроса: Sarj // 03.06.2008 / 08:56

Уважаемые эксперты, поскажите пожалуйста бесплатный аналог Corel Draw. Очень надо...

.....

Отвечает: Алексей Немиро // 03.06.2008 / 09:02

Здравствуйте, Sarj.

http://inkscape.org/

--
С наилучшими пожеланиями,
Немиро Алексей http://aleksey.nemiro.ru/

 

Вопрос #001014: Avi и Mpeg4 в Visual Basic

Автор вопроса: алексей // 02.06.2008 / 12:36

Как можно проигрывать эти форматы в вижал бэйсик? Пример на сайте не работает.

.....

Отвечает: Алексей Немиро // 02.06.2008 / 12:43

Здравствуйте, Алексей.

Можно использовать MediaPlayer. Для этого его нужно подключить к
проекту через меню Project (Проект) -> Components (Компоненты), в
появившемся окне найти и выбрать Windows Media Player. Далее, в
панели инструментов должна появиться иконка плеера, который можно
разместить на форме. Указать файл для проигрывания можно
в свойство URL, или FileName в зависимости от версии проигрывателя.

--
С наилучшими пожеланиями,
Немиро Алексей http://aleksey.nemiro.ru/

 

Вопрос #000952: Обработка файлов в C# (.NET 2.0)

Автор вопроса: Сергей // 09.05.2008 / 18:07

Доброе время суток!
В общих словах, такая задача поставлена передо мной: На веб-странице
пользователь выбирает файл, нажимает кнопку "Импорт" и из этого файла
данные импортируются в таблицу БД Oracle.
Файл должен быть текстовым, первые 2 строки- информация о времени и
логине того, кто выгружал. После них идут строки данных, поля
разделяются симоволом | .
Просьба дать ссылки на документацию по работе с файлами, которые могут
помочь :-)

Отвечает: Алексей Немиро // 12.05.2008 / 10:34

Здравствуйте, Сергей.

Необходимые классы и функции для работы с файлами лежак в пространстве имен System.IO. Также Вам могут понадобиться классы для работы с регулярными выражениями, которые лежат в пространстве имен System.Text.RegularExpressions.
Что касается импорта файлов, то данные можно взять прямо из потока FileUpload.PostedFile.InputStream, передать их в StreamReader и обработать при помощи регулярных выражений.

--
С наилучшими пожеланиями,
Немиро Алексей http://aleksey.nemiro.ru/

 

Вопрос #000947: Секундомер

Автор вопроса: Александр // 08.05.2008 / 17:40

Добрый день!
Как сделать секундомер на сайте kbyte.ru много но вот все они выдают результат как 345сек, а мне надо 1:45:01 то есть в временом формате. Как сделать???

.....

Отвечает: Алексей Немиро // 09.05.2008 / 08:29

Здравствуйте, Александр.

Зная, что в минуте 60 секунд, в часе 60 минут, а в сутках 24 часа, можно легко превратить 345 секунд в нужный формат.
001:
002:
003:
004:
005:
006:
007:
008:
009:
Dim sec As Integer
sec = 345
Dim ssec As Integer, min As Integer, hour As Integer
If sec > 59 Then
 min = Int(sec / 60)
 ssec = sec Mod 60
End If
If min > 59 Then hour = Int(min / 60)
MsgBox sec & " сек. = " & hour & " ч. " & min & " мин. " & ssec & " сек."



--
С наилучшими пожеланиями,
Немиро Алексей http://aleksey.nemiro.ru/

 

Вопрос #000937: DLOOKUP??

Автор вопроса: Алексей // 05.05.2008 / 16:37

Почему те поля формы, которые имеют в ControlSource функцию Dlookup не записывают значение полей в конечную таблицу?

--------------------------------------
Категория: --- MS Access

Отвечает: Алексей Немиро // 06.05.2008 / 05:24

Здравствуйте, Алексей.

Из справки MS Access: Функция Dlookup
При использовании этой функции не учитываются
несохраненные изменения записей подмножества. Если функция
DLookup должна использовать измененные значения, необходимо сначала сохранить
изменения с помощью команды Сохранить запись в меню
Записи, с помощью перемещения фокуса на другую запись или
метода Update.


--
С наилучшими пожеланиями,
Немиро Алексей http://aleksey.nemiro.ru/

 


Чтобы задать Ваш вопрос, отправьте его на адрес expert@kbyte.ru

Раздел Эксперт на сайте Kbyte.Ru

Наверх

 

 

Последнее на форумах

WM Как мониторить состояние аккумулятора | Автор: okaton
Добавлено: 11.02.2009 / 16:39 | ответов: 1 | просмотров: 46

Доброго времени суток:)
Подскажите пожалуйста, каким образом можно мониторить состояние аккумулятора.
Здесь нашел нужные функции http://kbyte.ru/Forum/Add.aspx?id=7464&aid=7467&lang=uk
001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
014:
015:
016:
017:
018:
019:
020:
021:
022:
023:
024:
025:
026:
027:
028:
029:
//Функция получения состояния основной и дополнительной батарей:

DWORD GetSystemPowerStatusEx2( PSYSTEM_POWER_STATUS_EX2 pSystemPowerStatusEx2, DWORD dwLen, bool fUpdate );

//Самый важный параметр функции – структура SYSTEM_POWER_STATUS_EX2:

typedef struct _SYSTEM_POWER_STATUS_EX2
{
byte ACLineStatus; - состояние внешнего питания
byte BatteryFlag; - состояние основной батареи
byte BatteryLifePercent; - процент зарядки основной батареи
DWORD BatteryLifeTime; - время, на которое хватит заряда
DWORD BatteryFullLifeTime; - время, на которое хватит полной батареи
byte BackupBatteryFlag; - состояние резервной батареи
byte BackupBatteryLifePercent; - процент заряда резервной батареи
DWORD BackupBatteryLifeTime; - время остатка заряда резервной батареи
DWORD BackupBatteryFullLifeTime; - полное время резервной батареи
Физические характеристики батареи:
DWORD BatteryVoltage; - емкость батреи (mV)
DWORD BatteryCurrent; - ток батареи (mA)
DWORD BatteryAverageCurrent; - средний ток
DWORD BatteryAverageInterval; - интервал изменения тока
DWORD BatterymAHourConsumed; - емкость батареи в mAH
DWORD BatteryTemperature; - температура батареи
DWORD BackupBatteryVoltage; - емкость резервной батареи
byte BatteryChemistry; - тип батареи (LION, NiCD, NIMN… )
} SYSTEM_POWER_STATUS_EX2

Colorized by: Eros.CodeSyntaxColor Engine


Будьте добры, подскажите пожалуйста, как теперь этим воспользоваться.

Пишу на Visual C# 2008

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Ответ # 1 | Автор: okaton
Добавлено:12.02.2009 / 22:19
Подскажите пожалуйста, вообще возможно получить текущую емкость аккумулятора?

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Мерцание PictureBox | Автор: Ron
Добавлено: 07.02.2009 / 23:28 | ответов: 2 | просмотров: 85

Таймер с интервалом 1 мс двигает PictureBox по форме, но он дико мерцает. Подскажите как устранить это.

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Ответ # 1 | Автор: petr
Добавлено:10.02.2009 / 23:50
Поставь интервал 20 или 100

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Ответ # 2 | Автор: Ron
Добавлено:11.02.2009 / 21:33
НЕ. Такой интервал я поставить не могу. Это будет не плавное перемещение, а слайд-шоу. И кстати все равно мерцает. Но и на том спасибо!
А чем можно заменить таймер. А то он меня напрягает своей работой. Она какая-то не стабильная.

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru


переустановка windows | Автор: amigo
Добавлено: 27.01.2009 / 21:25 | ответов: 4 | просмотров: 177

Всем привет!
Короче вот в чем проблема: после переустановки винды не могу открыть диск D выдает не понятную ошибку (uvsqfgwd.cmd - обнаружена ошибка. Приложение будет закрыто. Приносим извинения за неудобства.) Формат дисков NTFS, при переустановки форматировал только C, тк на D нужная инфа, если форматнуть и его то проблема решиться, но форматирование никак не уместно.
Можно ли выйти из этой ситуации не прибегая к удалению нужных мне файлов???

Буду благодарен любой помощи

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Ответ # 1 | Автор: Алексей
Добавлено:04.02.2009 / 03:45
Скорей всего вирус, прописал авторан.
Открыть диск можно правой кнопкой мышки по диску, выбрать меню "Открыть".

_________________
Это сообщение добавлено через Kbyte.Ru Forum Mail Conference (FMC)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Ответ # 2 | Автор: Dragon-zla
Добавлено:04.02.2009 / 22:42
Лучше через FAR или TC открыть диск, перекинуть все нужные файлы на С форматнуть D.Затем антивирусом проверить файлы с D и вернуть их обратно.(в проводнике Винды есть баг - autorun.inf прочитается как бы ты ни открывал через него диск)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Ответ # 3 | Автор: Dest
Добавлено:10.02.2009 / 22:42
Это не баг винды, это её особенность, потому что авторан.инф - по идее является системным файлом, если в файле не прописаны другие команды кроме как открыть по умолчанию, то можно и без тотала обойти эту проблему... Спасибо за внимание

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Ответ # 4 | Автор: andreymp
Добавлено:12.02.2009 / 16:52
Наиболее вероятно что это вирус, вернее троян. Просканируйте антитрояном, к примеру я пользуюсь бесплатной версией Malwarebytes' Anti-Malware.

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru


PictureBox | Автор: micron
Добавлено: 20.01.2009 / 13:00 | ответов: 1 | просмотров: 163

У меня такой вопрос, как в PictureBox вставить изображение?
Одно изображение вставить нет проблем, а как вставить из диалога выбора изображений каждый раз другое.Спасибо.

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Ответ # 1 | Автор: Edlin
Добавлено:22.01.2009 / 08:49
001:
002:
003:
004:
005:
006:
if (openFileDialog1.ShowDialog() == DialogResult.OK)
{
  pictureBox1.Image = Image.FromFile(openFileDialog1.FileName);
}

Colorized by: Eros.CodeSyntaxColor Engine

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Проблемка при работе с регистром | Автор: V1RR
Добавлено: 18.01.2009 / 17:12 | ответов: 1 | просмотров: 153

Столкнулся с такой проблемой. Мне нужно чтобы программа создавала в регистре ключ.
Обычно это делается так: SaveString HKEY_LOCAL_MACHINE, "SOFTWARE\ergc","Value" , "0118", REG_SZ
В данном случае создается ключ Value и заполняется уже значением 0018 в данном случае.
В моем случае мне нужно чтобы в папке \ergc не создавался новый ключ а заполнялось значение (по умолчанию).
Как мне это сделать? Я предполагаю что как-то так: SaveString HKEY_LOCAL_MACHINE, "SOFTWARE\ergc", Default , "0118", REG_SZ но Default не работает (это я так просто проверил). Еслть ли какой-то параметр чтоб деволтный ключ изменять?

з.ы. сама программка работает (т.е. создает и заполняет ключ в реестре).

Для этого подключил модуль.bas с этим содержимым:
001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
014:
015:
016:
017:
018:
019:
020:
021:
022:
023:
024:
025:
026:
027:
028:
029:
030:
031:
032:
033:
034:
035:
036:
037:
038:
039:
040:
Private Declare Function OpenProcessToken Lib "advapi32" (ByVal ProcessHandle As Long, ByVal DesiredAccess As Long, TokenHandle As Long) As Long
Private Declare Function LookupPrivilegeValue Lib "advapi32" Alias "LookupPrivilegeValueA" (ByVal lpSystemName As String, ByVal lpName As String, lpLuid As LUID) As Long
Private Declare Function AdjustTokenPrivileges Lib "advapi32" (ByVal TokenHandle As Long, ByVal DisableAllPrivileges As Long, NewState As TOKEN_PRIVILEGES, ByVal BufferLength As Long, PreviousState As TOKEN_PRIVILEGES, ReturnLength As Long) As Long
Public Declare Function GetVersionEx Lib "kernel32" Alias "GetVersionExA" (ByRef lpVersionInformation As OSVERSIONINFO) As Long
Public Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
Public Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal CX As Long, ByVal CY As Long, ByVal wFlags As Long) As Long
Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Public Declare Function GetWindow Lib "user32" (ByVal hwnd As Long, ByVal wCmd As Long) As Long
Public Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
Public Declare Function GetWindowTextLength Lib "user32" Alias "GetWindowTextLengthA" (ByVal hwnd As Long) As Long
Public Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Public Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
Public Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Public Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long
Public Declare Function RegDeleteValue Lib "advapi32.dll" Alias "RegDeleteValueA" (ByVal hKey As Long, ByVal lpValueName As String) As Long
Public Declare Function RegOpenKey Lib "advapi32.dll" Alias "RegOpenKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Public Declare Function RegSetValueEx Lib "advapi32.dll" Alias "RegSetValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, lpData As Any, ByVal cbData As Long) As Long
Public Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Public Declare Function RegQueryValueEx Lib "advapi32.dll" Alias "RegQueryValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal lpReserved As Long, lpType As Long, lpData As Any, lpcbData As Long) As Long
Public Declare Function RegisterServiceProcess Lib "kernel32" (ByVal dwProcessID As Long, ByVal dwType As Long) As Long

Public Sub SaveString(hKey As Long, strPath As String, strValue As String, strdata As String, dwType As Long)
Dim keyhand As Long
Dim r As Long
Select Case dwType
Case REG_SZ, REG_EXPAND_SZ, REG_MULTI_SZ, REG_NONE
r = RegCreateKey(hKey, strPath, keyhand)
r = RegSetValueEx(keyhand, strValue, 0, dwType, ByVal strdata, Len(strdata))
r = RegCloseKey(keyhand)
Case REG_DWORD, REG_DWORD_BIG_ENDIAN, REG_BINARY, REG_LINK
RegCreateKey hKey, strPath, keyhand
Dim dfs As Long
dfs = Val(strdata)
RegSetValueEx keyhand, strValue, 0&, dwType, dfs, 4
RegCloseKey keyhand

End Select
End Sub

Colorized by: Eros.CodeSyntaxColor Engine


Помогите кто знает.

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Ответ # 1 | Автор: Dest
Добавлено:10.02.2009 / 23:21
передавай в качестве имени параметра не Default, а пустую строку вот так ""

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Наверх

 

Последние статьи

Нестандартная форма
Автор: Zhenik Ipatov | добавлено: 05.05.2008 / 12:42 | просмотров: 2017

Первое что бросается в глаза, когда первый раз используешь программу это конечно же её облик, внешний вид. Есть вероятность что если пользователю не понравится внешний вид окна, то он не будет пользоваться продуктом. Значит нам, не побоюсь этого слова, программистам нужно как можно лучше, удобнее, понятнее, красивее и приветливее сделать лицо программы. Нужно как можно эффектнее преподнести программу. С самого первого появления Windows окна получили прямоугольный стандарт и все User Control’ы

Как узнать размер базы данных MySQL через php
Автор: Николай Рудченко | добавлено: 14.02.2008 / 13:01 | просмотров: 2329

В этой небольшой статье вы узнаете, как получить размер вашей базы данных (БД) MySQL используя язык программирования PHP.

Взаимодействие с другими сайтами через HTTP (HttpWebRequest и HttpWebResponse)
Автор: Немиро Алексей | добавлено: 27.07.2007 / 14:01 | просмотров: 9110

В данной статье речь пойдет о том, как можно программно заполнить и отправить Web-форму, а также получить результат с использованием довольно простых классов - HttpWebRequest и HttpWebResponse.

Работа с SQL – Запросы
Автор: Хабибулин А. (aka Bille Gates) | добавлено: 22.07.2007 / 04:43 | просмотров: 18426

В данной статье рассмотрены часто используемые SQL-запросы и приведены примеры их использования.

Использование XML.Serialization
Автор: Немиро Алексей | добавлено: 19.07.2007 / 15:38 | просмотров: 4418

В данном обзоре речь пойдет об использование XML.Serialization в .NET и ее применении на примере сохранения и считывания настроек программы с использованием синтаксиса языка Visual Basic .NET.

 

Статьи на Kbyte.Ru

Наверх

 

Интересные коды и решения

Рисвание градиентной заливки
Дата добавления: 24.03.2007 / 12:43 | просмотров: 2731 | платформа: VB .NET

Как сделать, чтобы графика не стиралась?
Дата добавления: 24.03.2007 / 10:18 | просмотров: 1841 | платформа: VB .NET

Как запретить пользователю перемещать форму?
Дата добавления: 31.07.2006 / 12:05 | просмотров: 1695 | платформа: VB

Поиск слов определенной длины
Дата добавления: 24.03.2007 / 11:02 | просмотров: 2033 | платформа: RegEx

Как изменить цвет строки в GridView при заполнении данными?
Дата добавления: 14.08.2006 / 14:25 | просмотров: 3260 | платформа: ASP .NET (VB)

DataGridView: Как добавить новую строку?
Дата добавления: 02.08.2006 / 09:31 | просмотров: 5504 | платформа: VB .NET

Как узнать, в какой папке находится приложение?
Дата добавления: 01.08.2006 / 20:29 | просмотров: 2122 | платформа: VB

Как загрузить текстовой файл целиком?
Дата добавления: 31.07.2006 / 17:12 | просмотров: 1942 | платформа: ASP .NET (VB)

Как получить данные из базы данных?
Дата добавления: 31.07.2006 / 18:31 | просмотров: 2382 | платформа: ASP

Как можно скрыть курсор мышки?
Дата добавления: 16.08.2006 / 19:48 | просмотров: 2182 | платформа: VB

 

Универсальные коды на Kbyte.Ru

Наверх

 

Юмор на Kbyte.Ru

Сынок не может оторваться от компьютера. Родители вызвали доктора. Доктор осмотрел его и сказал:
- Его придётся лечить!
Родители:
- Как?
- Сигаретами, выпивкой, девочками...

 

Рейтинг: 499
Всего голосов: 811
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Новости торговли: В Санкт-Петербурге вчера закрылся гипермаркет антикварных товаров "Эрмитаж"...

 

Рейтинг: 1445
Всего голосов: 2149
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Марьиванна:
- Здесь мы видим, что крокодил отложил яйца... Кто знает: зачем?
Вовочка:
- Старый он уже... Не нужны они ему...

 

Рейтинг: 388
Всего голосов: 639
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Ты мне сегодня во сне пpиснилась!
- В эpотическом?
- Hет, в обычном.
- А как ты их вообще pазличаешь?
- А у эpотических pасшиpение *.JPG

 

Рейтинг: 512
Всего голосов: 814
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Мужик просыпается с жесточайшего похмелья... смотрит в зеркало.... и говорит:
- Все, п%#з%ец, на работу идти некому......

 

Рейтинг: 532
Всего голосов: 867
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Заходит наркоман в телефонную будку и начинает там мочиться. Стоящая рядом женщина, возмущенная увиденным, кричит на него:
– Как вам не стыдно?! Немедленно выходите!
Наркоман говорит:
– Вот, блин! В женский попал!

 

Рейтинг: 1470
Всего голосов: 2168
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Мент останавливает Камаз:
- Что, танки грязи не боятся?
- Ты не грязь, ты МУСОР!

 

Рейтинг: 494
Всего голосов: 723
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Воспитательница из детского сада привела детей на экскурсию в зоопарк. Ведет она детишек и рассказывает: вот это большое животное с большими ушами - слон, с длинной шеей - жираф. Подходят к клетке с обезьянами. Детишки кидаются на клетку и кричат:
- Программисты, программисты!
- Почему вы так решили? - спрашивает воспитательница.
- А у них глаза красные и задница в мозолях.

 

Рейтинг: 553
Всего голосов: 891
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Приходит мужик в кабак:
- Я вчера тут весь вечер провёл?
- Тут.
- А зарплату всю пропил?
- Всю.
- Фу-у-у... Слава богу, а я думал, что потерял.

 

Рейтинг: 492
Всего голосов: 792
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Cантехник ковыряется в унитазе. Прочищает засор типа... Вдруг замечает, что за ним наблюдает мальчик.
- Что мальчик, неприятно? Это тебе, панимашшь, не в Интернете копаться...

 

Рейтинг: 513
Всего голосов: 839
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Весь юмор на Kbyte.Ru

Наверх


Выпуск подготовил: R-KDR-19826

Редактор: Немиро Алексей

Copyright (c) Nemiro AS, 2005-2007


В избранное