Пример P3.

Разработать страницу Login.csp, позволяющую проверять ввод пароля.

По кнопке “Ввод” проверяется ввод пароля, при этом работает серверный метод. Если пароль неверный, то выдается сообщение. На событие onClick кнопки «Ввод» назначен обработчик события – серверный метод “CheckPassword”. Код страницы имеет вид:

< BODY>

< form name=" Log" >

Ваше имя: < input type=" TEXT" name=" Name" > < br>

Пароль: < input type=" password" name=" psw" > < br>

< input type=" button" value=" Ввод" onClick=" #server(..CheckPassword(

self.document.Log.Name.value,

self.document.Log.psw.value))#" >

< /form>

< /BODY>

<! -- Cache-код -- >

< script language=" Cache" Method=" CheckPassword"

arguments=" name: %String, psw: %String" >

if psw=" password"

{ & javascript< alert(" пароль верен"); > }

else

{ & javascript< alert(" пароль не верен"); > }

< /script>

Пример P4. Калькулятор.

Требуется создать простой калькулятор, рассчитанный на четыре арифметические операции. На событие onClick кнопки «Сумма» назначен обработчик события, серверный метод«Calculate». Код данной страницы имеет вид:

< BODY>

< h3> Калькулятор < /h3>

< form name=" Calc" >

Число 1: < input type=" text" name=" d1" value=" 0" > < br>

Операция: < select name=" sp" size=" 1" >

< option value=" +" > +

< option value=" -" > -

< option value=" *" > *

< option value=" /" > /

< /select> < br> < br>

Число 2: < input type=" text" name=" d2" value=" 0" > < br>

Результат: < input type=" text" name=" Rez" > < br> < br>

< input type=" Button" value=" Выполнить"

onClick=" #server(..Calculate(self.document.Calc.sp.value,

self.document.Calc.d1.value,

self.document.Calc.d2.value))#" >

< /form>

< /BODY>

< script language=" Cache" Method=" Calculate"

Arguments=" sp: %String, d1: %Integer, d2: %Integer" >

if sp=" /", d2=0

{ & javascript< alert('нельзя делить на ноль'); >

Quit

}

else

{set sum=$Select(sp=" +": d1+d2, sp=" -": d1-d2,

sp=" *": d1*d2, sp=" /": d1/d2)}

& javascript< self.document.Calc.Rez.value=#(sum)#; >

< /script>

Теги CSP

Теги Caché имеют следующий общий синтаксис:

< CSP: XXX …>

где ХХХ – это имя тега. Теги обеспечивают разнообразные функциональные возможности. В табл. 4.1 приведен перечень основных тегов:

Таблица 5.1.