CommFort

CrazyVirus писал(а):

Chudik писал(а):теперь подскажите пожалуйста как сделать через плагин что-то вроде рекламщика? Что-бы посылал в общие каналы, или ЛС каждому определённое сообщение в установленную разницу времени, допустим раз в сутки!?

Через событие "Время" с указанием нужного времени. Для отправки сообщения в канал, используешь действие "Отправить сообщение в общий канал" с указанием нужных каналов (разделяя их символом "|"), для отправки личных сообщений всем пользователям, используешь этот скрипт:

Код: Выделить всё

msg = "текст" & vbNewLine & "сообщения"
usr = cp.GetUsers
For i = 0 To UBound(usr) Step 3
  cp.SendUserMsg usr(i), msg, 0
Next

Chudik писал(а):Поставил галочку на "Срабатывать не чаще чем" и выставил интервал в 18000 сек., пишет всё равно в каналы каждый час. Как можно исправить?

Chudik писал(а):Так будет правильно? Раз в 5 часов новость?

rumix писал(а):можно ли реализовать в плагине на функиции ограничения такую функцию как удалеие сообщения за которое юзер был забанен???
например у меня стоит автобан на мат... он банит но сообщение не удаляет.

или может уже есть подобный плагин?!

kaffa писал(а):в скриптах не увидел функцию 'текущая дата' можете сделать эту функцию???очень нужна

cp.SendMsg "main", Now, 0

leonbratsk писал(а):Если в плагине написать код VB на отправку мыла, то будет ли он отправлять его по событию ?

CrazyVirus писал(а):

leonbratsk писал(а):Если в плагине написать код VB на отправку мыла, то будет ли он отправлять его по событию ?

На какое событие назначишь, тогда и будет срабатывать.

leonbratsk писал(а):Вот еще вопрос. При написании в приват определенной фразы, этому человеку должно отправиться сообщение.
Как это реализовать? Событие сделать можно, но вот как с действием быть. Там нету ника, который отправил это сообщение.

CCPE:8||||||||0||||1||||0||2||фраза
CCPA:4||%nick%||0||ответ

CCPE:8||||||||0||||1||||0||2||фраза
CCPA:5||%nick%||0||ответ

CrazyVirus писал(а):

leonbratsk писал(а):Вот еще вопрос. При написании в приват определенной фразы, этому человеку должно отправиться сообщение.
Как это реализовать? Событие сделать можно, но вот как с действием быть. Там нету ника, который отправил это сообщение.

Должно отправлять сообщение в приват? Если да, то:

Код: Выделить всё

CCPE:8||||||||0||||1||||0||2||фраза
CCPA:4||%nick%||0||ответ

Если личное сообщение, то:

Код: Выделить всё

CCPE:8||||||||0||||1||||0||2||фраза
CCPA:5||%nick%||0||ответ

If Len(txt) > 100 Then
cp.SendPrivateMsg cp.EventUserName, "Ошибка: Сообщение слишком длиное.", false
End
ElseIf Len(txt) = 0 Then
cp.SendPrivateMsg cp.EventUserName, "Ошибка: Сообщение слишком короткое.", false
End
End If

leonbratsk писал(а):Как можно принудительно завершить действие в Visual basic?

Do While true
...(здесь код)...
If Len(cp.EventText) > 100 Then
cp.SendMsg "main", "Ошибка: Сообщение слишком длиное.", false:Exit Do
ElseIf Len(txt) = 0 Then
cp.SendMsg "main", "Ошибка: Сообщение слишком короткое.", false:Exit Do
End If
...(здесь тоже код)...
Exit Do <- необходимо для выхода из цикла
Loop

ОреЛ писал(а):

leonbratsk писал(а):Как можно принудительно завершить действие в Visual basic?

Вам нужно окончательно завершить выполнение скрипта?