Программирование (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): новости, советы, примеры

Выпуск # 501

http://www.kbyte.ru/

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

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

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

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

Вопрос #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

Наверх

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

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

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

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

Ответ # 1 | Автор: Jabrobaka
Добавлено:19.06.2009 / 19:43
Удалите пожалуйста вторую тему =) просто форум грузится по 5 минут почему-то =( вот и получилось, что две тему случайно создал. Другие сайты нормально грузятся О_о

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

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

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

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

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

Доброго Вам времени суток. Помогите разрешить проблему.
Начав работать на 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 | просмотров: 43

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

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

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

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

Есть 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 | просмотров: 2820

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

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

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

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

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

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

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

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

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

Статьи на Kbyte.Ru

Наверх

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

Как перевести посетителя на другую страницу?
Дата добавления: 31.07.2006 / 14:37 | просмотров: 2326 | платформа: ASP .NET (VB)

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

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

Поиск и замена
Дата добавления: 16.08.2006 / 18:54 | просмотров: 3133 | платформа: VB

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

Ограничение размера формы
Дата добавления: 31.07.2006 / 12:05 | просмотров: 2567 | платформа: VB

Перекодировка текста из DOS в Windows и обратно
Дата добавления: 31.07.2006 / 12:31 | просмотров: 2924 | платформа: VB

Запись данных в файл
Дата добавления: 31.07.2006 / 17:20 | просмотров: 2554 | платформа: ASP .NET (VB)

Как узнать текущее разрешение экрана?
Дата добавления: 24.03.2007 / 12:25 | просмотров: 3474 | платформа: VB .NET

Любое число не равное нулю
Дата добавления: 24.03.2007 / 11:31 | просмотров: 1964 | платформа: RegEx

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

Наверх

Юмор на Kbyte.Ru

Земля
2050 год
Генетический программер разбирает очерендной кусок генной последовательности и видит следующий комментарий:
/* A eti geny nado by ubrat nahren. Archangel Gavriil */

Рейтинг: 535
Всего голосов: 893