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

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



Выпуск # 480


http://www.kbyte.ru/

 

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

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

 

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

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

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

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

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

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

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

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

    Узнать ip посетителя сайта

    Считать файл и передать в MySQL

    2D MMORPG

    Другая книга

    Вопрос по контекстному меню

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

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

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

Наверх

 

 

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

Узнать ip посетителя сайта | Автор: abra
Добавлено: 06.05.2009 / 16:04 | ответов: 2 | просмотров: 57

вроде бы не сложно, но строчка
001:
002:
003:
Request.ServerVariables("REMOTE_ADDR")

Colorized by: Eros.CodeSyntaxColor Engine


выдает сообщение об ошибке "Compiler Error Message: CS0118: 'System.Web.HttpRequest.ServerVariables' is a 'property' but is used like a 'method'". Что делать? :о(

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


Ответ # 1 | Автор: Edlin
Добавлено:07.05.2009 / 08:58
А какой язык ты используешь? Попробуй заменить круглые скобки на квадратные:

001:
002:
003:
Request.ServerVariables["REMOTE_ADDR"]

Colorized by: Eros.CodeSyntaxColor Engine


или попробуй:

001:
002:
003:
Request.ServerVariables.Get("REMOTE_ADDR")

Colorized by: Eros.CodeSyntaxColor Engine

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


Ответ # 2 | Автор: Алексей
Добавлено:07.05.2009 / 09:11
Request.UserHostAddress()

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

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


Считать файл и передать в MySQL | Автор: mashutkai
Добавлено: 30.04.2009 / 05:39 | ответов: 3 | просмотров: 84

Здравствуйте. Помогите пожалуйста написать такую программу: надо чобы программа каждые 5 секунд считывала файл построчно и если он изменился, записывать новую строку в MySQL на удалённый сервер, а не достающие - удалять.

С начала помогите считать файл в переменную или в массив и вывести хотябы через MsgBox.

Делаю это в VB 2008 Express

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


Ответ # 1 | Автор: Edlin
Добавлено:30.04.2009 / 08:50
Dim fileContent As String = File..ReadAllText("c:\Temp\MyFileName.txt")

MessageBox.Show(fileContent)

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


Ответ # 2 | Автор: mashutkai
Добавлено:30.04.2009 / 09:22
Не получается - пишет - Имя File не определено, а точка наверное одна должна быть???

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


Ответ # 3 | Автор: Edlin
Добавлено:04.05.2009 / 09:18
Точка должна быть одна. А File определен в пространстве имен System.IO. Попробуй написать System.IO.File.ReadAllText(.....)

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


2D MMORPG | Автор: Shipuden
Добавлено: 29.04.2009 / 16:39 | ответов: 0 | просмотров: 70

Всех приветствую на этом форуме по Visual Basic.
Идет создание 2D MMORPG, название пока придумывается,проекту требуется программист VB6 нормального уровня.
Проект создается на аналоге Eclipse,но он намного лучше, игра создается в среде DX7 но есть идеи сделать игру изометрической,но однако для этого нужен программист, вот я и решил обратиться на этот форум может кто-то сможет помочь с проектом.
Связаться можно по Skype-s.t.a.l.k.e.r641.
Если у кого то нету скайпа скачать его можно на оффициальном сайте _www.skype.com
Надеюсь на вашу помощь и понимание.

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


Другая книга | Автор: Dragon-zla
Добавлено: 27.04.2009 / 16:56 | ответов: 0 | просмотров: 99

Здравствуйте, как в VBA сделать, чтобы по нажатию на кнопку открывалась другая книга, лежащая в папке с исходной?

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


Вопрос по контекстному меню | Автор: Kolya007
Добавлено: 24.04.2009 / 06:41 | ответов: 3 | просмотров: 149

1. Необходимо создать контекстное меню без применения редактора меню, т.е. программно... Как это сделать?.. Если возможно, пример кода...
2. Контекстное меню отказывается выводиться на форме созданной программно... Как это исправить?..

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


Ответ # 1 | Автор: Kolya007
Добавлено:26.04.2009 / 05:30
Раз никому не известно, придется пользоваться редактором...))

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


Ответ # 2 | Автор: DIS
Добавлено:28.04.2009 / 16:16
Есть готовый пример...

001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
014:
015:
016:
017:
018:
019:
020:
021:
022:
023:
024:
025:
026:
027:
028:
029:
030:
031:
032:
033:
034:
035:
036:
037:
038:
039:
040:
041:
042:
043:
044:
045:
046:
047:
048:
049:
Const MF_CHECKED = &H8&
Const MF_APPEND = &H100&
Const TPM_LEFTALIGN = &H0&
Const MF_DISABLED = &H2&
Const MF_GRAYED = &H1&
Const MF_SEPARATOR = &H800&
Const MF_STRING = &H0&
Private Type POINTAPI
  x As Long
  y As Long
End Type
Private Declare Function CreatePopupMenu Lib "user32" () As Long
Private Declare Function TrackPopupMenu Lib "user32" (ByVal hMenu As Long, ByVal wFlags As Long, ByVal x As Long, ByVal y As Long, ByVal nReserved As Long, ByVal hwnd As Long, ByVal lprc As Any) As Long
Private Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Long, ByVal bRevert As Long) As Long
Private Declare Function AppendMenu Lib "user32" Alias "AppendMenuA" (ByVal hMenu As Long, ByVal wFlags As Long, ByVal wIDNewItem As Long, ByVal lpNewItem As Any) As Long
Private Declare Function DestroyMenu Lib "user32" (ByVal hMenu As Long) As Long
Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
Dim hMenu As Long

