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

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



Выпуск # 307


http://www.kbyte.ru/

 

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

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

 

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

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

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

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

    Вопрос #000935: VB работа с веб-камерой

    Вопрос #000929: MsgBox с двумя кнопками

    Вопрос #000916: Вопрос_с_работой_C#_и_Sql_Server_2005

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

    Рисовалка

    игра Сокебан

    Работа с .RowFilter

    заполнение ComboBox из БД.. HELP!

    Помогите приобрести Visual Basic NET 2003 RUS

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

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

    Как узнать размер базы данных MySQL через php

    Взаимодействие с другими сайтами через HTTP (HttpWebRequest и HttpWebResponse)

    Работа с SQL – Запросы

    Использование XML.Serialization

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

Юмор на Kbyte.Ru

 

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

 

Система «Эксперт» - уникальная система, которая поможет решить, если не все, то многие Ваши проблемы с программированием и разработкой! Если у Вас есть какой-либо вопрос по программированию или разработке, то Вы всегда можете задать его нашим Экспертам! При этом каких-либо особых действий от Вас не потребуется! Просто отправьте Ваш вопрос на адрес mailto:expert@kbyte.ru, в теме письма укажите тему вопроса, в тексте – сам вопрос, и все! Эксперты дадут Вам ответ в течение 12-24 часов, на тот адрес, с которого Вы отправите вопрос. Все проще простого! Никакой регистрации и заполнение бесконечных форм, просто спросите и получите ответ ;-)


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

 

Вопрос #000935: VB работа с веб-камерой

Автор вопроса: Анна // 05.05.2008 / 02:35

Язык: Visual Basic 2008 Express Edition.
Подскажите, пожалуйста, как из приложения (Windows Form Application) получить доступ к вебкамере, а именно получить снимок в виде bitmap (отобразить его на форме или же сохранить как bmp-файл).
Заранее очень благодарна!
P.S. Просматривая архив вопросов я уже нашла некоторые решения возникавших у меня проблем - Спасибо огромное!

.....

Отвечает: Алексей Немиро // 05.05.2008 / 09:33

Здравствуйте, Анна.

Попробуйте воспользоваться этим классом

--
С наилучшими пожеланиями,
Немиро Алексей http://aleksey.nemiro.ru/

 

Вопрос #000929: MsgBox с двумя кнопками

Автор вопроса: Алекс // 01.05.2008 / 23:53

Есть поле со списком на форме, необходимо при выборе определенной позиции из списка вывести MsgBox и две кнопки на нем, при нажатии на которую, в другой TextBox всавлялся бы выбранный вариант ответа
Подскажите, как можно это сделать или в каком направлении копать??

--------------------------------------
Категория: --- MS Access

Отвечает: Алексей Немиро // 02.05.2008 / 04:09

Здравствуйте, Алекс.

001:
002:
003:
If MsgBox("Вставить?", vbQuestion Or vbYesNo) = vbYes Then
 '...
End If


--
С наилучшими пожеланиями,
Немиро Алексей http://aleksey.nemiro.ru/

 

Вопрос #000916: Вопрос_с_работой_C#_и_Sql_Server_2005

Автор вопроса: Дмитрий Корнев // 28.04.2008 / 07:50

У меня есть автоматом созданный ДатаСэт (взятый из SQL)... при нажатии кнопки данные из текст-боксов должны записываться в поля... вопрос в том, что у меня не получается сделать цикл, чтобы в поле с ID автоматически вносились значения при создании новых строк...

private void button1_Click(object sender, EventArgs e)
{

// Создаём переменную для хранения значения типа Int32
Int32 id1 = 0;
Int32.TryParse(textBox1.Text, out id1);

// Создаём объект DataAdapter для таблицы Т1 - см. файлы bazaDataSet.xsd и bazaDataSet.Designer.cs
T1TableAdapter t1Adapt = new T1TableAdapter();

// Вызываем метод, который сразу-же пытается выполнить
//подключение к БД, вставку записи в таблицу и отключение от БД

try
{
t1Adapt.Insert(id1, textBox2.Text, textBox3.Text);
}
catch (Exception ex)
{
MessageBox.Show(ex.Message,"Ошибка",MessageBoxButtons.OK,MessageBoxIcon.Error);
}
}



Я вставил код, где ID берётся из текстбокса... А мне нада, чтобы ID сам автоматически создавался при добавлении новой строки...

Если поможете, буду Вам очень благодарен...

Отвечает: Алексей Немиро // 28.04.2008 / 07:56

Здравствуйте, Дмитрий.

