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

VB.NET-World

  Все выпуски  

Мир программирования на Visual BASIC 5.0 и HTML. Выпуск 35


Служба Рассылок Subscribe.Ru
Мир программирования на Visual BASIC и HTML
Информация
  Архив рассылки
  Рассылка
  гостевая книга

Вопросы
  Автору
  По VB
  По HTML

Спонсоры
  Городской кот
  Subscribe.Ru
  Majordomo.Ru

Ссылки
  VB Streets
  Visual BASIC
  VB: Step by Step
  SnoozeX Design
  СообЧа
  СообЧа-VB
  Голосования
  VB Студия
  
Школа - сайт со шпорами, сочинени- ями, рефератами только для учеников!


VB Форумы
WEB:
  VBS Форум
  Ru.Visual.Basic
Mail:
  VBStreets
  СообЧа: VB
подписка - пустое письмо в VB группу

Доска почета
  Sergey VIMBERG
  Олег
  Oleg Palayda
  BSP
  Verter
  Николай
  hackcode
  Дмитрий Данелия
  Виталий Иванов
  Raven
  Сурменок Павел
  Шаронов Игорь
  Максим
  Глеб
  Daniel
  Foxtrot
  Magistr

Кнопки

Рассылка 'Мир программирования на Visual BASIC и HTML.'

мы в режиме:

SUPERTOP

SnoozeX Design

Опрос
Эта рассылка:

Лучшая в инете!
Очень хорошая
Хорошая
Неплохая
Отстой


Результаты

Друзья

Все для вебмастеров. Куча картинок, скриптов, доков
Ассемблер? Это просто! Учимся программировать
Дизайн и программирование
Visual Basic: новости сайтов, советы, примеры кодов
Dummpy Daily eTips


Несколько слов от автора: Здорова народ! Вот сегодня накляпал отгромный выпуск. Еще у нас 2 новости - хорошая и плохая. Начнем с плохой: от нас уходит Даниэль, жаль товарища, но он всегда останется на доске почета! А хорошая к нам присоединился Магистр - он будет вести раздел по ПЕРЛ. Вот. Читайте и умнейте! Еще открылать гостевая книга! (смотри ссылку слева) И просьба заново проголосовать за рассылку в опросе!
Ваши пожелания:


E-Mail для ответа:

РАССЫЛКА: Открылся сайт рассылки по адресу http://vb-html.da.ru На сайте вы найдете весь архив рассылки, проекты и многое другое.
ПРИМЕЧАНИЕ: Выпуски данной рассылки начиная с первого вы сможете прочитать на http://subscribe.ru/archive/comp.design.snoozex/    @LEXis

2.10.2001 Выпуск N35 Обзор ведет @LEXis

 Сегодня в выпуске:

# E-Mail группа "СообЧа-Visual BASIC":
  • О группе
# Помощь по HTML - ведущий Максим:
  • Фильтры Internet Explorer
# Полезные коды Visual BASIC:
  • Создаем счетчик
  • Вертикальный label
  • Поиск файла
# Уроки PERL - ведущий Magistr:
  • Вступление
# Практикум на примерах:
  • Опубликование работ в Интернет. Программистам... (Часть 5)
# В разделе "вопросы/ответы":
  • Ответы на вопросы читателей
# Рубрика "Объявления"


 E-Mail группа "СообЧа-Visual BASIC"
  • О группе