Private Sub Form_Load()
  'KPD-Team 1998
  'URL: http://www.allapi.net/
  'E-Mail: KPDTeam@Allapi.net
  'Create an empty popupmenu
  hMenu = CreatePopupMenu()
  'Append a few menu items
  AppendMenu hMenu, MF_STRING, ByVal 0&, "Hello !"
  AppendMenu hMenu, MF_GRAYED Or MF_DISABLED, ByVal 0&, "Testing ..."
  AppendMenu hMenu, MF_SEPARATOR, ByVal 0&, ByVal 0&
  AppendMenu hMenu, MF_CHECKED, ByVal 0&, "TrackPopupMenu"
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single)
  Dim Pt As POINTAPI
  'Get the position of the mouse cursor
  GetCursorPos Pt
  If Button = 1 Then
    'Show our popupmenu
    TrackPopupMenu hMenu, TPM_LEFTALIGN, Pt.x, Pt.y, 0, Me.hwnd, ByVal 0&
  Else
    'Show our form's default popup menu
    TrackPopupMenu GetSystemMenu(Me.hwnd, False), TPM_LEFTALIGN, Pt.x, Pt.y, 0, Me.hwnd, ByVal 0&
  End If
End Sub
Private Sub Form_Unload(Cancel As Integer)
  'Destroy our menu
  DestroyMenu hMenu
End Sub

Colorized by: Eros.CodeSyntaxColor Engine


Правда тут не обрабатываются клики по элементах меню.

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


Ответ # 3 | Автор: Kolya007
Добавлено:28.04.2009 / 22:43
Благодарю...))

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


Наверх

 

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

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

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

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

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

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

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

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

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

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

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

 

Статьи на Kbyte.Ru

Наверх

 

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

Анализ даты стандарта MM/DD/YYYY и MM/DD/YY
Дата добавления: 24.03.2007 / 10:59 | просмотров: 2188 | платформа: RegEx

Анализ чисел
Дата добавления: 24.03.2007 / 11:09 | просмотров: 2039 | платформа: RegEx

Как проверить, посещал пользователь страницу или нет?
Дата добавления: 31.07.2006 / 16:40 | просмотров: 2153 | платформа: ASP .NET (VB)

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

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

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

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

Поиск предложений
Дата добавления: 24.03.2007 / 11:06 | просмотров: 2136 | платформа: RegEx

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

Как изменить размер панели SplitContainer?
Дата добавления: 23.08.2006 / 19:07 | просмотров: 2394 | платформа: VB .NET

 

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

Наверх

 

Юмор на Kbyte.Ru

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

 

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

 

Как в комнате уничтожить клопов ?
- Hадо их загнать под шкаф, а у шкафа подпилить ножки.

 

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

 

Каждую секунду, тыкая в клавиши, мы давим насмерть не менее 1000 микробов.

 

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

 

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

 

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

 

Звонит клиент (К) в сервис-центр. Трубку снимает инженер (И).
К: - Здравствуйте, у меня проблема!!!
И: - Что случилось?
К: - У меня компьютер не включается!!! А мне работать очень срочно нужно! Прямо сейчас!
И: - Чем я могу помочь?
К: - Приезжайте ко мне и почините!
И: - Нет. Это Вы к нам приезжайте!
К: - Да? Ну тогда я заеду к Вам послезавтра...

 

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

 

Сразу хочу пояснить - то, что я кратко хочу рассказать - не боян, или как там еще называют плагиат или какие-нибудь хреновые выдумки, а рассказано мне непосредственым участником событий.
Ну так вот. Кто не знает - в Москве появилась новая площадь - имени Шарля де Голля. А почему она так названа? Правильно. Потому что напротив гостиницы "Космос" поставили памятник этому самому Шарлю де Голлю, и открывали этот памятник не кто-нибудь, а Наш и Их президенты.
А перед самым открытием, примерно за неделю, приехал посмотреть на это чудо сам Лужков. А сопровождал его автор чуда. Правильно. Церетели. Посмотрел Лужков на этот памятник и указал Церетели на то, что козырек кепки длинноват, понимаешь. Ну не может, видишь ли, козырек быть длиннее самой кепки! Не вопрос!!! Далее - действие от очевидца. Примерно в час ночи подъезжает подъемник, еще какие-то машины, накинули на голову памятнику огромный куполообразный чехол - и тихо, по-видимому, газосваркой, обрезали козырек кепки! только потом, наверное, отшлифовали - пошумели чем-то минут 40.
А наутро никто и не заметил перемены в памятнике. Наверно, потому, что смотреть на творения Церетели невозможно, так никто и не смотрит.

 

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

 

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

 

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

 

Чтобы в лесу узнать, где север, нужно посмотреть на дерево. Если это дерево - пальма, то юг уже здесь.

 

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

 

- Почему считается, что Windows 2000 не падает?
- А куда ей падать, если она ничего не поддерживает.

 

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

 

Сетевые технологии и сексуальная ориентация:
1. Клиент-сервер - мужчина и женщина.
2. Сервер-сервер - лесбиянки.
3. Клиент-клиент - гомосексуалисты.
4. Сам себе клиент и сам себе сервер - онанист.

 

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

 

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

Наверх


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

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

Copyright (c) Nemiro AS, 2005-2007


В избранное