ЧАТ! СМАЙЛИКИ!

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Kiryusha
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 216
Зарегистрирован: 30.08.2005 (Вт) 10:56
Откуда: УР, Ижевск

Сообщение Kiryusha » 23.09.2005 (Пт) 15:27

Если я конечно всё прально понял, то спасибо. Так а насчёт последнего вопроса:
1) Сохранять всё на диске, и хранить файл пусть даже INI где бы содержалась информация типа
Код: Выделить всё
[USERS]
COUNT=1
[USER 1]
NAME=XXX
NIK=XXX
BIRTHDAY=XX.XX.XXXX
FACE=D:\FACES\USER 1.JPG


2) Не знаю почему ты так против ActiveX-ов можешь просто создать общий ActiveX, который бы хранил в себе все аватары.
(ПЕРВЫЙ СПОСОБ МНЕ НРАВИТСЯ БОЛЬШЕ)
Судебно-медицинское вскрытие показало, что чукча умер в
результате судебно-медицинского вскрытия.

JohnK
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 874
Зарегистрирован: 03.08.2002 (Сб) 0:35
Откуда: 48.02` 37.58`

Сообщение JohnK » 23.09.2005 (Пт) 15:59

Чат завершен (бета версия)
А как его сюда выложить???
SELECT * FROM girls WHERE tits NOT NULL AND age BETWEEN 18 AND 25 ORDER BY Beauty

Kiryusha
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 216
Зарегистрирован: 30.08.2005 (Вт) 10:56
Откуда: УР, Ижевск

Сообщение Kiryusha » 23.09.2005 (Пт) 16:01

Ты, когда пишешь сообщение, посмотри вниз там такая кнопочка Добавить приложение должна быть.
Судебно-медицинское вскрытие показало, что чукча умер в
результате судебно-медицинского вскрытия.

Kiryusha
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 216
Зарегистрирован: 30.08.2005 (Вт) 10:56
Откуда: УР, Ижевск

Сообщение Kiryusha » 23.09.2005 (Пт) 16:03

Плиз, подскажи путёвую статью с примерами на VB про сабклассинг, а то что-то никак не могу наткнуться.
Судебно-медицинское вскрытие показало, что чукча умер в
результате судебно-медицинского вскрытия.

JohnK
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 874
Зарегистрирован: 03.08.2002 (Сб) 0:35
Откуда: 48.02` 37.58`

Сообщение JohnK » 23.09.2005 (Пт) 16:23

Вот мой чат.... Приму всю критику... :oops:
Это чат для локальной сети ( В интернете тоже работает)
Сервер слушает локальный адрес на порту 1008 (Нужно разрешить в файрволе если есть таковой)
Клиент запускается на любом компьютере в сети. Единственное, нужно
в файле инициализации HOST=localhost заменить на IP компа где запущен сервер, типа HOST=192.168.0.1

И будет вам щасть общения ! :D
Вложения
Chat2.rar
Chat Room версия 1.1 by JohnK 2005
(350.33 Кб) Скачиваний: 75
SELECT * FROM girls WHERE tits NOT NULL AND age BETWEEN 18 AND 25 ORDER BY Beauty

Antonariy
Повелитель Internet Explorer
Повелитель Internet Explorer
Аватара пользователя
 
Сообщения: 4824
Зарегистрирован: 28.04.2005 (Чт) 14:33
Откуда: Мимо проходил

Сообщение Antonariy » 23.09.2005 (Пт) 16:29

А как запретить контекстно меню?

Код: Выделить всё
Private Function doc_oncontextmenu() As Boolean
    doc_oncontextmenu = False
End Function
Лучший способ понять что-то самому — объяснить это другому.

JohnK
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 874
Зарегистрирован: 03.08.2002 (Сб) 0:35
Откуда: 48.02` 37.58`

Сообщение JohnK » 23.09.2005 (Пт) 17:11

SELECT * FROM girls WHERE tits NOT NULL AND age BETWEEN 18 AND 25 ORDER BY Beauty

SHURUP
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 440
Зарегистрирован: 15.09.2004 (Ср) 14:24
Откуда: Ирпень, Украина

Сообщение SHURUP » 24.09.2005 (Сб) 1:53

Ээх, АФФТАР, пишет тебе самый неудачливый чатописатель.
Сам писал чат на базе вебброузера, но:

1. При современных интернет-технологиях (В нашей, или в Вашей, одним словом в наших странах) люди пытаются съэкономить, на чём могут и в результате отключают графику. Мои попытки включить смайлы в чат именно на этом и застопорились. Изменять за пользователя настройки браузера - ПРЕСТУПЛЕНИЕ. Это во-первых...

2. Самый простой скрол - послать окну {^END} через keysend. Можеть, не правильно, но меня не подводило ни разу...

3. Идея написать свой контрол - не такая уж и глупая (ИМХО).
Нам чужого не надо, но своё мы возьмем, чьё бы оно ни было...

Sirik
Perspicaz
Perspicaz
Аватара пользователя
 
Сообщения: 2280
Зарегистрирован: 19.02.2004 (Чт) 16:09
Откуда: Бердичев, Украина

Сообщение Sirik » 24.09.2005 (Сб) 8:24

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

лучше делать без выделенного сервера + UDP протокол.

2.список пользователей с автарами = treeview
Состояний же любви — десять: любовный взгляд, привязанность в мыслях, рождение желания, бессонница, исхудание, отвращение к предметам восприятия, утрата стыда, безумие, потеря сознания и смерть — вот их признаки

JohnK
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 874
Зарегистрирован: 03.08.2002 (Сб) 0:35
Откуда: 48.02` 37.58`

Сообщение JohnK » 24.09.2005 (Сб) 21:23

Этот чат у меня в сети (и в других) работает около года. Проблем не было ниразу. Да, согласен, нужен сервер в сети или всегда включенный ком.( к счастью имеется такой)
А 4 дня назад встал вопрос о смайликах , вот ирешил совместными усилиями.... Чат выложил....
SELECT * FROM girls WHERE tits NOT NULL AND age BETWEEN 18 AND 25 ORDER BY Beauty

VVitafresh
Продвинутый гуру
Продвинутый гуру
Аватара пользователя
 
Сообщения: 1641
Зарегистрирован: 12.05.2005 (Чт) 14:44
Откуда: Херсон, UA

Сообщение VVitafresh » 24.09.2005 (Сб) 23:01

Sirik писал(а):1.
топология клиент-сервер не сов сем удачна, так как если рушется связь с сервером, вся сеть накрываеться медным тазом

лучше делать без выделенного сервера + UDP протокол.


ИМХО, как раз наоборот. Чат без серверной части "засирает" всю сетку своими широковещательными сообщениями. Это головная боль сетевых админов.
Сервер на то и сервер, чтобы надежно работать. А если "рушится связь с сервером", то это совсем не значит что "вся сеть накроется медным тазом". Скорее наоборот, связь (всех) компов с сервером нарушится только в том случае, если сеть неработоспособна.

JohnK
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 874
Зарегистрирован: 03.08.2002 (Сб) 0:35
Откуда: 48.02` 37.58`

Сообщение JohnK » 24.09.2005 (Сб) 23:44

А подскажите где можно выложить полную инсталяцию программы? (весит около 3,2 Mb)
SELECT * FROM girls WHERE tits NOT NULL AND age BETWEEN 18 AND 25 ORDER BY Beauty

Sirik
Perspicaz
Perspicaz
Аватара пользователя
 
Сообщения: 2280
Зарегистрирован: 19.02.2004 (Чт) 16:09
Откуда: Бердичев, Украина

Сообщение Sirik » 26.09.2005 (Пн) 8:12

2 VVitafresh:
а кто сказал, что обязательно нужно использовать широковещательные пакеты?
повторюсь, это моё ИМХО
Состояний же любви — десять: любовный взгляд, привязанность в мыслях, рождение желания, бессонница, исхудание, отвращение к предметам восприятия, утрата стыда, безумие, потеря сознания и смерть — вот их признаки

Twister
Теоретик
Теоретик
Аватара пользователя
 
Сообщения: 2251
Зарегистрирован: 28.06.2005 (Вт) 12:32
Откуда: Алматы

Сообщение Twister » 26.09.2005 (Пн) 8:55

2 Sirik
А как ты хочешь просканировать сеть на наличие других чат-клиентов без широковещательных пакетов? (имеется ввиду безсерверный чат+UDP)
А я все практикую лечение травами...

Sirik
Perspicaz
Perspicaz
Аватара пользователя
 