Группа VB. Заходите в гости. Здесь вы приобретете практические навыки по программированию на Visual Basic. Как вы этого сможете достигнуть? Путем написания собственной серьезной программы. Чем обычно занимается рядовой чайник-программист? Ну, пишет там всякие приколы на VB... Ну, ма-а-ленькую полезную программку наваляет. А как получить навыки в создании серьезных программ? Правильно, путем создания серьезных программ. ;) Но в одиночку вам с этим не справиться. Вот для этого в проекте СообЧа существует группа программистов-чайников, которые занимаются разработкой серьезного софта на VB. Суть состоит в том, что вам совсем необязательно знать все в Visual Basicе. Вам достаточно быть рядовым чайником и немного знать операторы VB. Остальному научимся вместе. На данный момент в группе разрабатывается почтовая программа под рабочим названием "Сообчайлер". Она будет уметь все, что умеет популярная программа The Bat и даже намного больше. Есть сборник оригинальных идей, выдвинутых членами нашей группы, которые мы постараемся реализовать все вместе. Проект разбивается на отдельные простые задачи. Такие как: проверка орфографии, форма для написания нового письма, главное окно... и т.п. Каждую часть делает отдельный человек. Затем он высылает сделанный модуль в группу, и остальные просто присоединяют его к базовому проекту. Вам совсем не обязательно четко представлять, как это сделать. Достаточно просто начать и столкнуться с какой-нибудь проблемой. Пусть это будет даже проблема типа "А как добавить новый модуль к проекту?". Все. Наткнулись... ;) Дальше действуем по одной схеме - пишем письмо с описанием проблемы в группу и мы все вместе разбираемся в проблеме. Таким образом, все остальные получат ЗНАНИЯ и некоторые навыки в решении создавшихся проблем. Не забывайте - все мы чайники. Не стоит бояться задать вопрос. Задавайте - а мы вместе попытаемся найти ответ.
Подписаться в группу (пустое письмо)

 Помощь по HTML - ведущий Максим
  • Фильтры Internet Explorer

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

Так что же такое фильтр ? Фильтр - это эффект для изменения внешнего вида текста или
графики на странице. Для применения фильтра используется свойство filter каскадный листов стилей, тоесть CSS. Отображаются фильтры ТОЛЬКО в броузерах Internet Explorer не ниже 4-й версии.

Синтаксис фильтра таков:
"filter:имя_фильтра(параметр1=значение, параметр2=значение, ... )"
Для некоторых фильтров параметры могут вообще отсутствовать.

Также фильтры делятся на два типа: статические и динамические. Со статическими всё ясно - меняется внешний вид объекта, а сам он остаётся неподвижным. Динамические фильтры позволяют изменять графический элемент с задаваемой пользователем скоростью переключения кадров (ну, мультик получается... :)) Статических фильтров существует 14, динамических - 23.

Перейдём к практике. Возьмём картинку (img.gif) и применим к ней фильтр прозрачности:
<IMG SRC=img.gif style=""filter:alpha(opacity=50)">" - имеем ту же картинку, но полупрозрачную.

