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

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



Выпуск # 426


http://www.kbyte.ru/

 

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

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

 

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

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

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

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

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

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

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

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

    Заполнение массивов

    обновление данных

    С Новым Годом!

    может кто поможет!!!!??

    Открытие и закрытие CD

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

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

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

Наверх

 

 

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

Заполнение массивов | Автор: petr
Добавлено: 06.01.2009 / 03:12 | ответов: 2 | просмотров: 63

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


Ответ # 1 | Автор: Stuart
Добавлено:06.01.2009 / 16:08
и что какой вопрос? как заполнить массив или что?

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


Ответ # 2 | Автор: Stuart
Добавлено:06.01.2009 / 16:44
'Заполнение одномерного массива
001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
Option Base 1
Private Sub Command1_Click()
ConstAs Integer = 10 'размер массива
Dim massiv(m) As String 'одномерный числовой массив
Dim i As Integer 'счетчик

 For i = 1 To m
   massiv(i) = Val(InputBox("Элемент: massiv(" & CStr((i)) & ")=", "Заполнение массива", ""))
 Next i
End Sub

Colorized by: Eros.CodeSyntaxColor Engine

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


обновление данных | Автор: abra
Добавлено: 05.01.2009 / 12:23 | ответов: 1 | просмотров: 42

Требуется автоматически обновлять БД раз в неделю. Как это лучше сделать?

Не таймер же ставить, в самом деле.............

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


Ответ # 1 | Автор: Алексей
Добавлено:06.01.2009 / 04:15
cron

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

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


С Новым Годом! | Автор: Dragon-zla
Добавлено: 31.12.2008 / 23:26 | ответов: 3 | просмотров: 93

Всех с Новым Годом! :)

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


Ответ # 1 | Автор: Алексей
Добавлено:01.01.2009 / 04:30
С Новым, &H7D9, годом!

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


Ответ # 2 | Автор: Dragon-zla
Добавлено:01.01.2009 / 14:26
&H7D9

Ну, тогда ещё и с 1430 годом. :)

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


Ответ # 3 | Автор: Stuart
Добавлено:05.01.2009 / 20:53
CSEG segment
org 100h
begin:
mov ah,009h
mov dx,offset MsgBox
int 21h
mov ah,10h
int 16h
int 20h
MsgBox DB 'С Новым годом!:)$'
CSEG ends
end begin

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


может кто поможет!!!!?? | Автор: kiberg
Добавлено: 30.12.2008 / 20:09 | ответов: 0 | просмотров: 82

у меня несколько проблем с С#ом:
1) можно ли сделать так: в меню есть вкладка создать, а я хочу сделать, чтоб она создавала ещё одну вкладку..
2) как сделать кнопки перехода между вкладками?(например, как в powerPointe)?
3)скажите пожалуйста код на прогрессбар, если есть несколько действий
4)как сделать ссылку из меню на подпапку tab control??
помогите, пожалуйста!!!

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


Открытие и закрытие CD | Автор: petr
Добавлено: 26.12.2008 / 02:33 | ответов: 3 | просмотров: 195

Option Explicit

Private Sub Form_Load()
MMControl1.DeviceType = "CDAUdio"
MMControl1.Command = "open"
MMControl1.TimeFormat = 0
End Sub

Private Sub Form_Unload(Cancel As Integer)
MMControl1.Command = "stop"
MMControl1.Command = "close"
End Sub
Private Function toHMS(time As Long) As String
Dim H As Integer
Dim M As Integer
Dim S As Integer

H = Int((time / 1000) / 3600)
M = Int((time / 1000 Mod 3600) / 60)
S = (time / 1000 Mod 3600) Mod 60
If H > 0 Then toHMS = Str(H) + ":"
toHMS = toHMS + Format(M, "0#") + Format(S, "0#")
End Function

Private Sub MMControl1_StatusUpdate()
Select Case MMControl1.Mode
Case 530: 'msimodeStop
Label1.Caption = "stop" & Str(MMControl1.Tracks)
If MMControl1.Tracks > 1 Then
Label1.Caption = "нажмите на кнопку PLAY"
Label2.Caption = _
"Треков: " + Str(MMControl1.Tracks) + _
"Время звучания: " + _
toHMS(MMControl1.Length)
Else
Label1.Caption = "Диск не хуя не музыкальный"
Timer1.Enabled = True
End If
Case 540: ' mcimodePlay
Timer1.Enabled = False
Label1.Visible = True
Label2.ForeColor = vbYellow
If MMControl1.Position < _
MMControl1.TrackPosition + _
MMControl1.TrackLength Then
Label1.Caption = _
"треков: " + Format(MMControl1.Track, "0#") _
+ " " + toHMS(MMControl1.Position - _
MMControl1.TrackPosition)
Else
If MMControl1.Position < MMControl1.Length Then
MMControl1.Track = MMControl1.Track + 1
Label1.Caption = _
"треков:" + Format(MMControl1.Track, "#") _
+ " " + toHMS(MMControl1.Position - _
MMControl1.TrackPosition)
Else
MMControl1.Command = "stop"
End If
End If
Case 550: 'msimodePause
Label1.Caption = "pause"
Label2.Caption = "Треков: 0 Время звучания: 00:00"
Timer1.Enabled = True
Case Else
Label1.Caption = "mode:" & Str(MMControl1.Mode)
End Select
End Sub

