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

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



Выпуск # 322


http://www.kbyte.ru/

 

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

Ну что я могу сказать, погода не летная, но на выпуск рассылки это никак не повлияло. Читайте! Если будут вопросы, пишите нам на E-Mail или воспользуйтесь общедоступным форумом (регистрация не требуется).

 

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

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

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

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

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

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

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

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

    Как узнать VID/PID у USB диска?

    Какая разница между Visual и Builder?

    Программа для переноса ссылок

    помогите пожалуйста

    помогите найти ошибку в коде

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

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

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

Наверх

 

 

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

Как узнать VID/PID у USB диска? | Автор: Stuart
Добавлено: 07.06.2008 / 13:45 | ответов: 0 | просмотров: 20

Как программно узнать VID/PID у USB диска?
В Delphi или в VB ?

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


Какая разница между Visual и Builder? | Автор: Dragon-zla
Добавлено: 07.06.2008 / 11:38 | ответов: 0 | просмотров: 23

У меня вот такой вопрос - есть ли принципиальная разница между Microsoft Visual C++ и Borland C++ Builder? Понятно, что компиляторы разные, а вот если набрать код в Билдере, а потом этот самый код перенести в Визуал, то получится одна и та же программа?

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


Программа для переноса ссылок | Автор: Dragon-zla
Добавлено: 07.06.2008 / 00:05 | ответов: 0 | просмотров: 27

Помогите пожалуйста составить программу(VB или VС++) для того, чтобы обрезать ссылку.Например www.kbyte.ru/Forum превратить в Forum.Просто скачал с одного сайта архив в котором есть содержание сайта одного.В общем есть все страницы с этого сайта,а вот ссылки не исправленые, то есть ведут не на файлы в папке,а на этот сайт.Алгоритм то понял:
001:
002:
003:
Просмотреть файл
Найти ссылки
Обрезать эти самые ссылки до уровня: Папка со страницей/Файл

А вот саму прогу написать не могу - ну не умею я пока, что хорошо программировать.Киньте пожалуйста код в VB или VС++(других компиляторов нету)Заранее благодарен.

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


помогите пожалуйста | Автор: Andrew
Добавлено: 05.06.2008 / 21:36 | ответов: 3 | просмотров: 81

