Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Скриптовые языки администрирования Windows (http://forum.oszone.net/forumdisplay.php?f=102)
-   -   [решено] Мгновенные сообщения (http://forum.oszone.net/showthread.php?t=208856)

Starter1 13-06-2011 10:32 1693497
Мгновенные сообщения
 
Нужен батник который может по интернету посылать мгновенные сообщения, то есть: передал я через хостинг этот батник другу, он его запустил у себя и я запустил у себя, в начале записали ip друг друга и ники, потом просто батник ждёт ввода с клавиатуры, ввели сообщение тыкнули Enter и друг уже у себя видит в окне батника моё сообщение. Весь лог сообщений должны показываться у друг друга, то есть я должен видеть что я отправил и что он отправил.

Выглядит это примерно так:
Код:
Введите ip друга: 333.333.333 (ввели)
Введите ник друга: Sasha (ввели)
Можете пользоваться. Приятного общения!
____________________________________
Введите текст: Привет!
Я: Привет!
Sasha: Здоров!
                ... ну и т.д.

ferget 13-06-2011 11:00 1693510
написать ICQ на bat

хотелось бы это увидеть


OC у вас какая?

amel27 14-06-2011 08:26 1694034
Цитата:
Цитата ferget
хотелось бы это увидеть »
В общем-то ничего особенного - через тот же NET SEND или MSG... Только для интернета он не подойдёт - NetBIOS/RPC за пределы локалки не ходют.

Starter1 14-06-2011 16:11 1694305
OC 7
Тогда подскажите любую другую программу где не нужно регаться и без всяких этих юинов а просто скинул другу, он запустил и всё поехало.

ZeVSalt 15-06-2011 05:21 1694640
Vypress Chat

Vypress Chat — это текстовый чат (chat) для малых и средних локальных сетей (до трёхсот компьютеров). Программа обладает всеми возможностями, необходимыми для таких небольших офисных и домашних сетей, чрезвычайно легка в настройке и использовании.

Главной целью при создании Vypress Chat было обеспечить простую и максимально удобную в эксплуатации среду общения всех пользователей локальной сети, надёжно функционирующую даже в сетях без профессионального администратора.

Текущая версия:
2.1.8
11 декабря 2009 г.
Поддерживаемые ОС:
Windows 95
Windows 98
Windows Me
Windows NT 4.0
Windows 2000
Windows XP
Windows 2003
Windows Vista
Windows Vista x64
Поддерживаемые протоколы:
TCP/IP

На сегодняшний день можно определённо заявить, что Vypress Chat является лучшей, самой надёжной и популярной программой в своём роде: написанный на Microsoft Visual C++, он сочетает в себе семилетний опыт нашей компании в разработке сетевых продуктов, а также опыт бывших разработчиков таких продуктов как quickChat и SEChat.

Сразу же после запуска Vypress Chat автоматически присоединяется к общему каналу общения (#Main), позволяя пользователям видеть тех, кто уже присоединился к общей беседе, посылать другим пользователям (всем вместе или избирательно) сообщения, обмениваться файлами и организовывать собственные каналы для обсуждения каких-либо частных вопросов.

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

ferget 15-06-2011 08:19 1694690
это опять же в локальной сети

Starter1 15-06-2011 12:33 1694812
ZeVSalt, Спасибо попробую :)

ZeVSalt 16-06-2011 05:43 1695271
Работает как в локальных сетях так и в интернете (проверено), необходимо только указать ip

root221 20-07-2011 07:05 1716088
Цитата:
Цитата ferget
написать ICQ на bat
хотелось бы это увидеть
OC у вас какая? »

Код:
@echo off
echo BatChat
cls
pushd "%~dp0"
echo Current DIR: "%CD%"
if "%~1" == "talk_widget" goto talker
 
rem ================================================
 
rem ////////////////////
:auth
echo Enter chat filename to connect ("abc" for example):
set /p chat=^>
echo Enter your nick:
set /p nick=^>
start call %0 talk_widget %chat% %nick%
 
rem ////////////////////
:listener
cls
call title "| Chat: %chat% | User: %nick% |"
if exist %chat%_history type %chat%_history
if not exist %chat% echo. 2>%chat%
 
:listener_loop
ping 127.0.0.1 -n 1 -w 20 > nul
set oldtext=%text%
set /p text=<%chat%
if not "%text%" == "%oldtext%" echo %text%
goto listener_loop
rem ////////////////////
 
rem ================================================
 
rem ////////////////////
rem // %2 - chat name //
rem // %3 - user nick //
rem ////////////////////
:talker
set chat=%~2
set nick=%~3
cls
call title "| Chat: %chat% | User: %nick% |"
call ::cs_in
echo (%TIME% %nick% connected)>%chat%
call ::cs_out
echo (%TIME% %nick% connected)>>%chat%_history
 
:talker_loop
cls
echo Dear %nick%, type message to send:
set /p msg=^>
call ::cs_in
echo [%TIME% %nick%]: %msg%>%chat%
call ::cs_out
echo [%TIME% %nick%]: %msg%>>%chat%_history
goto talker_loop
rem ////////////////////
 
rem ================================================
 
rem ////////////////////
:cs_in
if exist "%chat%_cs" ping 127.0.0.1 -n 1 -w 50 > nul
set cs_value=%RANDOM%
 
:cs_in_loop
echo %cs_value%>%chat%_cs
set /p ret=<%chat%_cs
if "%ret%" == "%cs_value%" exit /b
ping 127.0.0.1 -n 1 -w 10 > nul
goto :cs_in_loop
rem ////////////////////
 
rem ////////////////////
:cs_out
del %chat%_cs
exit /b
rem ////////////////////
 
rem ================================================
Чат для локальной сети. Средствами BAT)

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

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

Anonymоus 20-07-2011 10:59 1716209
root221, если уж приводите этот код, возможно вам бы стоило указать его источник ?

root221 20-07-2011 17:55 1716531
Anonymоus, я его сам случайно нашел, об источнике информации не было.

cibin 20-07-2011 21:15 1716667
Что бы не создавать новую у меня вот какой вопрос:
В случаи когда в ЛВС более 100 компов и у некоторых (мы не знаем у кого) не включена служба сообщения. Возможно ли отправить сообщение по сети так что бы все железно получили, не смотря на выключенную службу?

amel27 21-07-2011 03:35 1716795
cibin, зависит от конкретной сети:
- наличие/настройки на компах файерволов/антивирусов;
- домен/рабочая группа, т.е. способ удаленного подключения (с админскими правами);
- операционная система на компьютерах

P.S. логичней сначала (тем же способом) включить службу и передать сообщение обычным порядком

cibin 21-07-2011 12:22 1717041
Цитата:
- наличие/настройки на компах файерволов/антивирусов;
файерволов у всех отключён, антивирус каспер лицензионный

Цитата:
- домен/рабочая группа, т.е. способ удаленного подключения (с админскими правами);
без домена, рабочая группа у всех одинаковая, у каждого на пользователь Администратор пароль одинаковой

Цитата:
- операционная система на компьютерах
Почти у всех xp, кроме одного - Vista

Цитата:
P.S. логичней сначала (тем же способом) включить службу и передать сообщение обычным порядком
Я это понимаю, ну не очень хочется всех обегать и проверять у всех!
Возник с этим вопрос: Возможно ли bat файлом включить службу сообщений?

Iska 21-07-2011 13:13 1717099
Цитата:
Цитата cibin
Я это понимаю, ну не очень хочется всех обегать и проверять у всех! »
Бегать не надо. Включите автоматический запуск службы посредством групповой политики.
Цитата:
Цитата cibin
Возник с этим вопрос: Возможно ли bat файлом включить службу сообщений? »
Например (не единственное средство):
Код:
wmic.exe /node /?
wmic.exe service call /?

One THE darK 22-07-2011 12:31 1717746
Народ подскажите программы для общения в (мгновенные сообщения) среди небольшого количества людей, или код для создания программы в bat. Только не те 2 программы который представлены в этой теме, С bat чатом не разобрался, а программа тоже даёт затруднения...

Iska 22-07-2011 12:45 1717757
Для локальной сети я по сю пору пользую Intranet Chat.

One THE darK 22-07-2011 13:14 1717783
А для соединения малого количества людей ( от 3 до 5) не в локальной сети, что можете предложить?
И для 2 пользователей?

registeruser1 04-08-2011 07:59 1725652
root221, классная штука, добавил не много косметики, но есть проблемки -
Батник хорош тем что все реализованно в одном файле и только встроенными средствами!
(тестировал только на win XP, если кто может протестируйте пож-ста на win7, только в 7 звуковых оповещений не будет, потому как там нет звукового файла chimes.wav, и по-моему плеера этого тоже нет).

Код:
@echo off
color 1F
title Chat v 1.1
echo BatChat
cls
pushd "%~dp0"
if "%~1" == "talk_widget" goto talker
 
:auth
echo.
echo ‚ўҐ¤ЁвҐ -®¬Ґа Є®¬-*вл ¤«п з*в* ў зЁб«®ў®¬ д®а¬*⥠(1-999):
echo.
set /p chat=^>
echo.
echo ЏаЁ¤г¬*©вҐ бў®Ґ Ё¬п ¤«п з*в* (Ђ-џ \ A-Z):
set /p nick=^>
start call %0 talk_widget %chat% %nick%

:listener
cls
call title "| Chat: %chat% | User: %nick% |"
if exist %chat%_history type %chat%_history
if not exist %chat% echo. 2>%chat%
 
:listener_loop
ping 127.0.0.1 -n 1 -w 20 > nul
set oldtext=%text%
set /p text=<%chat%
if not "%text%" == "%oldtext%" echo %text%
goto listener_loop
 
:talker
set chat=%~2
set nick=%~3
cls
call title "| Љ®¬-*в* з*в*: %chat% | Џ®«м§®ў*⥫м: %nick% |"
call ::cs_in
echo (%time:~0,-3% Ї®«м§®ў*⥫м "%nick%" ЇаЁб®Ґ¤Ё-Ё«бп Є з*вг)>%chat%
call ::cs_out
echo (%time:~0,-3% Ї®«м§®ў*⥫м %nick% ЇаЁб®Ґ¤Ё-Ё«бп Є з*вг)

:talker_loop
cls
echo.
echo ‚*и ⥪бв б®®ЎйҐ-Ёп:
echo.
set /p msg=^>
call ::cs_in
echo [%time:~0,-3% - %nick%]: %msg% >%chat%
start /min mplay32.exe /play /close c:\WINDOWS\Media\chimes.wav 1>nul 2>nul
call ::cs_out
echo [%time:~0,-3% %nick%]: %msg%>>%chat%_history
goto talker_loop

:cs_in
if exist "%chat%_cs" ping 127.0.0.1 -n 1 -w 50 > nul
set cs_value=%RANDOM%
 
:cs_in_loop
echo %cs_value%>%chat%_cs
set /p ret=<%chat%_cs
if "%ret%" == "%cs_value%" exit /b
ping 127.0.0.1 -n 1 -w 10 > nul
goto :cs_in_loop

:cs_out
del %chat%_cs
exit /b


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

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

Нужно как-то сделать так что бы окно чата при получении сообщения тоже воспроизводило данный звуковой файл.


Время: 17:57.

Время: 17:57.
© OSzone.net 2001-