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

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



Выпуск # 536


http://www.kbyte.ru/

 

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

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

 

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

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

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

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

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

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

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

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

    Как удалить почту с сервера?

    Импорт БД из Excel в VB

    Группировка полей в гриде из MS SQL 2005

    Реализация настраиваемого приложения

    Hex-Редактор на VB

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

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

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

Наверх

 

 

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

Как удалить почту с сервера? | Автор: anka_x
Добавлено: 04.09.2009 / 21:11 | ответов: 0 | просмотров: 28

Добрый день!

Подскажите, пожалуйста, какой командой можно удалить всю имеющуюся почту с сервера?

Спасибо.

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


Импорт БД из Excel в VB | Автор: Andrey_fox
Добавлено: 25.08.2009 / 14:55 | ответов: 1 | просмотров: 113

Помогите! Нужно импортировать БД из excel в listview vb 6

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


Ответ # 1 | Автор: Тесленко Евгений Алексеевич
Добавлено:02.09.2009 / 22:43
Здравствуйте Andrey_fox.
инструмента для связи или импорта таблицы в ListView, к сожалению не существует.:(
Он заполняется только перебором в цикле.
Евгений.

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


Группировка полей в гриде из MS SQL 2005 | Автор: bobsapp
Добавлено: 17.08.2009 / 21:00 | ответов: 1 | просмотров: 152

Народ, будьте добры, подскажите как организовать группировку полей из БД?
Есть такая таблица:
id_code val deflt id_category
1 A1 1 1
2 B1 1 1
3 C1 1 1
1 A2 0 2
2 C2 0 2
3 B2 0 2
1 A1 0 3
2 A2 0 3
3 A3 0 3

Мне нужно получить следующий результат по этой таблице:
-----------
deflt = 1 |
-----------------------
1. 'A1' + 'B1' + 'C1' |
-----------------------


-----------
deflt = 0 |
-----------------------
2. 'A2' + 'C2' + 'B2' |
3. 'A1' + 'A2' + 'A3' |
-----------------------
Как сгруппировать данные?
В данном случае вначале записи деляться на deflt = 1 и deflt = 0.
Затем, каждая уникальная запись, это id_category и список из компонования val согласно id_code.

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


Ответ # 1 | Автор: bobsapp
Добавлено:18.08.2009 / 15:40
ааа, я наверное не ясно вообще написал.
вывод нужен на страничке асп.нет

в какой грид или рипитер я ещё незнаю. в принципе не важно, главное результат.
можно в литерал

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


Реализация настраиваемого приложения | Автор: Revenant
Добавлено: 17.08.2009 / 12:03 | ответов: 2 | просмотров: 180

Всем доброго времени суток!

Мне нужно сделать настраиваемое приложение (есть окно настроек с чекбоксами радиобаттонами, назначением хот киев и тд.), чтоб после нажатия на кнопку "сохранить изменения" все тут же вступало в силу.
Я никогда не работал с этим и не знаю с чего начать.. Как и какими средствами это реализовать в .NET?

ЗЫ тут же спрошу.. Как программно настроить чтоб приложение запускалось при старте системы?

Заранее благодарен)

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


Ответ # 1 | Автор: Revenant
Добавлено:18.08.2009 / 14:10
С настраиваемым приложением я разобрался, помог сайт CodeProject.com)

По поводу автозагрузки тема еще в силе

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


Ответ # 2 | Автор: Revenant
Добавлено:20.08.2009 / 13:19
Все, и с автозагрузкой разобрался, codenet.ru помог). Тему можно закрывать

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


Hex-Редактор на VB | Автор: Chaosito
Добавлено: 17.08.2009 / 02:41 | ответов: 4 | просмотров: 250

Здравствуйте! Можно ли сделать в VB 6.0, хекс-редактор..., вернее, редактировать отдельные байты файла.
Например мне нужно изменить оффсет 2062, в шестнадцатиричной системе это 80E,
значит мне нужно изменить значение на смещении 0x0800 и 0E...
Дак вот к примеру в койнидь текстбокс, я ввожу значение, прога открывает файл в бинарном режиме,
а дальше как... перемещение, изменение и сохранение по этим всем дебрям осуществить?

Вот скрин сделаный из hex-эдитора: http://chaosito.narod.ru/FromHexEditor.JPG

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