Сообщения: 2280
Зарегистрирован: 19.02.2004 (Чт) 16:09
Откуда: Бердичев, Украина

Сообщение Sirik » 26.09.2005 (Пн) 9:03

большенство нормальных свитчей "режут" шировещательные пакеты (формата: x.x.x.255)

просто раз (например в 1 минуту) отсылать пакет на авторизацию на адреса вида: x.x.x.1-254
причём никокого "засирания" сети я тут не наблюдал
Состояний же любви — десять: любовный взгляд, привязанность в мыслях, рождение желания, бессонница, исхудание, отвращение к предметам восприятия, утрата стыда, безумие, потеря сознания и смерть — вот их признаки

JohnK
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 874
Зарегистрирован: 03.08.2002 (Сб) 0:35
Откуда: 48.02` 37.58`

Сообщение JohnK » 26.09.2005 (Пн) 17:55

А кто-нибудь скачал чат? Какие будут отзывы? :)
SELECT * FROM girls WHERE tits NOT NULL AND age BETWEEN 18 AND 25 ORDER BY Beauty

JohnK
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 874
Зарегистрирован: 03.08.2002 (Сб) 0:35
Откуда: 48.02` 37.58`

Сообщение JohnK » 27.09.2005 (Вт) 1:25

Вот, выложил в сети последняя версия - распакуй&работай

http://us.f1.yahoofs.com/bc/433869b9_11 ... DB7JM_lW4M
SELECT * FROM girls WHERE tits NOT NULL AND age BETWEEN 18 AND 25 ORDER BY Beauty

JohnK
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 874
Зарегистрирован: 03.08.2002 (Сб) 0:35
Откуда: 48.02` 37.58`

Сообщение JohnK » 27.09.2005 (Вт) 1:34

SELECT * FROM girls WHERE tits NOT NULL AND age BETWEEN 18 AND 25 ORDER BY Beauty

JohnK
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 874
Зарегистрирован: 03.08.2002 (Сб) 0:35
Откуда: 48.02` 37.58`

Сообщение JohnK » 30.09.2005 (Пт) 23:40

А вот еще вернее
http://freesoft.ru/?id=667877

А почему никто не пишет? :(
SELECT * FROM girls WHERE tits NOT NULL AND age BETWEEN 18 AND 25 ORDER BY Beauty

OldRunaways
Новичок
Новичок
Аватара пользователя
 
Сообщения: 44
Зарегистрирован: 10.07.2004 (Сб) 17:13

Вопрос

Сообщение OldRunaways » 02.10.2005 (Вс) 13:15

JohnK
Вопрос: Если ты пишешь чат с использованием HTML то (действительно) зачем тебе изобретать велосипед? Используй IIS в качестве сервера, IE в качестве клиента и ASP-шый (VBS) в качестве решения. Примеров VBS-ных чатов в Инете - море! За 2-а часа можно настроить что либо сносное... опять же ни каких клиентов пользователям скачивать не потребуется и это будет несомненным плюсом.

OldRunaways
Новичок
Новичок
Аватара пользователя
 
Сообщения: 44
Зарегистрирован: 10.07.2004 (Сб) 17:13

Сообщение OldRunaways » 02.10.2005 (Вс) 13:42

JohnK
Посмотрел чат... хм... опять "изобретаем велосипед". Зачем нужно делать что то если это уже есть, причём не просто "делать", а "делать хуже" ? Чатов подобного плана полно! ...это моё ИМХО и та самая критика которую ты просил. Возможно со временем это будет "Супер Чат" который переплюнет "Ирку"..., но пока... на 3 с минусом.

P.S. О безопасности задумывался? HTML-чат (пусть даже и написанный на VB) имеет все те недочёты (в плане секьюрности) что и ВЕБ-Сайты. Как минимум нужно фильтровать вводимые данные, иначе можно прислать в чат - "<font style="FONT-SIZE: 100px">:-)</font>":-)

JohnK
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 874
Зарегистрирован: 03.08.2002 (Сб) 0:35
Откуда: 48.02` 37.58`

Сообщение JohnK » 02.10.2005 (Вс) 18:02

Спасибо за отзыв, а вот почему 3- ? Подробнее пожалуйста.
SELECT * FROM girls WHERE tits NOT NULL AND age BETWEEN 18 AND 25 ORDER BY Beauty

