Программирование (VB,C#,ASP,.NET): новости, советы, примеры (comp.soft.prog.vbaspsharpnet) : Рассылка : Subscribe.Ru

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

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

Рассылка закрыта

Вы можете найти рассылки сходной тематики в Каталоге рассылок.

← Июнь 2009 →
1	2	3	4	5	6	7
8	9	10	11	12	13	14
15	16	17	18	19	20	21
22	23	24	25	26	27	28
29	30

Автор

Алексей Немиро

Статистика

1.234 подписчиков
-1 за неделю

← Все выпуски →

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

Выпуск # 502

http://www.kbyte.ru/

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

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

Ваш R-KDR-19826

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

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

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

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

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

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

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

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

Куда податься

Три вопроса. Кнопка, классы, книги

Раба с ячейками в Excel 2007

Помогите определить число отрицательных элементов. VB 6.0

Помогите разобраться с XML файлом

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

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

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

Наверх

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

Куда податься | Автор: Dragon-zla
Добавлено: 20.06.2009 / 22:47 | ответов: 3 | просмотров: 48

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

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

Ответ # 1 | Автор: Алексей
Добавлено:21.06.2009 / 05:40
Я по образованию технолог продукции общественного питания, занимаюсь сайтостроительством :)
По специальность работал когда еще не было диплома, а после
получения диплома - ни разу не работал, и особого желания нет.

Заниматься нужно тем, что нравится, чтобы результат такой деятельности был более плодотворным.
Образование - это формальность. Конечно, некоторым основам научат, но
не более того. С техническим будет проще устроиться туда, где оно
требуется (техническое образование), хотя с опытом, можно устроиться
куда угодно :) Даже хирургом, в какую-нибудь подпольную клинику.

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

Информационные технологии в образовании

Это наверное учителем информатики можно работать :)

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

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

Ответ # 2 | Автор: Dragon-zla
Добавлено:21.06.2009 / 14:42
Да, наверное только в нашей стране высшее образование получают не для образования, а для диплома. :|

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

Ответ # 3 | Автор: Алексей
Добавлено:21.06.2009 / 15:17
Да, у нас в стране с образованием вообще полная жо...
С одной стороны не престижно, с другой - без него сложно выбиться в
люди. Но есть один плюс, при наличии денег, можно запросто получить красный диплом в
каком-нибудь МГУ (нет, не в Морском Государственном Университете :) ...)
Короче, сплошная бюрократия и коррупция.

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

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

Три вопроса. Кнопка, классы, книги | Автор: Jabrobaka
Добавлено: 19.06.2009 / 19:37 | ответов: 0 | просмотров: 29

Приветствую =) я совсем новичек и у меня к вам несколько вопросов. =)
1) Как при каком-либо событии, например MouseEnter, переместить кнопку в какую-либо точку формы. Два варианта: определенная точка и случайное место.
2) Объясните понятно, что такое классы?)) я так и не понял этог до конца. Понял, что из них делают экземпляры классов или объекты.
3) Прочитал две книжки, которые немного под разными углами объясняют самые основы. Что посоветуете почитать, чтобы повысить свой уровень знания выше нуба?)))

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

Раба с ячейками в Excel 2007 | Автор: golishev_S
Добавлено: 15.06.2009 / 03:28 | ответов: 3 | просмотров: 100

Доброго Вам времени суток. Помогите разрешить проблему.
Начав работать на VB 2008 возникла необходимость создания Excel 2007 файла и его заполнение. При тесте фыдает ошибку на строке .Range("A1").Value = "Найменування статті". Я так понимаю что это связанно с региональными различиями (может и ошибаюсь). Ошибка следующая "COMException не обработано Исключение из HRESULT: 0x800A03EC"
Помогите решить проблему
Ниже приведен код
Sub dannie_v_Excel()
Dim oApp As New Excel.Application()
oApp.Visible = True
oApp.UserControl = True
Dim oldCI As System.Globalization.CultureInfo = _
System.Threading.Thread.CurrentThread.CurrentCulture
System.Threading.Thread.CurrentThread.CurrentCulture = _
New System.Globalization.CultureInfo("en-US")
oApp.Workbooks.Add()
System.Threading.Thread.CurrentThread.CurrentCulture = oldCI
Dim rob_list_Excel As Excel.Worksheet = oApp.Worksheets(1)
rob_list_Excel.Name = "Баланс"
With rob_list_Excel
.Range("A1").Value = "Найменування статті"
End With
oApp.Visible = True
End Sub

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