В базе поле с ID должно быть Primary Key и Identity, тогда SQL Server идентификатор будет ставить автоматом.

Типизированные DataSet я бы не рекомендовал вообще использовать, хотя на этот счет существует много мнений :)


--
С наилучшими пожеланиями,
Немиро Алексей http://aleksey.nemiro.ru/

 


Чтобы задать Ваш вопрос, отправьте его на адрес expert@kbyte.ru

Раздел Эксперт на сайте Kbyte.Ru

Наверх

 

 

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

Рисовалка | Автор: 5acred Phoenix
Добавлено: 09.05.2008 / 17:22 | ответов: 0 | просмотров: 27

Хотел забацать рисовалку по типу рисовалки граффити в контакте.
В аттаче (canvas-345.rar) находится рисовалка.
В what-to-do-345.rar сделан скриншот проги, на котором виден баг. Такой край получается, если линию нарисовать резким движением. Как можно это исправить?

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


игра Сокебан | Автор: Элли
Добавлено: 09.05.2008 / 02:28 | ответов: 0 | просмотров: 24

Кто нибудь, помогите!!!!! Не могу найти элементарный исходник игры Сокебан на VB, может быть кто-нибудь делал?

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


Работа с .RowFilter | Автор: Давидюк
Добавлено: 08.05.2008 / 11:58 | ответов: 2 | просмотров: 59

.RowFilter = "City = 'Berlin'" работает без проблем. Как заставить работать .RowFilter = "City = 'ЗначениеПеременной'"?

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


Ответ # 1 | Автор: EROS
Добавлено:08.05.2008 / 12:56
.RowFilter = "City = '" + myVar + "'"

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


Ответ # 2 | Автор: Давидюк
Добавлено:08.05.2008 / 15:00
Спасибо! Всё пляшет!

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


заполнение ComboBox из БД.. HELP! | Автор: DANger
Добавлено: 08.05.2008 / 11:52 | ответов: 4 | просмотров: 89

Доброго времени суток
Подскажите пожалуйста вот какой вопрос ..
Есть задача заполнить комбобокс из БД..
Необходимо выполнить следующую конструкцию ..

Получаем записи из БД, определяем их в комбобокс
‘-------------
Do While (Not RS.EOF) And (RS.RecordCount)
ComboBox1.Items.Add(RS.Fields("id").Value)
ComboBox1.Items.Add(RS.Fields("name").Value)
RS.MoveNext()
Loop
‘-------------
Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
cid = ComboBox1.SelectedValue ‘ получаем белеберду !!! (ЛИБО ID ЛИБО NAME )
End Sub

Комбобокс должен быть отображать «RS.Fields("name").Value» и каждая запись соответственно должна иметь «RS.Fields("id").Value»

Вопрос: Каким образом отловить и то и другое ..
В конструкторе это
ValueMember и DisplayMember

Заранее спасибо..

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


Ответ # 1 | Автор: Алексей
Добавлено:08.05.2008 / 15:30
RS - надеюсь не Recordset :)
Можно использовать свойство Tag, в котором можно хранить любые данные, в том числе и объекты.
Либо грузить данные на автомате из источника.

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

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


Ответ # 2 | Автор: DANger
Добавлено:08.05.2008 / 22:18
RS - recordset !:) //
Можно по подробней .. пжалста ..
особенно синтаксис волнует ..
а то второй день уже голову ломаю ..

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


Ответ # 3 | Автор: Алексей
Добавлено:09.05.2008 / 04:36
Класс для работы с базами данных MS Access (см. ответ #1)
продолжение, если возникнуть проблемы с первым :-)
тут тоже может что-то интересное найдется

Примеры работы с базами данных средствами Visual Basic .NET

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

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


Ответ # 4 | Автор: DANger
Добавлено:09.05.2008 / 12:58
Пасибо .. но я наверно не совсем об этом..

Вариант1 Делаем конструктором..
1.Создаем на форме combobox
2.Указываем в Datasours этого comboboxa … т.е. БД + все настройки к ней ..
3.Указываем DisplayMember – поле «name»
4.Указываем ValueMember – поле «id»

Далее в сабе comboboxa пишем
Dim pid As Integer
pid = ComboBox1.SelectedValue
MsgBox(pid)
При выполнении получаем ID выбраной записи «name»
Это наши действия если бы мы делали в конструкторе ..

Моя задача состоит в том, что бы сделать ВАРИАНТ 2.. это всё в коде..
С БД всё в порядке ..
запрос, перебор записей//

RS.Fields("id").Value – id записи
RS.Fields("name").Value – поле «name» конкретной записи ..