Вот эффект сложнее:
<IMG SRC=img.gif style=""filter:wave(freq=5," strength=4, lightstrength=25)"> - в итоге наша картинка развивается стягом, в котором freq отвечает за количество всплесков, strength - за размер каждого всплеска в пикселях и lightstrength - за яркость света.

Всё очень просто, но мы на этом не остановимся. Оказывается, что визуальные эффекты фильтров поддерживаются языками сценариев. Доступ к фильтрам реализуется с помощью объектного свойства filters и атрибута ID графического элемента.

Вот как с этим справляется JAVASCRIPT:
<SCRIPT LANGUAGE="JAVASCRIPT">
FUNCTION Blur(inc){
Pic.filters.blur.strength+=inc;}
</script>
...
<IMG ID=Pic SRC=img.gif
style=""filter:blur(strength=10)""
OnMouseOver="javascript:Blur(20)"
OnMouseOut="javascript:Blur(-20)">
В этом примере функция Blur() обращается к фильтру blur объекта Pic и изменяет его параметр strength при наведении курсора мышки.

Подобные вещи мы можем делать и с помощью VBScript:
<SCRIPT LANGUAGE="VBSCRIPT">
Pic.style.filter = "flipv"
</script>
...
<IMG ID=Pic SRC=img.gif>
Здесь мы использовали фильтр fliph, который переворачивает изображение вокруг вертикальной оси.

В следующий раз мы попробуем разобраться с динамическими фильтрами, использование которых куда более сложнее.

И напоследок прошу вас не терять чувства меры при использовании фильтров, т.к. от перенасыщенности ими или от использования слишком вызывающих фильтров сайт теряет всякую эстэтическую ценность.

P.S. Ниже приведена таблица всех статических фильтров с их параметрами и описанием, которую я отрыл в справочнике.

Фильтр Параметры Описание
alpha opacity, finish opacity, style, startx, starty, finishx, finishy Задаёт постоянный уровень прозрачности
blur add, direction, strength Создаёт эффект движения
chroma color Создаёт одноцветный транспарант
dropshadow color, offx, offy, positive Обводит силуэт объекта
fliph - - - Делает горизонтальное отражение картинки
flipv - - - Делает вертикальное отражение картинки
glow color, strength Создаёт эффект "тления"
grayscale - - - Преобразует объект в черно-белый
invert - - - Инвертирует цвета, оттенки и яркость
light - - - Освещает объект от источника
mask color Делает из объекта маску транспарант
shadow color, direction Создаёт силуэт объекта отдельно от объекта (тень)
wave add, freq, lightstrength, phase, strength Создаёт волнистое искажение объекта
xray - - - Показывает только контур объекта

 Полезные коды Visual BASIC
  • Создаем счетчик
Option Explicit

Private Sub Command1_Click()
    Dim cnt&
    For cnt& = 1 To 25000
        Label1.Caption = cnt&
        Label1.Refresh
    Next cnt&
End Sub

  • Вертикальный label
Private Function Vertical_Horizontal(ByVal nStr As String) As String
Dim MyStr As String, i As Integer
Static Vert As Boolean
If Vert = False Then
For i = 1 To Len(nStr)
If i < Len(nStr) Then
MyStr = MyStr + Mid$(nStr, i, 1) & vbCrLf
Else
MyStr = MyStr + Mid$(nStr, i, 1)
End If
Next
Vertical_Horizontal = MyStr
Vert = True
Else
For i = 1 To Len(nStr) Step 3
MyStr = MyStr + Mid$(nStr, i, 1)
Next
Vertical_Horizontal = MyStr
Vert = False
End If
End Function

Private Sub Command1_Click()
Label1.AutoSize = True
Label1.Caption = Vertical_Horizontal(Label1.Caption)
End Sub

  • Поиск файла
Private Sub SearchFiles(strPath As String)
'поиск файлов на локальных дисках.
'параметры - путь и маска

'===================API===================
Private Const MAX_PATH = 260 'максимальная длина пути

Private Type FILETIME
dwLowDateTime As Long
dwHighDateTime As Long
End Type
Private Type WIN32_FIND_DATA
dwFileAttributes As Long
ftCreationTime As FILETIME
ftLastAccessTime As FILETIME
ftLastWriteTime As FILETIME
nFileSizeHigh As Long
nFileSizeLow As Long
dwReserved0 As Long
dwReserved1 As Long
cFileName As String * MAX_PATH
cAlternate As String * 14
End Type
Private Const FILE_ATTRIBUTE_READONLY = &H1
Private Const FILE_ATTRIBUTE_HIDDEN = &H2
Private Const FILE_ATTRIBUTE_SYSTEM = &H4
Private Const FILE_ATTRIBUTE_DIRECTORY = &H10
Private Const FILE_ATTRIBUTE_ARCHIVE = &H20
Private Const FILE_ATTRIBUTE_NORMAL = &H80
Private Const FILE_ATTRIBUTE_TEMPORARY = &H100
Private Const FILE_ATTRIBUTE_COMPRESSED = &H800

Private Const INVALID_HANDLE_VALUE = -1

Private Declare Function FindNextFile Lib "kernel32" Alias _
_ "FindNextFileA" (ByVal hFindFile As Long, lpFindFileData _
_ As WIN32_FIND_DATA) As Long
Private Declare Function FindFirstFile Lib "kernel32" Alias _
_ "FindFirstFileA" (ByVal lpFileName As String, lpFindFileData _
_ As WIN32_FIND_DATA) As
Long
'===========================================
sub ...

Dim fil As String
Dim hFind As Long
Dim findData() As WIN32_FIND_DATA
ReDim findData(0)
'Ищем первый файл
RaiseEvent NextDir(strPath)
DoEvents
hFind = FindFirstFile(strPath + "\" + "*.*", findData(0))
'информация помещается в findData
If hFind <> INVALID_HANDLE_VALUE Then 'если чего-то найдено

Do
If mvarStopFind Then Exit Sub
fil = Left(findData(0).cFileName, InStr(1, findData(0).cFileName, Chr(0)) - 1)
 'Вытаскиваем имя из длинной строки с нулевыми
символами
DoEvents
If fil <> "." And fil <> ".." Then 'если это не переход к предыдущей дир.
If findData(0).dwFileAttributes = VbFileAttribute.vbDirectory Then
'если это директория
SearchFiles strPath + "\" + fil 'ищем в ней
RaiseEvent NextDir(strPath)
Else 'иначе

'........... чего-с найденным файлом делаем.
End If

End If
ReDim findData(0)
Loop While FindNextFile(hFind, findData(0))
'продолжать, пока находятся новые файлы
End If
End Sub

 Уроки PERL - ведущий Magistr
  • Вступление
Здравствуйте!
Сегодня будет вводный урок. Я дам вам линки для закачки нужного ПО, а также объясню, что же такое Perl.

Что такое Perl?

PERL(Practical Extraction and Report Language) был создан программистом Ларри Уолом, когда тот пытался формировать отчеты из иерархии файлов системы оповещения об ошибках.

Зачем он нужен?

Для выполнения рутинных задач, которые очень трудно реальзовать на С или другом используемом языке на ОС Unix.
Кроме этого есть подраздел Perl - CGI - язык программирования, используемый в Сети.
Perl - язык для ленивых, как выразился Уолл. Им можно создавать очень много и очень быстро.

Где взять?

Компилятор Perl лежит на нижеуказанном линке. Но если вы не потянете качать 9 мегабайт, то тогда можете забыть о Perl

Здесь лежит Perl
Ничего не изменяйте в настройках установки! В итоге должно установится куда то на C, но файл perl.exe обязательно должен быть в корне диска.

Но весьма затруднительно писать программы, если нет толкового редактора, способного в любой момент скомпилировать ваш файл и запустить его. Или вставить какую либо лексему (элемент программы, типа Print).

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

Здесь лежит PerlLive (около 3 мегабайт)

Ну вот и все. Надеюсь, заинтересовавшиеся закачают нужное ПО до следующего выпуска. В нем будем делать программу, а также познакомимся поближе с PerlLive.

Искренне ваш,
Алекс aka Magistr

 Практикум на примерах
  • Опубликование работ в Интернет. Программистам... (Часть 5)

Составление краткого описания программы и первые действия

Это, пожалуй, два предложения, на которые будет опираться Ваша рекламная акция в самом начале "сетевой деятельности". На что лучше ставить акценты:
1. Первым должно быть одно из слов: "новая", "современная", "революционная", "одна из лучших программ этого года"... Но данный пункт можно и опустить, так как представьте себе каталог из 500 программ, каждая из которых "новая" или "современная".
2. Размер программы, выраженный словами: "небольшая", "мощная", "сверхмощная". Никаких слов типа "объемная", "20-мегабайтная" и т.п. То есть меньше конкретики.
3. Имя разработчика (если оно хоть где-то раскручено, то должно идти на первом плане).
4. Сфера деятельности программы. Лучше использовать выражения: "для улучшения работы с...", "для более удобной работы с...", "позволяющая расширить возможности работы с..." и так далее.
5. Отличительные характеристики продукта. Никаких описаний типа: "программа работает с текстом"! Нужно больше фурора, скандала. Иногда частности лучше работают:) Особенно если это отличительные характеристики продукта.
Приведем пример:
"Программа "ККК".
Небольшая утилита, позволяющая расширить возможности воспроизведения аудиофайлов, форматов МР3, MASF, VQF. В программу встроены модули спектроаналайзинга, предоставлены возможности наложения эффектов surround, enchancer и т.д."
Этой информации достаточно для того, чтобы пользователь скачал программу или задумался над тем, нужна ли она ему. Самыми важными критериями для него будут являться цена и отличительные характеристики продукта.
Итак, прошло немного времени, программа более-менее раскручена. Теперь можно данные предложения заменить на следующие:
"Программа "ККК".
Новая версия популярной программы от разработчика "ККК корп.", предоставляющей новые возможности воспроизведения аудиофайлов форматов МР3, MASF, VQF. В версии хх.02 добавлена возможность воспроизведения WAVE, улучшен интерфейс спектроанализатора и добавлен графический эквалайзер."
Для тех, кто с программой не знаком, в данном описании есть информация о принадлежности продукта. Но в данном случае для них важными критериями станут: имя разработчика, популярность программы, дополнительные возможности новой версии. Цена отошла на второй план. При этом заметьте, что новое расширение файлов я поставил не в список, где они перечисляются первый раз, а вынес в отличительные характеристики новой версии.
И самый последний виток:
"Программа "ККК".
Одна из самых популярных программ этого года, позволяющая воспроизводить аудиофайлы различных форматов с наложением эффектов".
Итак, сейчас нужно немного сказать о сроках. Если под каждое описание Вы подготовите новые версии, в чем определенно может помочь "обратная связь", созданная на собственном сайте, то продукт до третьего уровня можно раскрутить за год. Потом у Вас скорее всего возникнут проблемы, схожие с теми, с которыми столкнулся и Bram Bos, - пиратство, crack'и и т.п.

 Вопросы / Ответы
  • Отправитель вопроса Диана
    Как сделать, чтобы каждая ячейка в таблице имела различный фон? Какую программу удобно использовать, чтобы создать фотоальбом, где фотографии будут в ячейках и желательно одного размера. Может быть мои вопросы очень глупые, извините. Мне кажется что в вашей рассылки, я видела рекомендации, по исполнению названия (выпуклого, используя текстуры), используя по-моему Photo Shop.Если возможно, укажите мне пожалуйста, где я могу найти информацию об этом.
  • Отправитель вопроса Максим
    U menja vopros po VB na kotorij ja negde nemogu najti otvet izza ego specefichnosti. Delo v tom chto ja iz Latvii i u menja voznikla sledujushaja problema: est' 2 textboxa v odnom iz nih text na latishskom jazike. tak vot esli etot text prisvoit' kakoj nit' peremennoj a potom znachenie peremennoj prisvoit' textbox2.text to vmesto latishskih simvolov naprimer "u" poluchaetsja "?". U oboih textboxov stoit pravilnij font name potomu chto esli pisat' prjamo v textboxe "u" to vsjo ok. Bolee togo esli delat' textbox2.text="u" to tozhe vsjo ok. Est' li kakie nit' idei na etot shot ?
  • Отправитель вопроса Андрей
    Есть таблица Access:
    1 поле - дата
    2 поле - текст
    3 поле - число
    Как сделать запрос из этой таблицы, в котором будут выбираться даты и числа, но даты группировать (групповые операции) по месяцам. И то же, но по декадам и кварталам.
 Объявления
  • Требуются люди
    Хочу напомнить, что еще пусты многие вакансии рассылки:
    - Рубрика "Практикум на примерах"
    Также можно просто присылать коды.

Код моей кнопки:

<!-- SnoozeX Design "PLAY" -->
<a href="http://snoozex.boom.ru" TARGET="_blank"><BR><IMG SRC="http://snoozex.boom.ru/new.gif" WIDTH=88 HEIGHT=31 BORDER=1 ALT="SnoozeX Design"></a>
<!-- SnoozeX Design "END" -->

Выпуск подготовили:                    
@LEXis
и еще наша команда!
@LEXis ICQ uin : 14912636
Подписаться на рассылку Кувалина Алексея
Мир программирования на Visual BASIC и HTML
© 2000 - 2001 @LEXis & Design by SnoozeX Design
Рассылка является составной частью проекта "СообЧа - СООБщество ЧАйников"
  • Сайт СообЧа: http://www.soobcha.ru/
  • Сайт группы по VB: http://soobcha-vb.narod.ru/
  • Сайт рассылки: http://soobcha-vb.narod.ru/alex/
  • Подписаться на сообщество
    © 2000 - 2001 СообЧа (СООБщество ЧАйников)
    Спасибо за внимание. Ваш @LEXis


    http://subscribe.ru/
    E-mail: ask@subscribe.ru
    Отписаться
    Убрать рекламу
    Рейтингуется SpyLog

    В избранное