Исторический альманах, портал коллекционеров информации, электронный музей 'ВиФиАй' work-flow-Initiative 16+
СОХРАНИ СВОЮ ИСТОРИЮ НА СТРАНИЦАХ WFI Категории: Актуальное Избранное
Исторический альманах, портал коллекционеров информации, электронный музей

Путь:

Навигация


Язык [ РУССКИЙ ]

Поиск
Подписка и соц. сети

Подписаться на обновления сайта


Поделиться

Яндекс.Метрика

Новые материалы

Картинка недели

К началуК началу
В конецВ конец
Создать личную галерею (раздел)Создать личную галерею (раздел)
Создать личный альбом (с изображениями)Создать личный альбом (с изображениями)
Создать материалСоздать материал

wfi в ногу со временем

Оценка раздела:
Не нравится
4
Нравится

Интеграция SpiderBasic и WFI

Дата публикации: 2014-05-29 09:36:30
Просмотров: 1959
Автор:
Интеграция SpiderBasic и WFI

Приложение на языке SpiderBasic получает данные из заполненной формы, отправляет их на сервер ajax запросом и размещает в cответствующем div контейнере полученный ответ сервера.
Пример интеграции фактически заменяет форму комментирования внизу страницы.

Исходный код формы.
Procedure HttpGetEvent(Success, result.s)
If Success
      Debug result
      ;!alert(v_result);    
      !document.getElementById('com_loader').innerHTML = v_result; 
Else
      Debug "HTTPRequest(): Error"
EndIf
EndProcedure
 
Global ListView1, Button1, Tree1
 
Procedure SizeWindowEvent()
    ResizeGadget(0, 10, 10, WindowWidth(0)-20, WindowHeight(0)-20)
EndProcedure
 
Procedure CloseWindowEvent()
    CloseWindow(EventWindow())
EndProcedure
 
Procedure GadgetEvents()
Select EventGadget()
Case 1
      DisableGadget(1,1)
      url$="act=com_add&com_nav=158&com_lang=1&com_item=&com_olp=интеграция_spiderbasic_и_wfi&com_title="+GetGadgetText(2)+"&com_mail="+GetGadgetText(3)+"&com_name="+GetGadgetText(4)+"&com_msg="+GetGadgetText(5)+""
      HTTPRequest(#PB_HTTP_Post, "http://wfi.lomasm.ru/rus.main.ajax/", url$, @HttpGetEvent())       
EndSelect
EndProcedure
 
If OpenWindow(0, 0, 0, 420, 200, "", #PB_Window_SystemMenu | #PB_Window_ScreenCentered | #PB_Window_SizeGadget)
      SetWindowTitle(0, "SpiderBasic and WFI example of integration and interaction")
      
      StringGadget(2, 10,  10, 170, 20, "title...")
      StringGadget(3, 10,  40, 170, 20, "mail...")
      StringGadget(4, 10,  70, 170, 20, "name...")
      StringGadget(5, 10,  100, 170, 60, "text...")
      
      ButtonGadget(1, 10,  170, 200, 20, "SEND", #PB_Button_Left)
      
      BindEvent(#PB_Event_CloseWindow, @CloseWindowEvent())
      BindEvent(#PB_Event_SizeWindow, @SizeWindowEvent())
      BindEvent(#PB_Event_Gadget, @GadgetEvents())
      
EndIf



 
About \  О сайте
Оценка материала:
Нравится
1
Не нравится
Описание материала: Интеграция SpiderBasic и WFI

Остальные материалы раздела: wfi в ногу со временем

Следующая Первые шаги WFI и Accelerated Mobile Pages

Оставить комментарий

Похожие материалы:

Новые альбомы:


Разработка страницы завершена на 0%
Используйте средства защиты! Соблюдайте гигиену! Избегайте посещения людных мест!
Операции:
WFI.lomasm.ru исторические материалы современной России и Советского Союза, онлайн музей СССР
Полезные советы...