Далее я засылаю поле «name» в комбо для вывода пользователю .. - ComboBox1.Items.Add(RS.Fields("name").Value)
Combobox честно отображает поле «name» //

Вопрос: Как мне выловить ID выбранной записи ???

Do While (Not RS.EOF) And (RS.RecordCount)
’ComboBox1.Items.Add(RS.Fields("id").Value)
ComboBox1.Items.Add(RS.Fields("name").Value)
RS.MoveNext()
Loop

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


Помогите приобрести Visual Basic NET 2003 RUS | Автор: Serg62
Добавлено: 07.05.2008 / 22:28 | ответов: 1 | просмотров: 48

Уважаемые форумчане помогите начинающему приобрести диск со средой разработки Visual Basic NET 2003 RUS (обязательно русская версия). По получении диска по почте гарантирую оплату. Пожалуйста только не дорого! Сам проживаю в Саратовской области в небольшом провинциальном городке и с такими вещами у нас туго. Заказать через Microsoft для меня и моей семьи очень накладно(слишком дорого). Да если надо взамен могу предложить DVD-диск: Visual Studio.net 2003 Enterprise Architect, Intel C++ Compiller 8.0, DirectX 9.0 SDK, DDK (все на английском). Можно ответить прямо на e-mail: puga62@mail.ru. C уважением Сергей.

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


Ответ # 1 | Автор: Алексей
Добавлено:08.05.2008 / 05:44
<< Visual Studio.net 2003 Enterprise Architect, Intel C++ Compiller 8.0, DirectX 9.0 SDK, DDK (все на английском)
программист должен в лицо знать язык, на котором программирует :)

<< Заказать через Microsoft для меня и моей семьи очень накладно(слишком дорого).
Версии Express все бесплатные, можно скачать.

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


Наверх

 

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

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

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

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

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

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

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

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

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

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

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

 

Статьи на Kbyte.Ru

Наверх

 

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

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

Как обработать клиентские события элемента управления?
Дата добавления: 17.08.2006 / 17:50 | просмотров: 1714 | платформа: ASP .NET (VB)

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

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

Как преобразовать десятичное число в бинарное?
Дата добавления: 16.08.2006 / 20:32 | просмотров: 1591 | платформа: VB

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

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

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

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

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

 

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

Наверх

 

Юмор на Kbyte.Ru

Молодой человек старался получить освобождение от призыва, ссылаясь на близорукость. Он представил справку от окулиста и даже привел на призывную комиссию свою невесту, чтобы она подтвердила его физический недостаток. Увидев невесту, комиссия тотчас освободила молодого человека от воинской службы по причине его чрезвычайно слабого зрения.

 

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

 

Открыт новый поисковый сервер для новых русских: www.tipa.au

 

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

 

Один программер любил компьютеры. Пока его за этим не застукали...

 

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

 

Учительница вносит в класс компьютер. Ставит на стол. Спрашивает у учеников:
- Дети, сколько на столе компьютеров?
- Оди-ин.
С трудом учительница вносит в класс второй компьютер.
- Дети, сколько на столе компьютеров?
- Два-а.
Выбиваясь из сил учительница втаскивает в класс третий компьютер.
- Дети, ну а теперь сколько на столе компьютеров?
- Три-и.
Вытирая пот со лба, учительница шепчет:
- А все ж, с яблоками было как-то легче!

 

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

 

Сервера – это такое специальное слово, которым системные инженера обозначают особо мощные компьютера. А еще они частенько ищут драйвера, чтобы подключать сканера, и покупают тонера, чтобы устанавливать в принтера. За что их и уважают юзера.

 

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

 

Идет урок о вреде курения и алкоголизма. Учительница берет 3 стакана в один наливает водку, в другой выдувает дым от сигареты, в третий разбивает яйцо. В каждый из стаканов кидает по червяку. В первом и втором стакане черви умерли. В третьем живет.
- Какие выводы сделали?
Вовочка тянет руку:
- Если не пить и не курить, то в яйцах черви заведутся.

 

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

 

Идет третий этап завершения продолжения окончания установки Microsoft Office 2000

 

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

 

Я пришел к тебе с дискетой - рассказать, что сеть упала.

 

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

 

Учительница:
- Петя, составь предложение со словами "вылупился" и "цыплёнок".
Петя:
- Вася вылупился на мои новые кроссовки как новорождённый цыплёнок.

 

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

 

Два муравья едят слона. Проходит десять лет.
- Тот самый вкус.
- Тот самый слон.

 

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

 

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

Наверх


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

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

Copyright (c) Nemiro AS, 2005-2007


В избранное