Crazy CommFort Server Plugin v1.09 [плагин для сервера]

Здесь содержатся плагины, графические оболочки, наборы смайлов и другие дополнения к CommFort.
Аватара пользователя
CrazyVirus
Сообщения: 747
Зарегистрирован: 13:40, 26.05.2007

Re: Crazy CommFort Server Plugin v1.06 [плагин для сервера]

Сообщение CrazyVirus »

CraSTI писал(а):Чтото не помогает ;( кодировка сменилась а текст все равно сплошной
Вместо сносов добавляй "<br>", т.к. в HTML сносы не учитываются. Да и "charset=utf-16" тогда уже. :)
Аватара пользователя
CraSTI
Сообщения: 89
Зарегистрирован: 20:08, 03.02.2006
Откуда: Орехово-зуево
Контактная информация:

Re: Crazy CommFort Server Plugin v1.06 [плагин для сервера]

Сообщение CraSTI »

CrazyVirus писал(а):
CraSTI писал(а):Чтото не помогает ;( кодировка сменилась а текст все равно сплошной
Вместо сносов добавляй "<br>", т.к. в HTML сносы не учитываются. Да и "charset=utf-16" тогда уже. :)
ОООО пошли переходы:)
Аватара пользователя
CraSTI
Сообщения: 89
Зарегистрирован: 20:08, 03.02.2006
Откуда: Орехово-зуево
Контактная информация:

Re: Crazy CommFort Server Plugin v1.06 [плагин для сервера]

Сообщение CraSTI »

CrazyVirus: Вот что у меня вышло
Добавь в плагин дату в действие - а то как то странно время есть а даты нет:)


Вот что у меня в итоге получилось:

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

file = "D:\WebServers\home\10.224.77.7\www\board\board.php"
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile(file, 2, True, -0)
cat = cp.GetBulletinsCat("")

f.WriteLine "<br>"&"<b>Время обновления доски объявлений:</b> %h%:%m%:%s%"&"<br>"

For i = 0 To UBound(cat) Step 3


  f.WriteLine  "<br>"&"<b>Категория:</b> " & cat(i+1)& "<br>"
  if cat(i+2)<>"" then
    f.WriteLine "<b>Описание Категории:</b> " & cat(i+2)& "<br>"
  end if

  f.WriteBlankLines 1 
  bull = cp.GetBulletins(cat(i))
  For y = 0 To UBound(bull) Step 5
   
f.WriteLine "<b>Раздел:</b> " & bull(y+3)& "<br>" & "<b>Автор:</b> " & bull(y+2) & "<br>" & "<b>Дата\Время:</b> " & bull(y+1) & "<br>" 
    bl = cp.GetBulletin(bull(y))

    f.WriteLine "<b>Содержимое сообщения:</b> " & "<br>" & bl(4) & "<br>"& "<br>"
  Next
  f.WriteLine "------------------------------------------------------" & "<br>"
Next
f.Close
Вот так выглядит
Изображение

А реально куда нить на ftp заливать доску? Просто сервак локальный я хотел бы доску выкинуть в инет
Аватара пользователя
CrazyVirus
Сообщения: 747
Зарегистрирован: 13:40, 26.05.2007

Re: Crazy CommFort Server Plugin v1.06 [плагин для сервера]

Сообщение CrazyVirus »

CraSTI писал(а):CrazyVirus: Вот что у меня вышло
Добавь в плагин дату в действие - а то как то странно время есть а даты нет:)
Вот так:
f.WriteLine "<br>"&"<b>Время обновления доски объявлений:</b> "&Now&"<br>"
CraSTI писал(а):А реально куда нить на ftp заливать доску? Просто сервак локальный я хотел бы доску выкинуть в инет
http://forum.xakep.ru/m_861206/tm.htm
Не проверял.
NoNames34
Сообщения: 39
Зарегистрирован: 17:03, 18.01.2010
Откуда: Чебаркуль

