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

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



Выпуск # 565


http://www.kbyte.ru/

 

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

Если у Вас возникнут какие-либо вопросы, замечания, пожелания или предложения, пишите, мы детально рассмотрим каждое Ваше сообщение – mailto: admin@kbyte.ru.

 

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

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

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

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

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

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

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

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

    Авторизация на сервере

    Как из процедуры вернуть массив?

    Помогите решить задачу... Сортировка массива.

    работа со строковыми переменными

    составление слов

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

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

    Как узнать размер базы данных 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

Наверх

 

 

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

Авторизация на сервере | Автор: Bady
Добавлено: 02.11.2009 / 17:52 | ответов: 1 | просмотров: 35

Начал изучать C# на примере авторизации на сервере work.com.ua
используя статью
http://kbyte.ru/Articles/ShowArticle.aspx?id=48&lang=ru

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

HttpWebRequest myHttpWebRequest = (HttpWebRequest)HttpWebRequest.Create("http://work.com.ua");
myHttpWebRequest.Proxy = new WebProxy("127.0.0.1", 8888);
myHttpWebRequest.UserAgent = "Mozila/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; MyIE2;";
myHttpWebRequest.Accept = "image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-shockwave-flash, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, */*";
myHttpWebRequest.Headers.Add("Accept-Language", "ru");
myHttpWebRequest.Headers.Add("Accept-Encoding", "gzip, deflate");
HttpWebResponse myHttpWebResponse = (HttpWebResponse)myHttpWebRequest.GetResponse();

///////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////

//получаем куки
string sCookies = "";
if (!String.IsNullOrEmpty(myHttpWebResponse.Headers["Set-Cookie"]))
{
sCookies = myHttpWebResponse.Headers["Set-Cookie"];
}

myHttpWebRequest = (HttpWebRequest)HttpWebRequest.Create("http://work.com.ua/jobseeker/login/");
myHttpWebRequest.Proxy = new WebProxy("127.0.0.1", 8888);
myHttpWebRequest.Accept = "image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-shockwave-flash, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, */*";
myHttpWebRequest.Referer = "http://work.com.ua/";
myHttpWebRequest.Headers.Add("Accept-Language", "ru");
myHttpWebRequest.UserAgent = "Mozila/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; MyIE2;";
myHttpWebRequest.Headers.Add("Accept-Encoding", "gzip, deflate");

// передаем куки, полученные в предыдущем запросе
if (!String.IsNullOrEmpty(sCookies))
{
myHttpWebRequest.Headers.Add(HttpRequestHeader.Cookie, sCookies);
}

// делаем запрос
myHttpWebResponse = (HttpWebResponse)myHttpWebRequest.GetResponse();

///////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////

// получам куки
sCookies = "";
if (!String.IsNullOrEmpty(myHttpWebResponse.Headers["Set-Cookie"]))
{
sCookies = myHttpWebResponse.Headers["Set-Cookie"];
}

//// формируем запрос
myHttpWebRequest = (HttpWebRequest)HttpWebRequest.Create("http://work.com.ua/jobseeker/login/");
myHttpWebRequest.Proxy = new WebProxy("127.0.0.1", 8888);
myHttpWebRequest.Method = "POST";
myHttpWebRequest.Accept = "image/gif, image/jpeg, image/pjpeg, image/pjpeg, application/x-shockwave-flash, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, */*";
myHttpWebRequest.Referer = "http://work.com.ua/jobseeker/login/";
myHttpWebRequest.Headers.Add("Accept-Language", "ru");
myHttpWebRequest.UserAgent = "Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1) ; .NET CLR 2.0.50727)";
myHttpWebRequest.ContentType = "application/x-www-form-urlencoded";
myHttpWebRequest.Headers.Add("Accept-Encoding", "gzip, deflate");
myHttpWebRequest.Headers.Add("Pragma", "no-cache");
if (!String.IsNullOrEmpty(sCookies))
{
myHttpWebRequest.Headers.Add(HttpRequestHeader.Cookie, sCookies);
}

