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

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



Выпуск # 406


http://www.kbyte.ru/

 

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

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

 

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

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

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

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

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

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

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

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

    Проблема с заполнением файла Excel из текстовика

    Проблема подключения к открытой базе данных ACCESS ADO

    А если вот такой код...

    Приведите пример

    Запрос к базе ACCESS с параметрами типа Date

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

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

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

Наверх

 

 

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

Проблема с заполнением файла Excel из текстовика | Автор: TillLinderman
Добавлено: 27.11.2008 / 16:30 | ответов: 0 | просмотров: 27

Всем доброго времени суток! Вопрос: Есть текстовик сформированный программой Еверест. Наверняка все слыхали про такую. В текстовике содержится суммарная информация о компьютере. И есть подготовленный для заполнения файл Excel. Мне нужно запихать определенные части строк из текстовика в определенные ячейки Excel. То есть наименование процессора - ячейка А1 наименование материнки ячейка В1.
Как пытался делать:
Копировал текст в текстбокс на форме и корежил. Конкретно как корежил:
Пытался порубить содержимое текстового поля с помощью регулярных выражений. Но проблема в том, что не могу подобрать подходящий паттерн (шаблон). То есть, я пытаюсь задать для текстового поля такой шаблон, который бы вместо всех символов кроме тех которые мне нужно оставить, подставил бы ""(пустоту). И я бы построчно скопировал бы оставшуюся нужную инфу в нужные ячейки. Но паттерн такой подобрать никак не могу.
Второй вариант какой пробовал: из текстового поля в которое скопировался эверестовский отчет я с помощью Get пытался выудить нужные символы. В результате вылезает ошибка: Bad function or bad file name.
И третий путь с помощью Mid выбирал нужные символы в нужном месте и копировал куда надо. Тоже не подошло потому что к сожалению расположение и количество нужных символов всегда разное. И соответственно получается чепуха.
Короче тупик.
Есть еще какие-нибудь варианты (если можно с примером)? Хоть в каком направлении идти?
Спасибо!

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


Проблема подключения к открытой базе данных ACCESS ADO | Автор: mn
Добавлено: 26.11.2008 / 08:08 | ответов: 0 | просмотров: 42

Доброго всем утра. Второй день мучаюсь с проблемой:
есть база данных ACCESS на сетевом компе, она постоянно занята пользователем, но открыта для общего доступа, учетных записей нет. Пытаюсь через ADO сделать SELECT, но в ответ получаю "База данных открыта для монопольного доступа или требует разрешения на чтение".

Может, я забыла указать какие-то параметры при подключении?

Set adoCon = Server.CreateObject("ADODB.Connection")
strCon = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("\\a-2500\e\test\SPZ.mdb")
adoCon.Open strCon
Set rs = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT * From t_cur"
rs.Open strSQL, strCon

HELP!!!



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


А если вот такой код... | Автор: КлубНичкА
Добавлено: 24.11.2008 / 23:13 | ответов: 2 | просмотров: 101

А если вот такой код... при нажатии на кнопку Dobavit создаётся элемент управления который выбран в Spisok и нужно сделать так чтобы выбранные элементы не накладывались друг на друга...как?
Private Sub Dobavit_Click()
Dim str1 As Control
Set str1 = UserForm1.Controls.Add("Forms." & Spisok.Value & ".1")
End Sub

Private Sub Ydalit_Click()
Controls.Remove (Controls.Count - 1)
End Sub

Private Sub UserForm_Initialize()
Spisok.AddItem "Label"
Spisok.AddItem "TextBox"
Spisok.AddItem "ComboBox"
Spisok.AddItem "ListBox"
Spisok.AddItem "CheckBox"
Spisok.AddItem "OptionButton"
Spisok.AddItem "ToggleButton"
Spisok.AddItem "Frame"
Spisok.AddItem "CommandButton"
Spisok.AddItem "TabStrip"
Spisok.AddItem "MultiPage"
Spisok.AddItem "ScrollBar"
Spisok.AddItem "SprinButton"
Spisok.AddItem "Image"
End Sub

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


Ответ # 1 | Автор: Алексей
Добавлено:25.11.2008 / 03:48
ZOrder

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

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


Ответ # 2 | Автор: КлубНичкА
Добавлено:27.11.2008 / 18:00
а поподробней можно?

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


Приведите пример | Автор: Gari
Добавлено: 24.11.2008 / 20:25 | ответов: 0 | просмотров: 55

Как принудительно удалить файл, который занят процессом (или папку)? Нужно удалить процесс? Или есть другой способ? Если да то, как это реализовать на vb 6 (Короче нужно что-то вроде Unlocker) помогите примером.

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


Запрос к базе ACCESS с параметрами типа Date | Автор: mn
Добавлено: 22.11.2008 / 20:23 | ответов: 1 | просмотров: 83

Доброго всем вечера.
Начала изучать VBScript недавно.

Подключаю базу данных ACCESS через ADO. Нужно сделать выборку, используя запрос с параметрами:
SELECT * FROM t_curr WHERE c_dt>:P1 and c_dt<:P2
Как мне эти параметры объявить в коде и задать их тип и значение? Эти значения передаются через переменные типа STRING в формате "dd.mm.yyyy hh:nn:ss" из формы.

Спасибо.

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


Ответ # 1 | Автор: Алексей
Добавлено:23.11.2008 / 08:01
Попробуйте использовать функцию DateDiff

Функция DateDiff


Возвращает значение типа Variant (Long), указывающее число интервалов времени между двумя указанными датами.