JohnK
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 874
Зарегистрирован: 03.08.2002 (Сб) 0:35
Откуда: 48.02` 37.58`

Сообщение JohnK » 08.10.2005 (Сб) 23:52

А вот какой контрол для аватар подойдет лучше всего?
SELECT * FROM girls WHERE tits NOT NULL AND age BETWEEN 18 AND 25 ORDER BY Beauty

SHURUP
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 440
Зарегистрирован: 15.09.2004 (Ср) 14:24
Откуда: Ирпень, Украина

Сообщение SHURUP » 09.10.2005 (Вс) 1:43

ListView! Хотя и в обычном листе можно картинки всовывать и разными шрифтами писать, но это ИМХО сложнее сделать чем самому контрол написать.
Нам чужого не надо, но своё мы возьмем, чьё бы оно ни было...

JohnK
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 874
Зарегистрирован: 03.08.2002 (Сб) 0:35
Откуда: 48.02` 37.58`

Сообщение JohnK » 10.10.2005 (Пн) 21:53

А вот на счет безопасности. какие идеи? Ведь и спользуется компонент всеми нами "любимого" IE! :D
SELECT * FROM girls WHERE tits NOT NULL AND age BETWEEN 18 AND 25 ORDER BY Beauty

SHURUP
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 440
Зарегистрирован: 15.09.2004 (Ср) 14:24
Откуда: Ирпень, Украина

Сообщение SHURUP » 11.10.2005 (Вт) 1:13

JohnK писал(а):А вот на счет безопасности. какие идеи? Ведь и спользуется компонент всеми нами "любимого" IE! :D

Та заменить Все "<" и ">" символы на аналогичные &lt; и &gt;
Нам чужого не надо, но своё мы возьмем, чьё бы оно ни было...

JohnK
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 874
Зарегистрирован: 03.08.2002 (Сб) 0:35
Откуда: 48.02` 37.58`

Сообщение JohnK » 11.10.2005 (Вт) 12:37

Ну это понятное дело, а вот конкретные уязвимости кто знает?
SELECT * FROM girls WHERE tits NOT NULL AND age BETWEEN 18 AND 25 ORDER BY Beauty

JohnK
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 874
Зарегистрирован: 03.08.2002 (Сб) 0:35
Откуда: 48.02` 37.58`

Сообщение JohnK » 20.12.2005 (Вт) 20:41

Закончена версия 1.3.0
Взять можно здесь http://bbs.vbstreets.ru/viewtopic.php?t=22050
Или инсталяцию здесь: http://freesoft.ru/?id=667877

Новое в этой версии:

- Переработан движок чата;
- Исправлены мелкие недоработки;
- Добавлена шифрация сообщений;
- Добавлена аутификация клиентов на сервере;
- Возможность посылки offline сообщений (-offline:);
- Возможность рассылки объявлений всем активным чатам (-announce:);
- Посылка сообщений группе людей;
- Ведение истории сообщений;
- Время получения сообщения;
- Назначение звуков событиям;
- Добавлены новые смайлики;
- Память последних 10 сообщений (перебор стрелками вниз и вверх);
- Незначительные изменения интерфейса;
- Автоматическое определение рода (муж. или женск.) пользователя.

В связи с переработанным движком, старые версии чата не совместимы с новой версией.
SELECT * FROM girls WHERE tits NOT NULL AND age BETWEEN 18 AND 25 ORDER BY Beauty

JohnK
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 874
Зарегистрирован: 03.08.2002 (Сб) 0:35
Откуда: 48.02` 37.58`

Сообщение JohnK » 05.01.2006 (Чт) 1:41

А стоит скины добавлять?
SELECT * FROM girls WHERE tits NOT NULL AND age BETWEEN 18 AND 25 ORDER BY Beauty

JohnK
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 874
Зарегистрирован: 03.08.2002 (Сб) 0:35
Откуда: 48.02` 37.58`

Сообщение JohnK » 08.01.2006 (Вс) 1:36

Если да, то кто поможет нарисовать? Есть ли среди нас художники?
SELECT * FROM girls WHERE tits NOT NULL AND age BETWEEN 18 AND 25 ORDER BY Beauty

Пред.

Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: AhrefsBot, Google-бот и гости: 30

    TopList