string sQueryString = "login%5B1%5D="+ sLogin +"&login%5B2%5D=%DD%EB%E5%EA%F2%F0%EE%ED%ED%E0%FF+%EF%EE%F7%F2%E0&imgstatus=&password%5B1%5D="+ sPassw +"&password%5B2%5D=%CF%E0%F0%EE%EB%FC&remember=on";
byte[] ByteArr = System.Text.Encoding.GetEncoding(1251).GetBytes(sQueryString);
myHttpWebRequest.ContentLength = ByteArr.Length;

myHttpWebRequest.GetRequestStream().Write(ByteArr, 0, ByteArr.Length);

// ставим False, чтобы при получении кода 302 не делать автоматический редирект
myHttpWebRequest.AllowAutoRedirect = false;

myHttpWebResponse = (HttpWebResponse)myHttpWebRequest.GetResponse();

///////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////

string sLocation = myHttpWebResponse.Headers["Location"];

// получам куки
sCookies = "";
if (!String.IsNullOrEmpty(myHttpWebResponse.Headers["Set-Cookie"]))
{
sCookies = myHttpWebResponse.Headers["Set-Cookie"];
}

//// формируем запрос
myHttpWebRequest = (HttpWebRequest)HttpWebRequest.Create(sLocation);
myHttpWebRequest.Proxy = new WebProxy("127.0.0.1", 8888);
//myHttpWebRequest.Method = "POST";
myHttpWebRequest.Accept = "image/gif, image/jpeg, image/pjpeg, image/pjpeg, application/x-shockwave-flash, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, */*";
myHttpWebRequest.Referer = "http://work.com.ua/jobseeker/login/";
myHttpWebRequest.Headers.Add("Accept-Language", "ru");
myHttpWebRequest.UserAgent = "Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1) ; .NET CLR 2.0.50727)";
myHttpWebRequest.Headers.Add("Accept-Encoding", "gzip, deflate");
myHttpWebRequest.Headers.Add("Pragma", "no-cache");
if (!String.IsNullOrEmpty(sCookies))
{
myHttpWebRequest.Headers.Add(HttpRequestHeader.Cookie, sCookies);
}

myHttpWebResponse = (HttpWebResponse)myHttpWebRequest.GetResponse();


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


Ответ # 1 | Автор: Bady
Добавлено:02.11.2009 / 18:09
По фидлеру не удается получить такую же последовательность как дает IE...

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


Как из процедуры вернуть массив? | Автор: Dragon-zla
Добавлено: 01.11.2009 / 21:07 | ответов: 3 | просмотров: 74

Здравствуйте все. У меня возникла проблема при решении учебной программы с использованием процедур. Суть задания:

Определить столбец прямоугольной матрицы A с максимальной суммой элементов и, если его номер больше заданного, сформировать новую матрицу
B из столбцов исходной до найденного столбца, иначе скопировать в вектор Y элементы заданного столбца.

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

Сам код:
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:
041:
042:
043:
044:
045:
046:
047:
048:
049:
050:
051:
052:
053:
054:
055:
056:
057:
058:
059:
060:
061:
062:
063:
064:
065:
066:
067:
068:
069:
070:
071:
072:
073:
074:
075:
076:
077:
078:
079:
080:
081:
082:
083:
084:
085:
086:
087:
088:
089:
090:
091:
092:
093:
094:
095:
096:
097:
098:
099:
100:
101:
102:
103:
104:
105:
106:
107:
108:
program ecsAdd3_2;

{$APPTYPE CONSOLE}

uses
  SysUtils,crt32;
type
  Mass = array of array of real;
var
  FirstMas,FinMas : Mass;
  i,j,n,m,NumOfCol : integer;