Ответ # 1 | Автор: Edlin
Добавлено:15.06.2009 / 09:06
Попробуй выставить английскую локаль:

001:
002:
003:
004:
System.Threading.Thread.CurrentThread.CurrentCulture = New System.Globalization.CultureInfo("en-US")
System.Threading.Thread.CurrentThread.CurrentUICulture = New System.Globalization.CultureInfo("en-US")

Colorized by: Eros.CodeSyntaxColor Engine

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

Ответ # 2 | Автор: golishev_S
Добавлено:15.06.2009 / 11:29
ничего не получается

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

Ответ # 3 | Автор: golishev_S
Добавлено:15.06.2009 / 14:56
Сам ответил на свой вопрос
Следующий код - рабочий
Sub dannie_v_Excel()
Dim oApp As New Excel.Application()
oApp.Visible = True
oApp.UserControl = True
Dim oldCI As System.Globalization.CultureInfo = _
System.Threading.Thread.CurrentThread.CurrentCulture
System.Threading.Thread.CurrentThread.CurrentCulture = _
New System.Globalization.CultureInfo("en-US")
oApp.Workbooks.Add()
Dim rob_list_Excel As Excel.Worksheet = oApp.Worksheets(1)
rob_list_Excel.Name = "Баланс"
With rob_list_Excel
.Range("A1").Value = "Найменування статті"
End With
System.Threading.Thread.CurrentThread.CurrentCulture = oldCI
oApp.Visible = True
End Sub

Все как всегда логично только доходит поздно:)

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

Помогите определить число отрицательных элементов. VB 6.0 | Автор: HHFS
Добавлено: 14.06.2009 / 21:09 | ответов: 0 | просмотров: 54

Составить программу,которая в задаваемом пользователем одновременном числовом массиве опред. число отрицательных элементов и число элементов,принадлежащим отр. от 1 до 3.

Помогите плз в четверг экзамен.

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

Помогите разобраться с XML файлом | Автор: andreywin
Добавлено: 07.06.2009 / 16:33 | ответов: 9 | просмотров: 291

Есть xml файл вида :

001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
014:
015:
016:
017:
018:
019:
020:
021:
022:
023:
024:
<?xml version="1.0" encoding="utf-8"
?>
<root>
  <playlist>
     <time> 10:30</time>
          
                   <source>D:\DX\my\1.mp3</source>
                   <source>D:\DX\my\2.mp3</source>
                  
<source>D:\DX\my\3.mp3</source>
                   <source>D:\DX\4.mp3</source>
           
  </playlist>

 <playlist>
     <time>12:01</time>
         
                  
<source>D:\DX\my\5.mp3</source>
                   <source>D:\DX\my\7.mp3</source>
                   <source>D:\DX\my\22.mp3</source>
                    <source>D:\DX\my\5.mp3</source>
                   <source>D:\DX\54.mp3</source>
            <source>D:\DX\598.mp3</source>
  </playlist>

</root>

есть ноды <playlist>. В них есть время <time> и музыкальные композиции <source>. Как зная конкретное время, добавить все <source>, находящиеся в той же ноде что и время, в ListBox?

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

Ответ # 1 | Автор: Edlin
Добавлено:08.06.2009 / 11:29
001:
002:
003:
004:
005:
006:
007:
008:
Dim doc As New Xml.XmlDocument()
    doc.Load("XMLFile.txt")
    Dim sources As Xml.XmlNodeList = doc.SelectNodes("/descendant::playlist[child::time='10:30']/child::source")
    For Each node As Xml.XmlNode In sources
      listBox.Items.Add(node.InnerText)
    Next

Colorized by: Eros.CodeSyntaxColor Engine

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

Ответ # 2 | Автор: andreywin
Добавлено:08.06.2009 / 13:32
Dim sources As Xml.XmlNodeList = doc.SelectNodes("/descendant::playlist[child::time='10:30']/child::source")
не работает.

Может я не правильно описал чего мне надо от файла...
я получаю системное время , допусти 10:30.
Открываю xml файл.
Ищу там это время.
Нахожу. (До этого шага я все сделал)
Зная, что в xml файле, в какой то из множества нод <playlist> есть <time> 10:30</time>, надо добавить все <source> находящиеся в данном <playlist>(в котором есть время 10:30)

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

