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

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



Выпуск # 217


http://www.kbyte.ru/

 

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

Здравствуйте дамы и господа!
Представляю очередной выпуск рассылки научно-информационного портала Kbyte.Ru. Надеюсь он Вам понравится. Если у Вас есть какие либо вопросы или предложения по рассылке, пишите нам – admin@kbyte.ru!

 

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

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

    Вопрос #000603: Свойство компонента Combo в VB 6.0

    Вопрос #000587: Audit

    Вопрос #000582: Активизировать_элемент_формы,_в_процедуре_Form_...

    Вопрос #000580: Visual_Basic_6.0._Как_можно_поместить_картинку_...

    Вопрос #000577: Visual_Basic_6.0._Активизировать_элемент_формы

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

    Локалка

    MessageBoxIndirect

    Help ME

    опять MS WORD

    Отправка на e-mail из VB

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

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

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

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

    Выбор языка программирования для научных работ (2-я редакция)

    Работаем с MIME

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

Юмор на Kbyte.Ru

 

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

 

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


Вопрос #000603: Свойство компонента Combo в VB 6.0

Автор вопроса: Федоренко Дмитрий Константинович // 08.11.2007 / 09:27

Здравствуйте уважаемые эксперты.
Скажите пожалуйста есть ли такое свойство у компонента Combo в VB 6.0,
которое задает длинну низпадающего списка.
Например, если у меня, скажем, 3-4 элемента занесено в этот список, то я при
выборе нужного вижу их все сразу, а если их очень много(так что они не
умещаются сразу все в видимую область), то приходится пользоваться бегунком
справа и прокручивать в поиске нужного элемента.
Так вот, есть ли такое свойство, которое позволяет задавать размеры этой
видимой области (длинну низпадающего списка), чтобы я смог увидеть например
не 3-4 элемента, а 10-20, пока мне это будет позволять делать экран монитора
:))) ? И что это за свойство?
Заранее благодарен за ответ.

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

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

Нет, стандартного такого свойства нет, но это можно реализовать при помощи API.
Я не так давно добавлял примеры на эту тему в наш Кодообменник:
http://kbyte.ru/Code/ShowList.aspx?lid=1&gid=1&uid=0&sort=0

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

 

Вопрос #000587: Audit

Автор вопроса: -=Andrey=- // 28.10.2007 / 14:57

вопрос: как отследить подключение к MS SQL серверу?(имя пользователя в домене Windows и IP-адрес компа пользователя)
описание: пользователь запускает клиентское приложение через Citrix, в базе данных master..sysprocesses в данном случае будет отображаться только информация о sql-имени пользователя,запустившего приложение, адреса самого citrix-сервера, с которого запускалось приложение, а об адресе локального компа и доменном имени юзера ничего нет...



--------------------------------------
Категория: --- SQL Server

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

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

Попробуйте вот так:
001:
002:
003:
004:
005:
CREATE TABLE #tmp ([output] varchar(255) null)
INSERT INTO #tmp exec master..xp_cmdshell 'arp -a'
SELECT count([output]) FROM #t where [output] like '%dynamic%'
DROP TABLE #tmp
SELECT count(DISTINCT net_address) FROM sysprocesses



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

 

Вопрос #000582: Активизировать_элемент_формы,_в_процедуре_Form_...

Автор вопроса: Александр Левашов // 24.10.2007 / 20:16

Здравствуйте уважаемые эксперты!

Visual Basic 6.0. Как программно активизировать конкретный элемент формы Text, в процедуре Form_Load()? То есть сразу после загрузки формы.

Спасибо.
Александр Левашов. г.Кострома.

Отвечает: Алексей Немиро // 25.10.2007 / 02:54

Если речь идет о установке фокуса, то в событие Form_Load это сделать
не возможно. Используйте другое событие, либо таймер.

 

Вопрос #000580: Visual_Basic_6.0._Как_можно_поместить_картинку_...

Автор вопроса: Александр Левашов // 24.10.2007 / 14:04

Здравствуйте уважаемые эксперты!