procedure SolvOfEcs(Mas : Mass; MaxNum : integer ; FinMas : Mass);
var
  RowCount,ColCount,i1,j1,NumOfMax : integer;
  MaxSumOfAr,TMaxSumOfAr : real;
  begin
  RowCount := Length(Mas);//число строк


  if RowCount > 0 then          //
    ColCount := Length(Mas[0])  // Число столбцов - если есть хотя бы одна строка - берем её и смотрим её длину
  else                          //
    ColCount := 0;              //

  MaxSumOfAr := 0;
  NumOfMax := 1;
  for i1 := 0 to RowCount-1 do
    MaxSumOfAr := MaxSumOfAr + Mas[i1][0];


  for j1 := 1 to ColCount-1 do
    begin
    TMaxSumOfAr := 0;
    for i1 := 0 to RowCount-1 do
      TMaxSumOfAr := TMaxSumOfAr + Mas[i1][j1];
    if TMaxSumOfAr > MaxSumOfAr then
    begin
      MaxSumOfAr := TMaxSumOfAr;
      NumOfMax := j1+1;
    end;
    end;

  if NumOfMax > MaxNum then
  begin
  SetLength(FinMas,RowCount,NumOfMax);
  for i1 := 0 to RowCount-1 do
    for j1 := 0 to NumOfMax-1 do
      FinMas[i1][j1] := Mas[i1][j1];
  end
  else
  begin
  SetLength(FinMas,RowCount,1);
  for i1 := 0 to RowCount-1 do
    FinMas[i1][0] := Mas[i1][NumOfMax-1];
  end;
  end;

procedure PrintMas(FinMas : Mass);
var
  RowCount,ColCount,i1,j1 : integer;
begin
  RowCount := Length(FinMas);

  if RowCount > 0 then
    ColCount := Length(FinMas[0])
  else
    ColCount := 0;

    if ColCount > 1 then
    begin
    writeln(oem('Номер столбца прямоугольной матрицы больше заданного'));
    writeln(oem('поэтому выведем матрицу, конечный столбец которой равен столбцу с максимальной суммой элементов'));
    for i1 := 0 to RowCount-1 do
    begin
      for j1 := 0 to ColCount-1 do
      write(FinMas[i1][j1]:0:2,#32);
      writeln;
    end;
    end
    else
    begin
    writeln(oem('Номер столбца прямоугольной матрицы меньше заданного'));
    writeln(oem('поэтому выведем вектор Y'));
    for i1 := 0 to RowCount-1 do
    writeln(FinMas[i1][0]:0:2);
    end
end;

begin
  writeln(oem('Введите число строк матрицы'));
  readln(n);
  writeln(oem('Введите число столбцов матрицы'));
  readln(m);
  SetLength(FirstMas,n,m);
  SetLength(FinMas,1,1);
  writeln(oem('Введите элементы матрицы'));
  for i:=0 to n-1 do
  begin
    for j:=0 to m-1 do
      read(FirstMas[i][j]);
  end;
  writeln(oem('Введите любой номер столбца'));
  readln(NumOfCol);
  SolvOfEcs(FirstMas,NumOfCol,FinMas);
  PrintMas(FinMas);
  readkey;
end.

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


Ответ # 1 | Автор: Игорь Голов
Добавлено:02.11.2009 / 08:41
Проще функцию использовать. Они значения возвращают.

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


Ответ # 2 | Автор: Dragon-zla
Добавлено:02.11.2009 / 15:29
То есть

001:
procedure SolvOfEcs(Mas : Mass; MaxNum : integer ; FinMas : Mass);


заменить на
001:
function SolvOfEcs(Mas : Mass; MaxNum : integer) : Mass


?
Спасибо попробую

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


Ответ # 3 | Автор: Dragon-zla
Добавлено:02.11.2009 / 17:46
Большое спасибо - как изменил процедуру на функцию - сразу всё заработало.
Даже код не пришлось менять :)

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


Помогите решить задачу... Сортировка массива. | Автор: Леонид
Добавлено: 01.11.2009 / 02:50 | ответов: 0 | просмотров: 25

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

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


работа со строковыми переменными | Автор: Леонид
Добавлено: 31.10.2009 / 02:30 | ответов: 0 | просмотров: 41