Синтаксис


DateDiff(интервал, дата1, дата2 [, первый_день_недели] [, первая_неделя_года] )

Пример


SELECT * FROM [Table1] WHERE DateDiff("d", "01.01.2008 01:02:59", [DateFiled]) > 0


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

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


Наверх

 

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

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

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

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

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

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

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

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

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

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

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

 

Статьи на Kbyte.Ru

Наверх

 

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

Как сделать, чтобы при «редиректе» сервер выдал 301 код статуса, а не 302?
Дата добавления: 31.07.2006 / 13:50 | просмотров: 2033 | платформа: ASP .NET (VB)

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

Как заблокировать кнопку "Закрыть" ([X])
Дата добавления: 31.07.2006 / 12:12 | просмотров: 1876 | платформа: VB

Как нарисовать что-либо на Form/PictureBox?
Дата добавления: 24.03.2007 / 10:15 | просмотров: 1886 | платформа: VB .NET

Как отправить файл в корзину? (!API!)
Дата добавления: 24.03.2007 / 12:23 | просмотров: 2352 | платформа: VB .NET

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

Форма поверх всех окон
Дата добавления: 31.07.2006 / 12:14 | просмотров: 1974 | платформа: VB

Класс доступа к данным SQL Server
Дата добавления: 24.03.2007 / 11:48 | просмотров: 1756 | платформа: VB .NET

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

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

 

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

Наверх

 

Юмор на Kbyte.Ru

Соседская бабулька отмочила очередную кору.
Она обошла все хозяйственные магазины в районе и наезжала на продавцов с таким вопросом (цитирую дословно):
- "Мне нужны ИМПОРТНЫЕ ДЫРОЧКИ, В КОТОРЫЕ БОЛЬШИЕ ВЛЕЗАЮТ!"
- ??!!!!
Угадайте, что она имела в виду ? .... Вот и продавцы не угадали. Ей приносили все - от парафиновых свечек до дивидюков с крутой порнухой - но бабулька только топала ножками и орала исчо сильнее, типа "Идиоты, ни хрена не понимаете!!!"
Только дома, под перекрестным допросом выяснилось, ЧТО она подразумевала под столь странной фразой. Это оказалась (тут я упал пацтул) ЕВРОРОЗЕТКА (обычная, комнатная, на 220 вольт).
У нее от чайника вилка в обычную советскую розетку ессно не влезала. Но какова формулировка ! :-)))))))

 

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

 

Рабочий день. Вычислительный центр. Приемная директора. В приемную вбегает женщина и с ходу направляется в кабинет директора. Ее тормозит секретарша:
- Женщина, вы куда? У директора совещание.
- Да он меня звал, я с АСУ.
- Ну, я тоже сосу, но не во время совещания...

 

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

 

Плывет по морю американец на корабле, выплывает нептун и спрашивает:
"У меня 10 дочерей, сколько можешь взять на ночь?"
Американец подумал и отвечает:"Ну две... три..."
Нептун говорит:"Море не любит слабых" и потопил корабль...
Плывет англичанин, всплывает Нептун: "У меня 10 дочерей, сколько можешь взять на ночь?"
Англичанин думает и отвечает: "Ну пять... шесть..."
Нептун: "Море не любит слабых" и топит корабль...
Плывет на лодке грузин...
Нептун:"У меня 10 дочерей, сколько можешь взять на ночь?"
Грузин подумал и отвечает:"Одынадцат"
Нептун:"Так у меня же всего десять дочерей!!!"
Грузин:"Да ты мужик мнэ тожэ нравышса "

 

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

 

На открытии Олимпиады в Сиднее присутствовал Билл Гейтс.
Команда США выполнила недопустимую операцию и будет закрыта.

 

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

 

На международных соревнованиях американские вооруженные силы совершили больше всех промахов при прицельной стрельбе, а российские - больше всего попаданий при предупредительной.

 

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

 

- Когда Microsoft будет выпускать то, что не тормозит?
- Когда начнет выпускать автомобили

 

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

 

Самый трудный год в семейной жизни - это текущий.

 

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

 

Два НР лежат в реанимации. Оклемались немного... Один говорит:
- Как попал-то сюда?
- Да вот прикола ради заказал себе Порш в виде запора... Движок там поршевский, глюки все... Еду по трассе, гляжу - 600 мерс км под 200 идет. Я педаль газа втопил и сделал его, как стоячего... А потом в зеркало засмотрелся, в поворот не вписался и все... я здесь... А ты как?
- Еду на 600-м мерсе, на спидометре 200 км/ч... вдруг меня, как стоячего, запор делает... Я думал и правда стою - взял и вышел..

 

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

 

Америка, конец 1999 года, сотрудники компании Microsoft сидят в самолете. Полетели куда-то...
Стюардесса:
- ...и в качестве приятной новости хочу сообщить вам, что бортовые компьютеры нашего лайнера управляются операционной системой Windows-2000! Командир и экипаж желают вам приятного полета!
Через секунду - в дверях пробки - все лезут через головы, чтобы побыстрее выбраться!
А один - самый умный - сидит. Стюардесса:
- А вы почему не торопитесь?
- А он у вас и не взлетит!

 

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

 

Открыта новая радиостанция для юзеров под названием RT FM. По ней будут транслироваться чтения различных мануалов и ответы на часто задаваемые вопросы.

 

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

 

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

Наверх


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

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

Copyright (c) Nemiro AS, 2005-2007


В избранное