Ответ # 1 | Автор: Алексей
Добавлено:17.08.2009 / 06:59
Работа с бинарными файлами
Функция Seek
Функция Loc
Функция HEX
Функция MID - для извращения со строками.
Остальное дело техники, т.е. мозга и пальцев :)

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


Ответ # 2 | Автор: Chaosito
Добавлено:17.08.2009 / 16:57
Спасибо за ответ... Получилось!
Уже было отчаялся и начал писать о просьбе помочь... написал начал перечитывать и тут навело на кое-какие мысли... и все заработало!!! =))

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


Ответ # 3 | Автор: Chaosito
Добавлено:17.08.2009 / 21:46
Ну вот я и вернулся с новым, даже не вопросом, а багом каким то ))

Кароч прочитать у меня все получилось, вот:
001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
Private Sub Command1_Click()
Dim MyFile As Integer, i As Long
Dim usr As Byte
MyFile = FreeFile
Open ("C:\Audio.bin") For Binary As #MyFile
For i = 2055 To 2070
  Get #MyFile, i, usr
  lvlVolume(i - 2055).Text = usr
Next
Close #MyFile
End Sub

Colorized by: Eros.CodeSyntaxColor Engine


А вот записать не получается....
001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
Dim MyFile As Integer, i As Long
Dim usr As Byte
MyFile = FreeFile
Open ("C:\Audio.bin") For Binary As #MyFile
For i = 2055 To 2070
  Put #MyFile, i, Hex(Val(lvlVolume(i - 2055).Text))
Next
Close #MyFile

Colorized by: Eros.CodeSyntaxColor Engine

При использовании без перевода в 16ую систему (Hex), вб заплняет все байты с 2055 по 2070 - нулями... А при переводе (Hex, как в примере выше) заполняет эти байты восьмерками....

Вот сижу и думаю теперь что может быть не так....

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


Ответ # 4 | Автор: Chaosito
Добавлено:17.08.2009 / 22:00
И так решение проблемы нашел... видимо опять нужно было подумать подольше =)
перебрал преобразования типов Val, Hex... Пробовал переприсвоением.. заметил что значения при записи меняются... значит проблема крылась где то в типах... потом решил проверить а нет ли преобразования Byte... такого не оказалось... зашел в Object Browser, написал Int... перешел к списку приставок преобразований... и увидел CByte, подписав ее в код все получилось :)

Сам код:
001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
Dim MyFile As Integer, i As Long
Dim usr As Byte
MyFile = FreeFile
Open ("C:\Audio.bin") For Binary As #MyFile
For i = 2055 To 2070
  Put #MyFile, i, CByte(lvlVolume(i - 2055).Text)
Next
Close #MyFile

Colorized by: Eros.CodeSyntaxColor Engine

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


Наверх

 

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

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

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

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

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

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

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

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

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

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

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

 

Статьи на Kbyte.Ru

Наверх

 

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

Как узнать размер закрытого файла?
Дата добавления: 31.07.2006 / 12:45 | просмотров: 2728 | платформа: VB

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

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

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

Запуск программы
Дата добавления: 21.08.2006 / 20:19 | просмотров: 4897 | платформа: VB

Как добавить сайт в избранное?
Дата добавления: 24.03.2007 / 12:36 | просмотров: 3174 | платформа: VB .NET

Как добавить новые данные в базу данных?
Дата добавления: 31.07.2006 / 12:49 | просмотров: 3263 | платформа: VB

Программная обработка HTML-элементов управления
Дата добавления: 31.07.2006 / 16:25 | просмотров: 2692 | платформа: ASP .NET (VB)

Воспроизведение звукового файла #2
Дата добавления: 31.07.2006 / 12:54 | просмотров: 3571 | платформа: VB

Как проверить, подключен компьютер к интернет или нет?
Дата добавления: 24.03.2007 / 12:36 | просмотров: 3477 | платформа: VB .NET

 

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

Наверх

 

Юмор на Kbyte.Ru

Стоят двое возле дороги:
Выпили по 100 грамм и остановили Джип.
Через некоторое время выпили еще по 100 грамм и остановили Мерседес 600.
И еще через некоторое время выпили еще по 100 грамм и остановили все движение.
А что еще делать, ведь гайшники.

 

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

 