Visual Basic 6.0. Как можно поместить картинку на кнопку.

Спасибо.
Александр Левашов. г.Кострома.

Отвечает: Алексей Немиро // 25.10.2007 / 02:59

Установите свойство Picture, а также style="1" - Graphical.
Еще может понадобиться свойство UseMaskColor и MaskColor, которые
позволяют установить прозрачный цвет картинки.

 

Вопрос #000577: Visual_Basic_6.0._Активизировать_элемент_формы

Автор вопроса: Александр Левашов // 24.10.2007 / 12:28

Здравствуйте уважаемые эксперты!

Visual Basic 6.0. Как программно активизировать конкретный элемент формы Text, чтоб курсор встал на него.

Спасибо.
Александр Левашов. г.Кострома.

Отвечает: Алексей Немиро // 24.10.2007 / 12:40

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

Разместите два текстовых поля на форме и одну кнопку, и вставьте следующий код:
001:
002:
003:
Private Sub Command1_Click()
 Text2.SetFocus
End Sub


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

 


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

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

Наверх

 

 

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

Локалка | Автор: 5acred Phoenix
Добавлено: 13.11.2007 / 18:18 | ответов: 0 | просмотров: 9

Привет всем! Помогите, пожалуйста. Никак не могу подружить Висту и ХР. Ни в какую не хотят друг друга видеть. Как всё-таки всё настроить?

Пробовал и там, и там выбрать получение IP автоматом. На ХР подключение гласило, что оно ограниченное
Пробовал задать IP вручную. Настольному с ХР 192.168.0.1, маска 255.255.255.0, ноуту с Вистой 192.168.0.2. Значки подключения и там и там нормальные. А пинг всё равно не проходит.

Что делать-то..?

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


MessageBoxIndirect | Автор: Arcady_XQST
Добавлено: 12.11.2007 / 18:39 | ответов: 1 | просмотров: 33

Всем привет! У меня вопрос по поводу функции MessageBoxIndirect. Как, используя параметры dwContextHelpId As Long и lpfnMsgBoxCallback As Long (из структуры MSGBOXPARAMS) реализовать вызов справки по нажатии кнопки Справка в окне сообщений?

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


Ответ # 1 | Автор: Алексей
Добавлено:13.11.2007 / 05:30
1.
001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
Private Type HELPINFO
 cbSize As Long
 iContextType As Long
 iCtrlId As Long
 hItemHandle As Long
 dwContextId As Long
 MousePos As POINTAPI
End Type

_______________________
Colorized by: Eros.CodeSyntaxColor Engine

2.
001:
002:
003:
004:
005:
006:
Private Function b(c As Long)
 b = c
End Function

_______________________
Colorized by: Eros.CodeSyntaxColor Engine

3.
001:
002:
003:
004:
005:
Private Sub MbCb(h As HELPINFO)
End Sub

_______________________
Colorized by: Eros.CodeSyntaxColor Engine

4.
001:
002:
003:
004:
005:
Dim m As MSGBOXPARAMS
m.lpfnMsgBoxCallback = b(AddressOf MbCb)

_______________________
Colorized by: Eros.CodeSyntaxColor Engine

и все это должно быть в модуле.

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

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


Help ME | Автор: AmoR
Добавлено: 11.11.2007 / 22:08 | ответов: 0 | просмотров: 29

Прива умным людям!!! У мня проблема : У меня две сетивие карточки. Вопрос как программно (на VB v6.0) опредилить к какой из них подключен кабель и как опредилить статус подключения. если можна функцию, или подскажите как ето можна сделать. Зарание огромное СПС.

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


опять MS WORD | Автор: LIS
Добавлено: 09.11.2007 / 15:56 | ответов: 3 | просмотров: 90

Здрасте,
мож кто знает как подсчитать програмно страницы в ms word

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


Ответ # 1 | Автор: Edlin
Добавлено:12.11.2007 / 09:01
Пусть в переменной doc у вас лежит объект типа Document (открытый документ Microsoft Word, не Application, а Document). Тогда число его страниц определяется так:

001:
002:
003:
Dim pagesCount As Integer = doc.ActiveWindow.Panes(1).Pages.Count

Colorized by: Eros.CodeSyntaxColor Engine

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


Ответ # 2 | Автор: LIS
Добавлено:12.11.2007 / 11:50
Пусть в переменной doc у вас лежит объект типа Document (открытый документ Microsoft Word, не Application, а Document).


а если у меня все настроино так чтобы Application работал.... вот так
001:
002:
003:
004:
005:
006:
Set WorApp = CreateObject("Word.Application")
WorApp.Documents.Open pt
WorApp.Visible = True
WorApp.Documents.Item(1).Bookmarks("List").Range.Text = "ку-ку"

Colorized by: Eros.CodeSyntaxColor Engine


то тогда как определить колличество страниц

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


Ответ # 3 | Автор: Edlin
Добавлено:13.11.2007 / 09:09
001:
002:
003:
Dim pagesCount As Integer = WorApp.Documents.Item(1).ActiveWindow.Panes(1).Pages.Count

Colorized by: Eros.CodeSyntaxColor Engine

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


Отправка на e-mail из VB | Автор: Павел
Добавлено: 08.11.2007 / 16:58 | ответов: 3 | просмотров: 106

Здравствуйте. Скажите, как отправить сообщение на e-mail

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


Ответ # 1 | Автор: Алексей
Добавлено:09.11.2007 / 05:29
Залил несколько примеров в Кодообменник Kbyte.Ru:

Отправка E-Mail средствами Visual Basic 6.0 (пример № 1)


Программная отправка E-Mail средствами Visual Basic 6.0 с использованием Outlook


Программная отправка E-Mail средствами Visual Basic 6.0 с использованием Microsoft Mapi Controls


Отправка E-Mail через Internet Information Services (IIS)


Отправка E-Mail средствами Visual Basic 6.0 с использованием "винсосок"


Отправка E-Mail средствами Visual Basic 6.0 с использованием "винсосок" (простейший пример)



--
С наилучшими пожеланиями,
Немиро Алексей http://aleksey.nemiro.ru/
---
Кодообменник Kbyte.Ru - узнал сам, расскажи другим ;-)

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

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


Ответ # 2 | Автор: Павел
Добавлено:09.11.2007 / 11:49
Ни один из способов не работает. Может это потому, что e-mail на mail.ru?

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


Ответ # 3 | Автор: Алексей
Добавлено:09.11.2007 / 13:12
Ни один из способов не работает. Может это потому, что e-mail на mail.ru?

Примеры с сокетами влюбом случае должны работать. Только что проверил вот этот: http://kbyte.ru/Code/Show.aspx?id=64

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

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


Наверх

 

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

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

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

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

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

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

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

Выбор языка программирования для научных работ (2-я редакция)
Автор: Юдин С. Ю. | добавлено: 15.03.2007 / 02:49 | просмотров: 2790

Идея написания этой статьи возникла после того, как на одном из сайтов по физике http://physics.nad.ru/aniboard/messages/291.html я обнаружил интересный алгоритм моделирования движения тела в поле постоянной напряженности по различным направляющим. Вернее, меня заинтересовал не весь алгоритм, т.к. основа их всех одна (принцип Даламбера, если не считать квазиалгоритма с применением уравнений Лагранжа 2-го рода) и различаются они только способом определения реакций в месте соприкосновения тел. ...

Работаем с MIME
Автор: Немиро Алексей | добавлено: 29.11.2006 / 14:46 | просмотров: 2614

Не так давно мне пришлось немного поработать MIME (Multipurpose Internet Mail Extension) - это стандарт почтовых сообщений, в РуНете (Russian Internet) я не нашел нормального описания спецификации MIME, и посему решил написать небольшую статейку на эту тему. В данной статье вы узнаете об основных особенностях и стандартах MIME, а также научитесь «читать» MIME с использованием синтаксиса языка Visual Basic .NET 2005.

 

Статьи на Kbyte.Ru

Наверх

 

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