Re: Crazy CommFort Server Plugin v1.06 [плагин для сервера]

Сообщение NoNames34 »

подскажите как исправить, добавил в крейзи плагин для севера тот код что щас указал CraSTI
поставил выполнять по таймеру каждый день. файл плагин сформировал но самих объявлений почему-то там нет только заголовок :
Время обновления доски объявлений: 30.05.2011 15:46:00


Самфайл формируется, без проблем...

ссылка на объявления http://dos74.ru/stati/alfakom/board-commfort.html

заранее благодарю за ответ
Сеть Альфаком, сайт развлечения, знакомств http://dos74.ru
Аватара пользователя
CraSTI
Сообщения: 89
Зарегистрирован: 20:08, 03.02.2006
Откуда: Орехово-зуево
Контактная информация:

Re: Crazy CommFort Server Plugin v1.06 [плагин для сервера]

Сообщение CraSTI »

NoNames34: не делай обновление по таймеру фигня это, сделать событие по добавлению нового объявления - это снизить нагрузку малую но все же :)

вот мой код http://govnokod.com/4527
вот скрины
http://s1.ipicture.ru/uploads/20110530/g41T4VPT.png
Аватара пользователя
CraSTI
Сообщения: 89
Зарегистрирован: 20:08, 03.02.2006
Откуда: Орехово-зуево
Контактная информация:

Re: Crazy CommFort Server Plugin v1.06 [плагин для сервера]

Сообщение CraSTI »

CrazyVirus Ну вообще круть теперь!)))) спасибо.)
Аватара пользователя
Yaroslav
Сообщения: 846
Зарегистрирован: 03:45, 15.12.2007
Контактная информация:

Re: Crazy CommFort Server Plugin v1.06 [плагин для сервера]

Сообщение Yaroslav »

Блин, ну почему vbs? Вирус, вернись на LUA, как в старые добрые времена.
Web-интерфейс серверных логов ——> http://commfort.com/ru/forum/viewtopic.php?t=6618
Web-статистика посещаемости чата —> http://commfort.com/ru/forum/viewtopic.php?t=6546
Благодарности —> R753244967524 Z664725275810 U806184306803 ЯД:41001743355185
Аватара пользователя
CrazyVirus
Сообщения: 747
Зарегистрирован: 13:40, 26.05.2007

Re: Crazy CommFort Server Plugin v1.06 [плагин для сервера]

Сообщение CrazyVirus »

Yaroslav писал(а):Блин, ну почему vbs? Вирус, вернись на LUA, как в старые добрые времена.
В Lua нет поддержки UTF-16. :)
Аватара пользователя
Yaroslav
Сообщения: 846
Зарегистрирован: 03:45, 15.12.2007
Контактная информация:

Re: Crazy CommFort Server Plugin v1.06 [плагин для сервера]

Сообщение Yaroslav »

CrazyVirus писал(а):
Yaroslav писал(а):Блин, ну почему vbs? Вирус, вернись на LUA, как в старые добрые времена.
В Lua нет поддержки UTF-16. :)
Бида, а в линуксе траблы с VBS :)

Посмотри это: http://www.gamedev.ru/code/forum/?id=139048

говорят, что вот это подерживает двухбайтовый уникод
http://luaplus.org/
Lua Core Enhancements:
16-bit wide character string support.

http://www.squirrel-lang.org/
Unicode
By default Squirrel strings are plain 8-bits ASCII characters; however if the symbol 'SQUNICODE' is defined the VM, compiler and API will use 16-bits characters.
Web-интерфейс серверных логов ——> http://commfort.com/ru/forum/viewtopic.php?t=6618
Web-статистика посещаемости чата —> http://commfort.com/ru/forum/viewtopic.php?t=6546
Благодарности —> R753244967524 Z664725275810 U806184306803 ЯД:41001743355185
Аватара пользователя
CrazyVirus
Сообщения: 747
Зарегистрирован: 13:40, 26.05.2007

