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

Visual Basic: новости сайтов, советы, примеры кодов.

Подписаться Бесплатная «Серебряная» новостная рассылка . Подписчиков 4.065 RSS
←   Июль 2004   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31


За последние 60 дней ни разу не выходила


Сайт рассылки: http://vbnet.ru
Открыта: 31-07-2001

Автор
Павел Сурменок

Статистика

4.065 подписчиков
0 за неделю
←   Все выпуски   →

Visual Basic: новости сайтов, советы, примеры кодов. Выпуск 278.


Информационный Канал Subscribe.Ru

Visual Basic: новости сайтов, советы, примеры кодов.
Выпуск 278.

VBNet VBMania
Ссылки:

  • Улицы VB
  • Использование VB
  • Азбука VB
  • Улицы VB
  • Кирпичики VB
  • CообЧа VB
  • VB по русски
  • MDesign
  • IgorykSoft
  • DanSoft
  • Хрестоматия VB
    		• Господа!!! читайте MSDN!!!

    Несколько слов от автора:

       Ох.. Нелегко же догоняется график!
    Читайте!


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



    Новости сайта VBNet

    Дата: 02.07.2004 06:14 | Раздел: Статьи по VB | Автор: Бакланов Сергей

    Средства безопасности ASP.NET. Часть 3 – Криптография - Основная задача криптографии – сделать конечные данные непонятными для третьих лиц. Первые и простейшие методы шифрования начали встречаться ещё в эпоху античности: существовал так называемый метод Цезаря, который заключался в смещении каждого символа текста на три позиции вперёд по алфавиту. Но если две с лишним тысячи лет назад криптография имела лишь практическое представление, то сегодня существует целая наука криптология, занимающаяся вопросами шифрования и дешифрования и имеющая прочную теоретическую базу.

    Дата: 29.06.2004 15:52 | Раздел: Примеры кода | Автор: sne

    ApiTreeView - Реализация стандартного TreeView контрола через WinApi. Все выполнено в виде всего-лишь одного класса.

    Дата: 29.06.2004 15:49 | Раздел: Примеры кода | Автор: Дорохов Кирилл

    Drink - Программа для любителей выпить. Программа расчитывает оптимальное кол-во выпивки на проведения любого мероприятия.

    Дата: 29.06.2004 15:47 | Раздел: ActiveX контролы | Автор: Кудрявцев Вячеслав

    DirMap.dll - DirMap.dll педназначена для сканирования выбранной директории с включением\исключением поддиректорий. Возможно получение данных о файлах: полный путь (с именем файла), название файла, размер, атрибуты, дата создания, а также количество файлов в сканируемых директориях, количество и имена поддиректорий. Все данные выдаются в массив, а потом используйте его как хотите :)

    Дата: 29.06.2004 15:43 | Раздел: Примеры кода | Автор: Polkovnikov Philip

    ProcessSimulator - Иногда хочется сделать вид, что у вас идёт какой-то процесс. Тогда этот проэкт для вас


    Последние 20 тем форума на VBNet.Ru:

    14:07 / 2 июл.  C# | Хитов: 5 |  Ответов: 0
    13:56 / 2 июл.  Интерфейс Excel Application | Хитов: 4 |  Ответов: 0
    11:56 / 2 июл.  Новая ошибка | Хитов: 7 |  Ответов: 0
    10:57 / 2 июл.  Немогу зайти на форум | Хитов: 3 |  Ответов: 0
    10:37 / 2 июл.  News | Хитов: 9 |  Ответов: 1
    10:36 / 2 июл.  Поиск! | Хитов: 7 |  Ответов: 1
    09:40 / 2 июл.  Проверка на то что дин. массив удален | Хитов: 7 |  Ответов: 0
    03:33 / 2 июл.  Сортировка тем | Хитов: 7 |  Ответов: 1
    03:27 / 2 июл.  Зачем делать двойную работу, все уже изобрели до в | Хитов: 14 |  Ответов: 1
    19:54 / 1 июл.  CD-TEXT | Хитов: 19 |  Ответов: 0
    15:44 / 1 июл.  Настройки VB6 - Вопрос профессионалам!!! | Хитов: 56 |  Ответов: 5
    15:40 / 1 июл.  Печать на рулоне | Хитов: 15 |  Ответов: 0
    15:24 / 1 июл.  nano forma dlja MS Outlook, $$$ | Хитов: 8 |  Ответов: 0
    15:11 / 1 июл.  VBPowerPack Rus ! | Хитов: 22 |  Ответов: 0
    14:56 / 1 июл.  Worksheets.Add Name = NOW не работает | Хитов: 13 |  Ответов: 1
    13:53 / 1 июл.  Иконка | Хитов: 32 |  Ответов: 4
    13:40 / 1 июл.  ShareWare в РФ? | Хитов: 31 |  Ответов: 6
    13:13 / 1 июл.  Total Сommander против FAR 'a... Кто лутше? | Хитов: 24 |  Ответов: 2
    12:55 / 1 июл.  REAL Basic Keygen | Хитов: 2 |  Ответов: 0
    11:49 / 1 июл.  Автоматическое сохранение письма Microsoft Outlook | Хитов: 9 |  Ответов: 0


    Последние поступления в Библиотеку кодов:



    наверх

    Новости сайта MSDN



    наверх

    Новости сайта GotdotNet



    Новые статьи:



    наверх

    Новости сайта dotSite

    Новые статьи:

    • Обработка ошибок в ASP.NET приложении.
      В данной статье рассказывается о нескольких основных способах обработки ошибок в ASP.NET приложениях.


    Новые примеры:



    наверх

    Один момент из жизни форума: События

    Адерес темы: http://vbnet.ru/forum/show.aspx?id=47337

    Вопрос:
    Автор вопроса: freeloader

       Как в PowerBasic органиовать события?
    Как, например определить, что над кнопкой находиться мышь?


    Ответы:

    Автор: sne
       При создании контрола указывается callBack функция, принипающая все сообщения от контрола, вот в ней-то и следует фильтровать WM_MOUSEMOVE... Как отфильтровываем, сразу же вызываем функцию/процедуру, отвечающую за нужное действие...

    Автор: cresta
       Если стандартная кнопка, то WM_MOUSEMOVE ей в callback не посылается. Вот все доступные сообщения:
    %BN_CLICKED, %BN_DISABLE, %BN_KILLFOCUS, %BN_SETFOCUS. И всё.
    Для этого есть API - ф-ция TrackMouseEvent. Она посылает в твой callback сообщения WM_MOUSELEAVE и WM_MOUSEHOVER. Ей нужно передать при вызове заполненную структуру, вернее адрес структуры TRACKMOUSEEVENTTYPE.

    Автор: Chill
       http://rsdn.ru/article/qna/ui/mouseout.xml
    Вот тут про то, о чем говорил cresta, только примеры на си... Но там АПИ, т.ч., думаю, разберешься...

    Автор: @CyRax PTR
        Можно попробовать не в PB-шном, а в системном CallBack ловить WM_MOUSEMOVE. Как на VB. Через SetWindowLong GWL_WNDPROC и CallWindowProc. Чтобы получить hWnd кнопки используй Control Handle.



    наверх

    Вопрос/Ответ

    Здесь Вы можете задать вопрос, или ответить на уже имеющиеся вопросы.

    Вопросы:

    Автор вопроса: Михаил Антонов

    Ответ ожидается по этому адресу

       Как перекодировать ДОС/Вин (с помощью OEMtoChar/ChartoOEM) - знаю. А есть ли библиотека, с помощью которой можно перекодировать из других кодировок (прежде всего КОИ)?

    Автор вопроса: Boban

    Ответ ожидается по этому адресу

       Как "связать" две переменные, чтобы когда меняешь значение одной, менялось и значение другой (допустим по формуле)?
    Или "связать" переменную со значением свойства эл-та?

    Автор вопроса: K.L.O.N

    Ответ ожидается по этому адресу

       Как работа с почтой? Напишите пожалуйста подробно!

    Автор вопроса: Andrey

    Ответ ожидается по этому адресу

       Как DirectX 8 заставить использовать видеоускоритель типа Voodoo?

    Автор вопроса: Perec

    Ответ ожидается по этому адресу

       Как убрать рамку у формы после перемешения?

    Автор вопроса: Oggy

    Ответ ожидается по этому адресу

       Как указывать курсору мышки её местонахождение (не на форме, а
    допустим на рабочем столе или папке)?

    Автор вопроса: Smoke

    Ответ ожидается по этому адресу

       Как узнать в какой операционке находиться моя программа, и какой системный диск?



    Ответы:

    Вопрос:

       Как узнать, какой из Columbs'ов в ListView нажат, или как упорядочивать значения в нажатом столбце?

    Ответ:

    Автор ответа: Хатламаджиян Виталий Арутюнович

    'ListView1.Sorted=True - разрешение сортировки
    'ListView1.SortOrder=0 - lvwAscending - по возрастанию
    'ListView1.SortOrder=1 - lvwDescending - по убыванию
    Private Sub ListView1_ColumnClick(ByVal ColumnHeader As MSComctlLib.ColumnHeader)
    ListView1.SortKey = ColumnHeader.Index - 1
    End Sub

    Вопрос:

       Я работаю над интерфейсом БД, содержащей около полумиллиона записей и содержащей 2 таблицы (*.dbf).
    Выборка по некоторым критериям занимает достаточное время. Хотелось бы чтобы на время выборки включался ProgressBar, который или реально отслеживал бы выборку, или, хотя-бы, эмулировал в цикле заполнение и сброс ProgressBar, что-бы пользователь знал, что программа не висит. Я видел такое в некоторых программах.
    Вот пример кода:

    SQL1 = "SELECT . . . FROM . . . INNER JOIN STREETS ON . . . WHERE " & crit
    ' Где crit - критерий поиска
    Set rec = db.OpenRecordset(SQL1)

    Form1.Show 'Вызов формы с предупреждением "Ждите, идет поиск"
    Form3.Show vbModal 'Вызов формы 3 показа результата поиска
    Unload Form1

    Ответ:

    Автор ответа: Хатламаджиян Виталий Арутюнович

    Подсчитай среднее время выполнения напроса. При первом после загрузки программы запросе используй это значение, а так же запомни время начала и время завершения запроса. Это будет новое значение времени.
    Можешь это время хранить где-нибудь в файле или реестре и обновлять его после каждого запроса.
      
    Маскимальное значение шкалы - приблизительное время
    Текущее значение шкалы - количество пройденного времени с начала подачи запроса.
      
    Не забудь обработать ошибку, когда значение текущего времени > предыд. макс. времени (>100%).

    Вопрос:

       Для проверки коннекта с инетом я использую следующий код:

    'В модуль
    Private Declare Function InternetCheckConnection Lib "wininet.dll" Alias "InternetCheckConnectionA" (ByVal lpszUrl As String, ByVal dwFlags As Long, ByVal dwReserved As Long) As Long
    Private Const FLAG_ICC_FORCE_CONNECTION As Long = &H1
    Public Function GetInternetConnectStatus(ByRef strTarget As String) As Boolean
        On Error Resume Next
        If InternetCheckConnection(strTarget, FLAG_ICC_FORCE_CONNECTION, 0&) = 0 Then Exit Function
        GetInternetConnectStatus = True
    End Function

    'В форму
    Private Sub Command1_Click()
         If GetInternetConnectStatus("http://vbnet.ru/") Then Caption = "Connect OK" Else Caption = "Connect Error"
    End Sub

    А как пропинговать компьютер в локальной сети? Изменяю адрес "http://vbnet.ru/" на "c:\" чтобы пропинговать свой комп, Windows выдает ошибку и закрывает VB... В локалке не проверял, но предпологаю, что эффект будет тот же...

    Ответ:

    Автор ответа: Хатламаджиян Виталий Арутюнович

    Ошибка заключается в том, что необходимо указывать имя хоста, а не диск.
    Короче, укажи имя компа. Сам ещё не пробовал, но думаю ошибка этом.

    Вопрос:

       Помогите… В контекстном меню к файлам с расширением .exe я добавил нужный пункт. И теперь при его выборе открывается моя прога. А как теперь быть, чтобы при открытии моей проги (например в текстовом поле) возвращался путь к .exe файлу, в контекстном меню которого был произведен щелчок на соответствующем пункте.

    Ответ:

    Автор ответа: Хатламаджиян Виталий Арутюнович

    Если я правильно понял, то попробуй поискать его в переменной Command или Command$ (это одно и то же) - это командная строка. В VB командная строка состоит из одной строки (включая разделители, не как в C - массивом).

    Вопрос:

       Есть 2 проекта. Нужно сделать так, чтоб был один запускающий файл (форма с двумя кнопками для вызова каждого проекта), но оба этих проекта были каждый в своём файле, но эти файлы небыли запускающими (ЕХЕ). Скажите хотя бы, как это делается теоретически?

    Ответ:

    Автор ответа: darkwarrior

    Теоретически... можно!, если описать другие проекты в ДЛЛ. В длле рисуешь процедуру PopUp() и все. Вызываешь LoadLibrary() c разными названиями длл и (лучше наверное в отдельной функе типа ExecForm(HMODULE h) делаешь GetProcAddress() для функции PopUp() и выполняешь ее.


    Можете заполнить эту форму, либо отослать вопрос СЮДА

    Форма для добавления нового вопроса в этот раздел. Информация отсылается по E-mail владельцу сайта.
    Текст сообщения:
    Ваше имя
    E-mail для ответа

    наверх

    Выпуск подготовили:

    		 Сурменок Павел
    http://subscribe.ru/
    E-mail: ask@subscribe.ru     		Отписаться
    В избранное