Как изменить раскладку клавиатуры (Ru-En-Du ...)?
Дата добавления: 16.08.2006 / 19:44 | просмотров: 916 | платформа: VB

Как преобразовать цвет в Web-стандарт?
Дата добавления: 24.03.2007 / 11:37 | просмотров: 492 | платформа: VB .NET

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

Анализ IP-адреса
Дата добавления: 24.03.2007 / 10:56 | просмотров: 678 | платформа: RegEx

Как поменять стиль у всех контролов на форме (Form)?
Дата добавления: 24.03.2007 / 11:59 | просмотров: 532 | платформа: VB .NET

Как очистить корзину?
Дата добавления: 24.03.2007 / 11:35 | просмотров: 588 | платформа: VB .NET

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

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

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

Как показать первую копию программы, если запускается вторая?
Дата добавления: 04.08.2006 / 09:06 | просмотров: 824 | платформа: VB

 

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

Наверх

 

Юмор на Kbyte.Ru

Опоздавший Вовочка влетает в класс. Не поздоровался, шапки не снял.
Учительница строго:
- Вовочка! Немедленно выйди и войди снова!!!
Вовочка:
- Во черт!.. Прям "виндоуз" какой-то...

 

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

 

Компьютерный магазин. Заходят мужчина и женщина.
Женщина: Нам надо, что бы телефон к компьютеру подключался.
Я: У вас Блютуз или ИрДа?
Женщина: Вы с кем разговариваете?
Я в замешательстве, не знаю что ответить.
Женщина: Нам провод нужен, что бы данные на компьютер можно было передать.
Я: Мини USB?
Женщина: Мы не знаем что это такое.
Я: Сейчас вам покажу.
Достаю кабель, показываю. Они достают телефон, смотрим, разъема для мини USB нет.
Я: Вы в мануале посмотрите у телефона Блютуз или ИрДа есть.
Женщина: Вы с кем разговариваете?
Я: Ну, как с кем, с вами.
Женщина: Что такое мануал?
Я: Руководство пользователя.
Женщина: У нас, его нет.
Я: Зайдите в магазин, где радиотелефоны продаются, спросите, есть ли у этой модели Блютуз или ИрДа.
Покупатели в недоумении уходят.

 

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

 

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

 

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

 

К Билл Гейтсу подходит сын и говорит:
- Пап, покажи, что такое многозадачность!
- Погоди, сынок, сейчас дискету доформатирую…

 

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

 

Свечи с ментолом!
Свежесть не только дыхания...

 

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

 

Приходит учительница Вовочки к нему домой и жалуется папе, ваш сын нарисовал на моём столе муху я её била, била даже руку сломала. Это ещё ничего, отвечает папа он в ванне нарисовал крокодила, я так испугался, что даже из нарисованной двери выбежал.

 

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

 

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

 

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

 

В отделе кадров:
- Вы что-то выглядите недостаточно подвижно для своего возраста.
- А вам кто нужен: программист или обезьяна?

 

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

 

- Я у вас компьютер купил. Так он сдох.
- Гарантия какая?
- Пожизненная.
- Раз сдох - гарантия кончилась.

Прислал MAGICIAN

 

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

 

Учительница спрашивает: "Дети кем вы хотите стать"
- Машенька ты кем хочешь стать?
- Я хочу стать доктором.
- А почему?
- Мне нравиться лечить людей.
- Молодец Машенька
- Петечка, а кем ты хочешь стать?
-Я хочу стать водителем
-А почему?
-Мне нравится нюхать запах бензина.
-Тоже хорошо Петенька.
-Вовочка, а ты кем хочешь стать?
-А я хочу стать врачом-психотерапевтом
-Почему?
-Подойдем Марья Ивановна к окну, видите стоят 3 женщины, одна из них сосёт мороженое, вторая лижет, а третья кусает. Какая из них замужем?
- Ну та наверное которая сосёт
- Нет Марья Ивановна, та замужем у которой кольцо на пальце, а таких как вы мы будем лечить.

 

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

 

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

Наверх


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

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

Copyright (c) Nemiro AS, 2005-2007


В избранное