Привет всем! Кто может решить вот какую задачу:Необходимо из введенных хаотично букв составить как можно больше слов(и чем длиннее слова тем лучше), составленные слова должны сравниваться со словарем (каким-нибудь .txt файлом) и при наличии такого слова выводить на печать (Вообщем как в игре "составь слово") ВОЗМОЖНО ли ЭТО????? (количество букв не обязательно должно соответсвовать длине слова....

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


составление слов | Автор: Леонид
Добавлено: 29.10.2009 / 10:02 | ответов: 2 | просмотров: 60

Привет всем...Кто поможет решить задачу?: составление слов из произвольного набора букв и проверка если есть в словаре - на печать , нет -пропустить. Вообщем составлять "правильные слова"...

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


Ответ # 1 | Автор: abra
Добавлено:29.10.2009 / 16:28
Длина слова должно соответствовать кол-ву букв или из 7 букв р,у,с,к,и,й можно получить слово "русский"?

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


Ответ # 2 | Автор: Леонид
Добавлено:30.10.2009 / 13:05
Нет длина составляемых слов не обязательно должна соответствовать длине букв (но чем больше слов тем лучше) Как в игре составь наибольшее количество слов из введенных букв. Возможно ли это???

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


Наверх

 

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

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

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

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

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

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

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

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

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

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

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

 

Статьи на Kbyte.Ru

Наверх

 

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

Проверить существование каталога (папки)
Дата добавления: 31.07.2006 / 17:37 | просмотров: 2989 | платформа: ASP .NET (VB)

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

Запись куков (Cookies)
Дата добавления: 31.07.2006 / 15:50 | просмотров: 2828 | платформа: ASP .NET (VB)

Как получить клиентский идентификатор элемента управления?
Дата добавления: 31.07.2006 / 15:59 | просмотров: 2714 | платформа: ASP .NET (VB)

Как динамически добавить элемент управления?
Дата добавления: 17.08.2006 / 17:02 | просмотров: 3142 | платформа: ASP .NET (VB)

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

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

Анализ даты стандарта DD.MM.YYYY и DD.MM.YY
Дата добавления: 24.03.2007 / 11:00 | просмотров: 2801 | платформа: RegEx

Как преобразовать десятичное число в восьмиричное?
Дата добавления: 16.08.2006 / 20:36 | просмотров: 2920 | платформа: VB

Пример добавления окончания к числу (англ.)
Дата добавления: 24.03.2007 / 12:33 | просмотров: 2971 | платформа: VB .NET

 

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

Наверх

 

Юмор на Kbyte.Ru

Сцена в автобусе.
На первых сиденьях сидят с IQ за 130. - Я сегодня перечитал Достоевского,получил огромное эстетическое наслаждение.
Далее те у кого IQ 110. - Читал "Поле битвы - земля"? Нет? Много потерял....
Затем у кого IQ 80 - Да , классная вчера порнуха по телеку шла...
Те у кого IQ 50 - Если эта падла мне лаве не откинет за крышу,на следующей недели замочу!
И наконец,на самых задних сиденьях те,у кого IQ 30 - У тебя дебаггеры новые есть?

 

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

 

- Что ты пишешь? - спросили программиста.
- Сейчас запустим - узнаем! - ответил программист.

 

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

 

- Михал Ефремович, а как вы намерены бороться с этими, как их там, зарплатами в конвертах?
- Да нет ничего проще, Владимир Владимирович, запретим конверты!

 

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

 

Один новый русский (НР1) показывает другому (НР2) свой дом. Заходят в ванную.
НР2: А че это у тебя такая плитка мелкая?
НР1: Мелкая, зато фирменная!
НР2: А фирма какая?
НР1: Intel ...

 

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

 

Блин, сроду б не подумал, что такая история может произойти в жизни.
Живем мы вдвоем с котом. Кот у меня - совершенно замечательная животина, которой уже почти год от роду. По роду занятий приходится много заниматься всякой писаниной и тому подобным. Ввиду количества работы машину, в период нечастных и непродолжительных отлучек из сети не выключаю. Собственно, в этом и все дело. Коту моему, по ряду неизвестных мне причин, компьютер активно встал поперек горла. В связи с этим кот научился применять ряд несложных диверсионных операций. Вы меня поймите - я не то, чтобы жалуюсь. Я привык к тому, что по приходе домой застаю неоконченную статью щедро дополненную текстом вида "вт 333333 оэлааааааааааалюылдж". Уже безропотно сношу открытое без моего ведома окно "Find file". Терпеливо морщусь при виде того, что у меня нет сети или клавиатуры - по выдергиванию проводов мой кошак, скорее всего, с легкостью войдет в тройку призеров нашей необъятной. Я снес даже то, что черно-белый изверг однажды в мое отсутствие пытался переговорить по аське с одним из моих работодателей. Но сегодняшнее его "достижение" повергло меня в шок. Отлучившись на минутку в магазин, застал дома непривычную тишину. Ну, думаю, что-то не так - ну, не привык этот сукин сын сидеть тихо. Смотрю, так и есть - висит этакое серое виндовское окно с какой-то надписью. Значит, думаю, успел прогуляться по клавиатуре, зараза. Что, интересно, на этот раз... Подхожу ближе и, чувствую, у меня волосы дыбом встают. Взмок, сел на стул и даже первый матерок сумел сказать только через пару минут. Что за надпись я увидел, думаю, уже многие догадались... Are уou sure уou want to send file 'config. sуs' to
the Recуcle Bin? Мой истерические смешки перешли в хохот только тогда, когда до меня дошло - этому [censored] осталось только НАЖАТЬ НА ENTER!
P. S. Теперь перед тем, как очистить корзину, буду долго и тщательно исследовать ее содержимое…

 

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

 

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

 

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

 

В чем зарплата, брат? Вот и я думал, что в баксах. А зарплата - она в юанях...

 

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

 

Приходит служащая и жалуется: компьютер зависает при включении. Прихожу и вижу: она включает комп, набирает пароль и ждёт. Грустными такими глазами смотрит на комп, а комп такими же грустными на неё. Я говорю: "А ENTER Пушкин будет нажимать?"

 

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

 

Пора Остановиться Если:

- В самолете или поезде уделяете больше внимания notebook’у, сдав ребенка в багаж.
- Ваша жена говорит, что вы в последнее время мало общаетесь, поэтому вы решили купить второй компьютер и сделать дома LAN, что бы вы могли поболтать по аське.
- Решаете остаться на работе или в институте ещё на пару годиков из-за бесплатного интернета.
- думаете, что неудачники и бедняки это люди, которые имеют MODEMы на 28.8 kB/s.
- Используете смайлики в обычной бумажной почте.
- Не знаете пол ваших трех лучших друзей, потому что у них нейтральные ники, а спросить вам не приходило в голову.
- Хотите улыбнуться, наклоните голову на 90 градусов.
- Купание в ванне называете "downloading".
- Решил поменять кресло на унитаз.
- Выключая MODEM, чувствуете себя так, как будто только что предали лучшего друга.
- Новым знакомым представляетесь как "вася @ маил точка ру".
- Ваше сердце колотится быстрее, когда в телевизоре видите интернетовский адрес какой-либо компании.
- Прежде чем покинуть комнату, поставите динамики на полную громкость, что бы не пропустить момент прихода новой почты.
- Все ваши знакомые и друзья имеют в своём имени знак "@" (напр. Миш@, С@ш@).
- Ваше домашнее животное имеет личную домашнюю страничку.
- Не можете позвонить родителям – у них нет MODEMа.
- проверяете e-mail, если новых сообщений нет – проверяете снова.
- Часа в два ночи пойдете в туалет и останетесь у компьютера до утра.
- Жена вам раз и навсегда запретила брать notebook в постель.
- Ваших детей зовут: девочку - Altavista или VISA, мальчика - Yahoo или Chat...
- Кличка вашей собаки Linux или Fox.
- Зимой вообще не выключаете монитор – от него теплее.
- используете HTML-TAGи в Microsoft Wordе.
- думаете, что люди, которые используют "Microsoft Photo Editor" вместо "Corel Photopaint" идиоты.
- Любите Билла Гейтса.
- Отслеживаете ошибки ошибок.(ошибочная ошибка = ничего ошибочного)
- Лучше реагируете на "go2work&earn4me_some$.com", чем на "иди на работу и заработай для меня немного денег, давай!"
- У вас не зависают Windows.
- Умеете читать и без проблем понимаете машинный код.
- Каждых два-три часа чистите proxy cashe.
- В бумажных формулярах инстинктивно заполняете:
Имя и фамилия: (ваш ник, Alias)
Компания: N/A
Возраст: од...до(напр. между 18 и 25)
Дети: так же (напр. От 1 до 3)
Месячный заработок: (серийный номер)
- Иногда говорите с телевизором.
- Программа имеет физический вес „весит“.(напр. 150 килограмм)
- Самая маленькая часть чего угодно - бит.
- Не знаете что это за служба „Tech Support“.
- Вы там работаете, но на телефонные звонки не отвечаете, потому что "в трубке" у всех сплошные вопросы и проблемы.
- Компьютер – бестолковое железо, пока не подключен на интернет.
- Рекламные проспекты в реальном почтовом ящике - SPAM. Относится и к повесткам и фактурам.
- жалко, что книги нельзя выделить и скопировать.
- Вас возбуждает чтение log-файлов squid'a.
- познакомясь с девушкой, сразу спрашиваете какой у нее IP-адрес.
- IP-адрес динамический, значит девушка легкого поведения.
- Коллеги вам говорят, что у вас все работает как dev/shit, через dev/ass, у вас кривые dev/hands и маленький dev/brain. Не знаете о чем это они.
- в Linuxе напишете "$ make love" или "$ man woman".
- К вам подойдет сын и спросит: "Как устроен телевизор?", то вы ответите: "RTFM!". А если сын спросит: "man TVSet". Подробно ему все расскажете, даже если он уже не будет этого хотеть.
- Не ходите в церковь, потому что не знаете URL.
- Постоянно вам хочется и иногда пишите:
„let x = 7;“
или
„if (value == 0)
return value;
else
return 0;".
Fi
- У вас в машине стоят факс, принтер, телетайп и SWIFT.
- Вашего ребенка сначала учите считать до 256.
- У телевизора есть монитор и LPT.
- Для вас OS/2 = PS2
- Школьная доска = монитор(мой учитель) ?
- Для вас LPT = LTP.
- Для вас BASIC = BIOS.
- Ваши зрачки увеличиваются, когда видите "CONNECT 17689/VOICE".
- Сможете пропищать хотя бы на 1200.(MODEM’овый тон)
- Не мечтаете о MODEMе на 115200.
- Имеете такой MODEM.
- Уже не можете определить время на механических часах.
- Мечтаете о приборе "assessometr".
- Пишете книгу с рабочим названием "Контрольные системы для Ядерных Электростанций на базе Windows 95"
- Долго решаете что лучше: „налепить обои или растянуть одну картинку.“
- В магазине с умным видом: "Коробочку хард дисков, пожалуйста".
- WWW,FTP,HTTP,DHTML,URL,SPOOL,MODEM,IRQ,PPP,DOS – не сокращения, а нормальные слова.
- Имеете татуировку "This body best viewed with Internet Explorer 4.0 or higher".
- При ДТП инстинктивно ищете кнопку "BACK".
- думаете, что телевизор имеет плохое разрешение. Примерно 640 на 480
- пишете в С++ программу для калькулятора.
- Вы написали вирус для калькулятора.
- Как только это прочитаете, сразу распечатаете.
- Используете слова и выражения типа:
Internet Exploder
Outloop Exchanger
Netscape Complicator
Teer To Teer NetWork
10,578 kegabytes
2 zillion
300 MHz RAM
Cursing flasher
CONSYS.FIG
SETUP.EXERSIZE
Microword Soft
Microwave Windows
Netscape Explorer
Microscope Exploiter
Newscape
Outlook Exposure
Corel WordPerfect для IBM
Megadrives
Windows 94
Backsplash
Backstage
Backcase
SoaperCase
LoverCase
CaseSeniletive
CaseInsectitive
...It is NOT safe for me to turn off my computer...
200 horse power hard drive
Cadle Mobem
Pinteum
Mudem
Momed
386 Pentium
486DX Pentium
US Robotics Sportscaster modem
Unnecessary disk space
__
User Unknown

 

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

 

В пустую комнату в общежитии прокрадывается студент, не зажигая свет подходит к окну, вытряхивает из цветочного горшка кактус, убирает часть земли и кладет пирожок, завернутый в полиэтилен. После всего этого он возвращает кактус на место, выравнивает землю и ложится спать. Утром уходит на занятия. Вечером возвращается, бросается к горшку, раскапывает землю, а там... записка: "Не разбрасывай свои вещи на видных местах. Пирожок съели, чтоб он не испортился".

 

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

 

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

Наверх


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

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

Copyright (c) Nemiro AS, 2005-2007


В избранное