Private Sub Timer1_Timer()
DoEvents
Label1.Visible = Not Label1.Visible
End Sub

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


Ответ # 1 | Автор: andreymp
Добавлено:30.12.2008 / 11:47
Что хотел автор?

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


Ответ # 2 | Автор: petr
Добавлено:30.12.2008 / 15:24
Просто эта программа называется воспроизведение музыкальных дисков. Я немного ошибся в названий.

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


Ответ # 3 | Автор: andreymp
Добавлено:31.12.2008 / 10:36
Так вопрос в чем? Или это просто пример?

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


Наверх

 

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

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

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

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

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

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

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

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

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

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

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

 

Статьи на Kbyte.Ru

Наверх

 

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

Проверить корректность E-Mail (стандартный способ)
Дата добавления: 21.08.2006 / 20:23 | просмотров: 2339 | платформа: ASP .NET (VB)

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

Как связать расширение файла с приложением?
Дата добавления: 04.08.2006 / 08:56 | просмотров: 2321 | платформа: VB .NET

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

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

Анализ URL
Дата добавления: 24.03.2007 / 10:52 | просмотров: 1424 | платформа: RegEx

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

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

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

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

 

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

Наверх

 

Юмор на Kbyte.Ru

Лежат в корзине 3 программы, разговаривают.
1->2: Тебя за что?
2->1: За то, что я не под Windows. А тебя?
1->2: За то, что я под Windows.
1&2->3: А тебя?
3: За то, что я - Windows

 

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

 

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

 

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

 

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

 

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

 

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

 

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

 

Почему компьютер лучше мужчины?
1. После нажатия кнопочки "RESET" ваш компьютер свеж и бодр и готов начать все с начала.
2. Компьютер не стряхивает пепел на пол, не разбрасывает окурки и полупустые чашки из-под кофе на всем доступном ему пространстве.
3. Ваш компьютер всегда с радостью сыграет с вами в преферанс и для этого вам не нужен кто-либо третий.
4. Семейные ссоры только внешне выглядят кровопролитными - да здравствует виртуальная реальность DOOM!
5. Электроэнергия для компьютера гораздо дешевле, чем пиво для мужчины. 6. Компьютер - интереснейший собеседник (в особенности, если он соединен с Интернетом).
7. Компьютер - отличный отец и няня, способный развлекать часами любого ребенка в возрасте от 3 до 99 лет.

 

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

 

Помнится когда я работал в сервис центре одной из компьютерных фирм, был у нас "постоянный" клиент, который допекал всех сотрудников то по телефону, то своими визитами. Он приобрел жесткий диск, уже не помню точно какой (вроде Seagate) и спустя 2 дня появился у нас в СЦ.
Клиент: - Поменяйте мне жесткий диск, он бракованный.
Я: - На основании чего вы сделали такой вывод?
Клиент: - Ну понимаете... во-первых, у меня до этого был другой жесткий диск, так вот, музыка на нем играла гораздо громче.
Я: - Не понимаю, где взаимосвязь между громкостью воспроизводимой музыки и жестким диском?
Клиент: - Как это не понимаете??? Я думал это очевидно любому, а вы должно быть специалист!
Я: - Уверяю, вы ошибаетесь. Попробуйте лучше громкость прибавить на колонках или отрегулировать её в операционной системе.
Вижу клиент начинает нервничать и злиться. В его убеждениях - он абсолютно прав, а тут его водят за нос.
Клиент: - Кроме этого меня не устраивает то, что диск не достаточно жесткий!
Не успеваю я что-либо сообразить, как клиент выдает фразу после которой я хотел завязать с этой работой: - И ещё, главный дефект - информация в нём поступает СНИЗУ, а не так как на старом моём диске было.
Я: {сдерживая улыбку} - А как на старом диске было?
Клиент: {возмущенно} - Вы и этого не знаете? СВЕРХУ естественно!
Было ясно что спорить и что-либо объяснять тут бесполезно.
Я: Всё понятно, я приму ваш диск на тестирование.
Диск проверили, он был абсолютно работоспособным, но клиент приходил раз за разом и требовал "правды", поэтому в итоге диск ему меняли и на WD и на Samsung и на Maxtor. Безумный любитель жестких дисков перепробывал все марки, но не желал успокаиваться.
После этого мы в шутку просили менеджеров выявлять таких покупателей при продаже и отказывать им услугах.

 

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

 

Встречаются два программиста - один идет веселый, пьет пиво, а второй - грустный, но с коляской. Первый:
- Ты чего такой? Жизнь прекрасна!
Второй (указывая на коляску):
- Да вот!.. Ни Uninstаll, ни Undо не помогли

 

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

 

Чем русский отличается от цыгана? Цыган никогда не хает тех, у кого он коня своровал...

 

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

 

Все люди делятся на две категории: Первые не знают кто такой Билл Гейтс, а вторые его не любят.

 

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

 

Вчера астрономы "разжаловали" Плутон. Жители бывшей планеты обещают направить жалобу в Страсбургский суд.

 

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

 

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

Наверх


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

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

Copyright (c) Nemiro AS, 2005-2007


В избранное