Помогите пожалуйста сделать задание. срочно нужно для универа. Неободимо сделать текст подсказки, который должен появляться при прохождении курсором над кнопкой и исчезал через 5 секунд.
Не получается сделать так чтобы он исчезал, исчезает только текст, а TextBox остается((
вот текст программы:

Private Sub Command6_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Text1.Visible = True
End Sub

Private Sub Form_Load()

Text1.Visible = False
Text1.Top = Command6.Top + Command6.Height + 5
Text1.Left = Command6.Left
If Text1.Top < Command6.Height Then
Text1.Top = 10 + Command6.Height
End If
If Text1.Left < (Command6.Width + 10) Then
Text1.Left = Command6.Width + 10
End If
If Text1.Top > (Form1.Height - Text1.Height - Command6.Height) Then
Text1.Top = Command6.Top - Text1.Height - 5
End If
If Text1.Left > (Form1.Width - Text1.Width - Command6.Width) Then
Text1.Left = Command6.Left - Text1.Width - 5
End If
End Sub

Private Sub Timer1_Timer()
Timer1.Enabled = True
Text1.Enabled = False
End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Text1.Visible = False

End Sub


Если кому не трудно помочь, могу скинуть сам файл. там работы минут на 5, если знать как сделать...

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


Ответ # 1 | Автор: DemonX
Добавлено:06.06.2008 / 06:14
Проверил код у меня TextBox исчезает.

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


Ответ # 2 | Автор: andreymp
Добавлено:06.06.2008 / 08:35
Прикольно. Ты бы еще Form2 в качастве подсказки поставил.
срочно нужно для универа
Вот универу это точно не нужно. Есть же свойство стандартное ToolTipText кажется называется, и пофиг на секунды.

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


Ответ # 3 | Автор: Игорь Голов
Добавлено:06.06.2008 / 11:17
У тултипа на ВБ Нэт есть такое свойство - время показаза в миллисекундах.

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


помогите найти ошибку в коде | Автор: marrianna
Добавлено: 05.06.2008 / 21:18 | ответов: 0 | просмотров: 38

Программа решает систему уравнений методом крамера, этот код проверяет систему на совместность. только где-то есть ошибка. Если определитель равен нулю все равно пишет, что система корректна. Что не так?

Private Sub Проверка_Click()
For i = 1 To n
For j = 1 To n
d(i, j) = a(i, j)
Form3.Picture1.Print d(i, j);
Next j
Form3.Picture1.Print
Next i
p = 0: z = 1: v = 1
For l = 1 To n - 1
e = 0
For i = l To n
For j = l To n
If Abs(e) >= Abs(d(i, j)) Then
e = d(i, j): b = i: c = j
End If
Next j
Next i

If l = b Then
For j = l To n
s = d(l, j): d(l, j) = d(b, j): d(b, j) = s
Next j
z = -z
End If
If l = c Then
For i = l To n
s = d(i, l): d(i, l) = d(i, c): d(i, c) = s
Next i
z = -z
End If
For i = l + 1 To n
g = d(i, l) / d(l, l)
For j = l To n
d(i, j) = d(i, j) - g * d(l, j)
Next j
Next i
Next l
For i = 1 To n
v = v * d(i, i)
Next i
v = v * z
If v = 0 Then
Form3.Picture1.Print "система не совместна, определитель равен нулю"
Else
Form3.Picture1.Print "система корректна"
End If
End Sub

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


Наверх

 

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

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

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

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

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

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

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

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

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

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

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

 

Статьи на Kbyte.Ru

Наверх

 

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

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

Запись куков (Cookies)
Дата добавления: 01.08.2006 / 12:00 | просмотров: 1716 | платформа: ASP

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

Изменение регистра текста
Дата добавления: 31.07.2006 / 12:30 | просмотров: 1433 | платформа: VB

Как получит индекс текущей записи в ListView?
Дата добавления: 23.08.2006 / 19:11 | просмотров: 2045 | платформа: VB .NET

Как получить позицию курсора на экране?
Дата добавления: 16.08.2006 / 19:47 | просмотров: 1420 | платформа: VB

Получение данных из Базы Данных MS Access
Дата добавления: 31.07.2006 / 17:39 | просмотров: 2530 | платформа: ASP .NET (VB)

Как показать сообщение?
Дата добавления: 16.08.2006 / 23:31 | просмотров: 1747 | платформа: VB

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

Как получить параметры командной строки?
Дата добавления: 04.08.2006 / 09:20 | просмотров: 2134 | платформа: VB

 

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

Наверх

 

Юмор на Kbyte.Ru

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

 

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

 

- Что общего между системой Windows и выборами президента США?
- Сначала тормозят, потом зависают

 

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

 

- Это безобразие! Ваша собака все ночь выла под моим окном!
- Не огорчайтесь. Она выспится днем.

 

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

 

В детстве его приходилось пугать патологоанатомом.

 

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

 

Директору пивзавода
от группы программистов
Заявление
Просим Вас предоставить выделенную линию со скоростью 0,5 л/сек.

 

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

 

Программер устроился на работу ассенизатором.
Рассекает себе на говновозе... И глохнет посреди чистого поля.
Что делать? - думает.Попробовал зайти-выйти.Не помогло.
Еще раз попробовал. Опять не помогло.Тяжело вздыхает.
ПРИДЕТСЯ ПЕРЕЗАГРУЖАТЬСЯ...

 

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

 

Я уже не первый год являюсь (о: с божьей помощью :о) нештатным консультантом Ростовской Епархии по компьютерным вопросам. Добрейшей души человек, умница и незаурядный талант, служащая концелярии Л. П. с благоговейным трепетом относится к своему компьютеру и готова на него молиться. Пользоваться им я ее научил, и работает она уверенно, но панический страх перед техникой она преодолеть не может. По любому пустяку она звонит мне и я голосом, полным отчаяния и тревоги, жалуется на "катастрофические проблемы". Мне всегда отвечать приходится со слов: "Милейшая Л. П., давайте успокоимся и разберемся по порядку: что случилось, что Вы предприняли и что нужно сделать". Позвонив сегодня, как обычно Л. П. стала сокрушенно жаловаться. Сегодня замялась бумага в принтере и извлечь ее ей не удается.
- Hе удается? Я Вам уже рассказывал, как нужно поступать в таком случае. Что Вы предпринимали?
- Я подняла крыжку и на большее смелости у меня не хватило.
- Что потом?
- Я позвала отца Александра, но и он бумагу вынуть не смог.
- Сочувствую. Что потом?
- Я воздала молитву Hиколаю Угоднику.
- И это не помогло???!
- Увы, нет, да простит меня господь.
- Что же потом.
- Потом я решила побеспокоить Вас…

 

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

 

- Скажите, пожалуйста, Рабинович живет в этом доме?
- Да, на третьем этаже. Только его фамилия Михельсон.

 

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

 

Приходит Вовочка из детского сада и спрашивает:
-Мама, а что такое жопа??
Мама:
-Ты что, Вовочка, нет такого слова!
Вовочка:
-Странно, жопа есть, а слова нет...

 

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

 

Учительница спрашивает: "Дети кем вы хотите стать"
- Машенька ты кем хочешь стать?
- Я хочу стать доктором.
- А почему?
- Мне нравиться лечить людей.
- Молодец Машенька
- Петечка, а кем ты хочешь стать?
-Я хочу стать водителем
-А почему?
-Мне нравится нюхать запах бензина.
-Тоже хорошо Петенька.
-Вовочка, а ты кем хочешь стать?
-А я хочу стать врачом-психотерапевтом
-Почему?
-Подойдем Марья Ивановна к окну, видите стоят 3 женщины, одна из них сосёт мороженое, вторая лижет, а третья кусает. Какая из них замужем?
- Ну та наверное которая сосёт
- Нет Марья Ивановна, та замужем у которой кольцо на пальце, а таких как вы мы будем лечить.

 

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

 

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

Наверх


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

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

Copyright (c) Nemiro AS, 2005-2007


В избранное