Re: Crazy CommFort Server Plugin v1.06 [плагин для сервера]

Сообщение CrazyVirus »

Yaroslav писал(а):говорят, что вот это подерживает двухбайтовый уникод
http://luaplus.org/
Lua Core Enhancements:
16-bit wide character string support.

http://www.squirrel-lang.org/
Unicode
By default Squirrel strings are plain 8-bits ASCII characters; however if the symbol 'SQUNICODE' is defined the VM, compiler and API will use 16-bits characters.
LuaPlus использовал, но то ли я кривой, то ли он толком недоделанный...
На счет сквирла в курсе, даже немного потренировался.
Аватара пользователя
Yaroslav
Сообщения: 846
Зарегистрирован: 03:45, 15.12.2007
Контактная информация:

Re: Crazy CommFort Server Plugin v1.06 [плагин для сервера]

Сообщение Yaroslav »

CrazyVirus писал(а):
Yaroslav писал(а):говорят, что вот это подерживает двухбайтовый уникод
http://luaplus.org/
Lua Core Enhancements:
16-bit wide character string support.

http://www.squirrel-lang.org/
Unicode
By default Squirrel strings are plain 8-bits ASCII characters; however if the symbol 'SQUNICODE' is defined the VM, compiler and API will use 16-bits characters.
LuaPlus использовал, но то ли я кривой, то ли он толком недоделанный...
На счет сквирла в курсе, даже немного потренировался.
Я буду ждать и надеяться.
Web-интерфейс серверных логов ——> http://commfort.com/ru/forum/viewtopic.php?t=6618
Web-статистика посещаемости чата —> http://commfort.com/ru/forum/viewtopic.php?t=6546
Благодарности —> R753244967524 Z664725275810 U806184306803 ЯД:41001743355185
Аватара пользователя
CraSTI
Сообщения: 89
Зарегистрирован: 20:08, 03.02.2006
Откуда: Орехово-зуево
Контактная информация:

Re: Crazy CommFort Server Plugin v1.06 [плагин для сервера]

Сообщение CraSTI »

CrazyVirus: а там реально коменты от объяв вывести ?
NoNames34
Сообщения: 39
Зарегистрирован: 17:03, 18.01.2010
Откуда: Чебаркуль

Re: Crazy CommFort Server Plugin v1.06 [плагин для сервера]

Сообщение NoNames34 »

и еще пожелание - чтобы работало даже когда сервер чата и веб сервер находятся на разных машинах.
Сеть Альфаком, сайт развлечения, знакомств http://dos74.ru
Аватара пользователя
CrazyVirus
Сообщения: 747
Зарегистрирован: 13:40, 26.05.2007

Re: Crazy CommFort Server Plugin v1.06 [плагин для сервера]

Сообщение CrazyVirus »

CraSTI писал(а):CrazyVirus: а там реально коменты от объяв вывести ?

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

file = "C:\text.txt"
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile(file, 2, True, -1)
cat = cp.GetBulletinsCat("")
For i = 0 To UBound(cat) Step 3
  f.WriteLine cat(i+1)
  if cat(i+2)<>"" then
    f.WriteLine cat(i+2)
  end if
  f.WriteBlankLines 1 
  bull = cp.GetBulletins(cat(i))
  For y = 0 To UBound(bull) Step 5
    f.WriteLine bull(y+3) & " | " & bull(y+2) & " | " & bull(y+1)
    bl = cp.GetBulletin(bull(y))
    f.WriteLine bl(4)
    if bl(8)>0 then
      f.WriteLine "---"
      For u = 0 To UBound(bl(9)) Step 4
        f.WriteLine bl(9)(u+2) & " | " & bl(9)(u+1)
        f.WriteLine bl(9)(u+3)
      Next
    end if
  Next
  f.WriteLine "-------------------------------------------------"
Next
f.Close
NoNames34 писал(а):и еще пожелание - чтобы работало даже когда сервер чата и веб сервер находятся на разных машинах.
Что работало?
Ответить