Поиск:

Ответ в темуСоздание новой темы Создание опроса
> ASP, VB -events, помогите разобраться новичку 
:(
    Опции темы
neomax
Дата 24.10.2006, 19:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 134
Регистрация: 22.6.2006

Репутация: нет
Всего: нет



Начал работать с VBScript  ".asp" 
Код


<%@Language = VBScript%> 


как организовать собътие възова sub или function на стороне сервера нажатием кнопки?
Дайте пример кода, плиз хотя бъ с "Hello World!"

--------------------
Найпопулярніші оголошення здесь - Безкоштовні оголошення
PM MAIL   Вверх
DrBoom
Дата 24.5.2007, 08:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


QIP VB-SDK Developer
*


Профиль
Группа: Участник
Сообщений: 83
Регистрация: 19.2.2006

Репутация: нет
Всего: нет



Пример использования Sub и Function в ASP (чтение и запись куки)!!!

Код


<%
Function getCookie(whichVariable As string)
' чтения cookie на стороне сервера
' (p.s. "As string" советую не писать=)))) я написал, чтоб ясно что нужно в водить, как входящее значение функции)!!!
 cookie=request.cookies
 VarPosition=Instr(cookie, whichVariable&"=")
 If VarPosition=0 then
  GetCookie="no"
' возращаем "no", если нет значений у читаемой cookie-переменной whichVariable, а за тем выходим из функции(следующая строка)!
  Exit Function
 Else
  StartVarPosition=VarPosition+Len(whichVariable&"=")
  EndVarPosition=Instr(StartVarPosition, cookie, ";")
  If EndVarPosition=0 then EndVarPosition=Len(cookie)+1
  getCookie=Mid(cookie, StartVarPosition, EndVarPosition-StartVarPosition)
' возращаем само значение cookie-переменной whichVariable!
 End If
End Function


Sub setCookie(whichVariable) ' записываем какашки))))
 ' т.к. на стороне сервера куки доступны для чтения, то пишем следующие)))
 response.write "<script language="&chr(34)&"javascript"&chr(34)&">document.cookie="&chr(34)&"whichVariable"&chr(34)&"</script>"
  ' записываеться в поток HTML!!!
End Sub
%>


Оптимизированнный вариант setCookie)))

Код

<%
Sub setCookie(whichVariable) ' записываем какашки))))
 %>
   <script language="javascript">document.cookie="<% response.write whichVariable %>"</script>
 <%
End Sub
%>

          А вообще, любой программерЪ долженЪ уметь импровизировать и анализировать, что те советую поделать, ибо эти функции у меня на сайте, чуть по другому написаны))) Так те задачка на эксперемент! Как можно понять, входные данные в запись куки в процедуре setCookie не может содержать двойную ковычку и "//", не трудно догадаться почему... вот советую поэксперементировать с используемыми функциями в функции getCookie (а именно mid и instr) для написания дополнительного кода, для того, чтоб можно было в куки записать и те символы, которые нельзя в приведенном тебе коде))) (используй хотя б циклы, это те подсказка, не говоря про рекурсию smile  )

============================================


P.s. а потом в тексте asp-страницы пиши вызов функций и процедур (но после их обЪявленя!) как и  в простом VBA)))))))))


Код

<%
If getCookie("login")<>"no" then
%>
   <!--html хотя не обязательно!-->
<%
Else
   setCookie("time="&now())
End If
%>



Это сообщение отредактировал(а) DrBoom - 24.5.2007, 08:33
PM MAIL ICQ Jabber   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | ASP | Следующая тема »


 




[ Время генерации скрипта: 0.0570 ]   [ Использовано запросов: 20 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.