Проводил я как-то курсы для учителей информатики. Народ собрался уже поднатасканный и юзающий классы УКНЦ. Для тех кто не знает такого зверя, поясню - машинка семейства ДВК-2,3 только по немного круче. И на второй или третий день сдох монитор у одной из машин. Менять было лениво и я подключил монитор от соседней сдохшей машины, оставив все на своих местах. Первый день сам глючил по черному и веселил народ тем, что набирал команды на нерабочей клаве и не врубался почему их не видно на экране. Но самый прикол случился на следующий день. Показываю народу одну программку. Один из учителей постоянно отвлекается, но услышав, что прога защищены от случайного сброса, проявляет активный интерес. Просит разрешить проверить самому. Я не возражаю. Тогда он на нерабочей клаве жмет пимпочку "Стоп". Прога работает. И хотя и у нее действительно была защита от нажатия на эту клавишу, мне становится весело.
- Это еще что - говорю я
И продолжаю:
- У нее есть защита и от reset-а
Мужик недоверчиво улыбается. А я предлагаю ему проверить. Он делает reset опять же на нерабочей машине и улыбка у него сменяется недоуменеем. Он знает, что это в принципе не возможно, но ведь, как ему кажется, видел своими глазами. Народ начинает угорать. А я продолжаю веселиться вовсю и заявляю мужику, что прога защищена даже от выключения питания. Он отвечает, что уж этого то точно не возможно и щелкает все на той же тачке сетевым тумблером. Его лицо становится тупее всего троллейбусного парка, он видит на экране работающую программу. Народ от хохота чуть не попадал со стульев на пол. И только тут до этого товарища дошло, что попросту разыграли. Человек оказался с чувством юмора и сам не раз вспоминал до конца курсов об этом приколе со смехом.

 

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

 

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

 

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

 

Подведены итоги лотеpеи "Windows 95":
1. Выигpала фиpма MicroSoft.
2. Разыгpаны миллионы чайников.

 

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

 

Прикол с Файн Ридером. Это программа такая, которая вроде как распознаёт текст введённый со сканера. Чуство юмора у неё сродни её брату - переводчику Lingvo (видать семейное). Так вот. Недавно приятель попросил отсканировать и естессно распознать для реферата одну медицинскую книжку. Нужно сказать, книжка была здоровая и на месте сгибов Великий распознаватель вместо некоторых букв ставил разные палочки (типа / ] l и пр.), по его мнению более похожие на оригинал. Я значит потом читаю (как раз описание какой-то страшной болезни, мурашки по коже), исправляю недочёты и вот вижу такой перл, цитирую: "...вероятность летального исхода после этой болезни незначительная :]" это он в конце смайлик добавил, вроде как понял шутку :)))

 

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

 

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

 

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

 

- Где находятся мухи зимой?
- Не знаю, но мне хотелось бы, чтобы они оставались там и летом!

 

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

 

Соседская бабулька отмочила очередную кору.
Она обошла все хозяйственные магазины в районе и наезжала на продавцов с таким вопросом (цитирую дословно):
- "Мне нужны ИМПОРТНЫЕ ДЫРОЧКИ, В КОТОРЫЕ БОЛЬШИЕ ВЛЕЗАЮТ!"
- ??!!!!
Угадайте, что она имела в виду ? .... Вот и продавцы не угадали. Ей приносили все - от парафиновых свечек до дивидюков с крутой порнухой - но бабулька только топала ножками и орала исчо сильнее, типа "Идиоты, ни хрена не понимаете!!!"
Только дома, под перекрестным допросом выяснилось, ЧТО она подразумевала под столь странной фразой. Это оказалась (тут я упал пацтул) ЕВРОРОЗЕТКА (обычная, комнатная, на 220 вольт).
У нее от чайника вилка в обычную советскую розетку ессно не влезала. Но какова формулировка ! :-)))))))

 

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

 

"Полной чушью, бредом и несусветной ахинеей" назвал министр Иванов заявления некоторых блоггеров о том, что он не знает никаких других слов, кроме "полная чушь", "бред" и "ахинея".

 

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

 

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

 

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

 

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

Наверх


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

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

Copyright (c) Nemiro AS, 2005-2007


В избранное