DbfWebServer. Способ эффективной работы с таблицами DBFв среде Интернет. А. Шевелёв
Чтение книги онлайн.

Читать онлайн книгу DbfWebServer. Способ эффективной работы с таблицами DBFв среде Интернет - А. Шевелёв страница 9

СКАЧАТЬ width=100% cellpadding=0 cellspacing=0> <tr bgcolor= c0c0c0> <td>

      <b> <a target=A href=naiarm001.html>

      АРМ: ] +HB_oemToAnsi (NAIARM00-> (FieldGet (3))) + [

      <tr bgcolor=e0e0e0> <td> <table> <tr bgcolor=c0d0c0>

      <form name=F target=_top action=rezzak00.html method=get>

      <td> <input name=karbeg onfocus=kS () onkeydown=kD(event.keyCode) onkeyup=kU(event.keyCode)>

      <td> <input type=hidden name=R>

      </td> </form>

      <td> <a target=A href=karbeg001.html? V_karbeg:=«»> Home </a> &nbsp;

      <td> <a target=A href=karbeg001.html? kC:=33> PgUp </a> &nbsp;

      <td> <a target=A href=karbeg001.html? kC:=34> PgDn </a> &nbsp;

      <td> <a target=A href=karbeg001.html? maxele – > – </a> &nbsp;

      <td> <a target=A href=karbeg001.html? maxele++> ++ </a> &nbsp;

      </table>

      <tr> <td bgcolor=c0c0c0 height=4>

      <tr> <td height=100% width=100%>

      </table>

      <script> F.karbeg.focus ();

      function kD (kC) {

      kV=F.karbeg.value;

      if(F.R.value==’l’) {return;}

      F.R.value=’l’;

      if(kC==38){parent.parent.A.location.href='karbeg001]+O_karbeg+[.html? R_karbeg – ';}

      else if(kC==40){parent.parent.A.location.href='karbeg001]+O_karbeg+[.html? R_karbeg++';}

      else if(kC==33){parent.parent.A.location.href='karbeg001]+O_karbeg+[.html? kC:='+kC;}

      else if(kC==34){parent.parent.A.location.href='karbeg001]+O_karbeg+[.html? kC:='+kC;}

      else if(kC==35){parent.parent.A.location.href='karbeg001]+O_karbeg+[.html? kC:='+kC;}

      else if(kC==36){parent.parent.A.location.href='karbeg001]+O_karbeg+[.html? R_karbeg:=1»; }

      else if (kC==27) {parent.parent.location.href='index.html’;}

      }

      function kU(kC){window.status=kC;

      kV=F.karbeg.value;

      if(kC==120){location.href='imagix0021.html’;}

      else if(kC>40){parent.parent.A.location.href='karbeg001]+O_karbeg+[.html? kC:='+kC+», V_karbeg:=«»+kV+«"»; }

      else if(kC==8){parent.parent.A.location.href='karbeg001]+O_karbeg+[.html? V_karbeg:=«»+kV+«"»; }

      }

      function kS(){parent.parent.A.location.href='karbeg001]+O_karbeg+[.html’;}

      </script>

      ]

      На что следует обратить внимание здесь? Элемент управления строится с помощью HTML разметки формы ввода

      <form name=F target=_top action=rezzak00.html method=get>

      <td> <input name=karbeg onfocus=kS () onkeydown=kD(event.keyCode) onkeyup=kU(event.keyCode)>

      <td> <input type=hidden name=R>

      </td> </form>

      Для организации механизма управления списком определены функции обработки событий:

      – получение фокуса формой onfocus=kS ();

      – нажатие клавиши в поле ввода onkeydown=kD(event.keyCode);

      – отжатие клавиши в поле ввода onkeydown=kU(event.keyCode).

      При нажатии клавиши <ENTER> вызывается форма rezzak00.html и осуществляется переход к другому списку со всеми вытекающими отсюда последствиями.

      Форма содержит вспомогательное поле R. С помощью этого поля регулируется скорость нажатия клавиш управления списком. Это поле, например, блокирует бесконечное нажатие одной клавиши без перевывода информации на экране.

      Поле karbeg является активным, в нем принимаются нажатия всех клавиш и затем соответствующим образом обрабатываются.

      Активное поле ввода нужно, в первую очередь, для отслеживания нажатия клавиш с целью:

      – передвижения по списку;

      – ввода ключевого слова поиска;

      – выполнения команды.

      Обработка нажатия клавиш осуществляется с помощью кода, написанного на языке JavaScript.

      Блок этого скрипта следующий:

      <script> F.karbeg.focus ();

      function kD (kC) {

      kV=F.karbeg.value;

      if(F.R.value==’l’) {return;}

      F.R.value=’l’;

      if(kC==38){parent.parent.A.location.href='karbeg001]+O_karbeg+[.html? R_karbeg – ';}

      else if(kC==40){parent.parent.A.location.href='karbeg001]+O_karbeg+[.html? R_karbeg++';}

      else if(kC==33){parent.parent.A.location.href='karbeg001]+O_karbeg+[.html? kC:='+kC;}

      else СКАЧАТЬ