Ответ # 3 | Автор: andreywin
Добавлено:09.06.2009 / 11:13
ШЕф! Шо делать?!!!

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

Ответ # 4 | Автор: Neco
Добавлено:09.06.2009 / 17:53
Dim sources As Xml.XmlNodeList = doc.SelectNodes("/descendant::playlist[child::time='10:30']/child::source")
не работает.

что означает "не работает"? не компилируется? выбрасывает исключение? выдаёт пустой результат? воду не носит? печку не топит?

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

Ответ # 5 | Автор: andreywin
Добавлено:09.06.2009 / 18:37
Выдает пустой результат.

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

Ответ # 6 | Автор: Edlin
Добавлено:10.06.2009 / 09:51
Это потому, что у тебя в файле пробел перед 10:30. Нужно аккуратнее форматировать документ.

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

Ответ # 7 | Автор: andreywin
Добавлено:10.06.2009 / 11:23
Cпасибо ОГРОМНОЕ ! за терпение :) и растолковывание мне неразумному где у меня и что ! Все заработало!
И еще вопрос !
в этой строке Dim sources As Xml.XmlNodeList = doc.SelectNodes("/descendant::playlist[child::time='19:09']/child::source")
'19:09'
У меня системное время хранится в переменной типа String
как эту переменну подставить вместо 19:09 ?
сорри, вааще не силён в XML-ях...
descendant - это потомок или наследование?
Сорри за множество вопросов, пытаюсь с Вашей помошью разобраться :)

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

Ответ # 8 | Автор: andreywin
Добавлено:10.06.2009 / 12:29
Зделал так :
Dim Time_Play as string
Dim sources As Xml.XmlNodeList = doc.SelectNodes("/descendant::playlist[child::time='" & Time_Play & "']/child::source")
Вроде работает... может есть другое решение?

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

Ответ # 9 | Автор: Edlin
Добавлено:11.06.2009 / 08:56
Это нормальное решение. descendant - потомок. В XML нет никакого наследования.

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

Наверх

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

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

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

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

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

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

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

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

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

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

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

Статьи на Kbyte.Ru

Наверх

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

Анализ даты стандарта RFC822
Дата добавления: 24.03.2007 / 10:58 | просмотров: 2316 | платформа: RegEx

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

Рисование на PictureBox и/или Form?
Дата добавления: 24.03.2007 / 09:58 | просмотров: 3954 | платформа: VB .NET

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

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

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

Как изменить текущее системное время Windows?
Дата добавления: 16.08.2006 / 20:21 | просмотров: 2795 | платформа: VB

Как изменить фон в каждом элементе списка?
Дата добавления: 31.07.2006 / 14:13 | просмотров: 5583 | платформа: ASP .NET (VB)

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

Как программно вызвать окно свойств (Properties) файла?
Дата добавления: 31.07.2006 / 12:42 | просмотров: 2727 | платформа: VB

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

Наверх

Юмор на Kbyte.Ru

Девица звонит как-то раз и говорит, что, мол, получила сообщение General Protection Fault. Я, ессно, ее успокаиваю и говорю ей сделать Reboot. После тщетных попыток отыскать одновременно клавиши Ctrl-Alt-Del, не говоря о чем-то другом, она просит что-нибудь попроще. Говорю, нажми кнопку Reset на компьютере. Она долго ищет и не находит. Хрен, говорю, с ним, видишь, говорю, кнопку Power? Жми. Жмет. Теперь говорю жми опять и жди, пока загрузится. Это, говорю, займет 2-3 минуты (сеть, там, и прочее). Уже через 10 секунд она мне кричит в трубку, мол, о-о! уже загрузилось. Удивившись скорости перезагрузки, говорю, проверь, что ты опять попала в Windows. Она говорит, что, мол, не только уже попала в Windows, но уже опять получила сообщение General Protection Fault. Я в край офигеваю, пока не соображаю, что баба жмет кнопку Power на мониторе, а не на компе. В общем, после получасовой лекции о том, что такое компьютер, экран и пр, с экскурсами в прошлое ее мамы, мне удалось-таки по телефону с ее помощью перезагрузить компьютер.

Рейтинг: 570
Всего голосов: 954