2017-10-25
308
</b></P>
<br>
<left>
<table border="1">
<tr>
<td valign="top"width="30%"><font size="4"><strong>Примеры парольных фраз:</strong></font></td>
<td valign="top" width="30%">
<select ID=ListBox size="1">
<option value=1>Прошлого не вытравить,не выкрасть.
<option value=2>Растерять легко по пустякам.
<option value=3>Быть самым-самым первым.
<option value=4>За призванье надо биться.
<option value=5>Произность чужие мысли вслух.
<option value=6>Друзей без вниманья оставить нельзя.
<option value=7>Мой дом-моя крепость!
</select>
</td>
</tr>
<tr>
<td valign="top"><font size="4"><strong>Парольная фраза:</strong></font></td>
<td valign="top"><input type="text" size="43" name="Edit1"></td>
</tr>
<tr>
<td valign="top"><font size="4"><strong>Данные для передачи в канал связи:</strong></font></td>
<td valign="top"><input type="text" size="43" name="Edit2"></td>
</tr>
<tr>
<td valign="top" width="30%"><font size="4"><strong>Парольная фраза переданная по каналу связи:</strong></font></td>
|
|
|
<td valign="top" width="30%"><input type="text" size="43" name="Edit6"></td>
<td valign="top"width="30%" ><input type="text" size="43" name="Edit8"></td>
</tr>
<tr>
<td valign="top" width="35%">
<input type="button" name="Button1" value="Обработать данные кодом Хэмминга">
</td>
<td valign="top"width="35%">
<input type="button" name="Button2" value="Передать по каналу связи без ошибок">
</td>
<td valign="top" width="35%">
<input type="button" name="Button3" value="Передать по каналу связи с N ошибками">
</td>
</tr>
<tr>
<td valign="top"><font size="4"><strong>Количество ошибок в канале связи (N):</strong></font></td>
<td valign="top"><input type="text" size="5" name="Edit3"></td>
</tr>
<tr>
<td valign="top"><font size="4"><strong>Количество исправленных ошибок:</strong></font></td>
<td valign="top"><input type="text" size="5" name="Edit4"></td>
</tr>
<tr>
<td valign="top"><font size="4"><strong>Количество ошибок контрольных разрядов:</strong></font></td>
<td valign="top"><input type="text" size="5" name="Edit5"></td>
</tr>
<tr>
<td valign="top"><font size="4"><strong>Восстановленная парольная фраза:</strong></font></td>
<td valign="top"><input type="text" size="43" name="Edit7"></td>
</tr>
<tr>
<td valign="top"><input type="button" name="Button4" value="Востановить данные"></td>
<td>
<marquee ID=idMrq01 scrollAmount=5 direction="right"
OnMouseOver="VBScript:idMrq01.scrollAmount=0"
OnMouseOut="VBScript:idMrq01.scrollAmount=4">
<img src="d:\lab5\list3\orb1.gif" border=0>
<img src="d:\lab5\list3\orb1.gif" border=0>
|
|
|
<img src="d:\lab5\list3\orb1.gif" border=0>
<img src="d:\lab5\list3\orb1.gif" border=0>
<img src="d:\lab5\list3\orb1.gif" border=0>
</marquee>
</td>
<td>
<marquee ID=idMrq02 scrollAmount=5 direction="right"
OnMouseOver="VBScript:idMrq02.scrollAmount=0"
OnMouseOut="VBScript:idMrq02.scrollAmount=4">
<img src="d:\lab5\list3\orb2.gif" border=0>
<img src="d:\lab5\list3\orb2.gif" border=0>
<img src="d:\lab5\list3\orb2.gif" border=0>
<img src="d:\lab5\list3\orb2.gif" border=0>
<img src="d:\lab5\list3\orb2.gif" border=0>
</marquee>
</td>
</tr>
</table>
</left>
</body>
</html>
Сохранить документ как d:\lab5\list3\Model.html.
11. Запустить файл d:\lab5\list3\Model.html на выполнение (рисунок 4):
 | |||
 | |||
Для запуска элементов управления на всех страницах демонстрационной модели необходимо подключить сценарий выполнения операций – скриптовый сценарий.
Используем для этого язык программирования VBS (Visual Basic Scripting Edition), основанный на языке Visual Basic. Этот язык понимает программа-браузер Internet Explorer.
Подключим скриптовые сценарии во все созданные страницы html.
12. Подключим код для работы формы доступа. Для этого необходимо в Блокноте или Notepad++ открыть исходный код страницы Index.html и добавить следующий фрагмент скрипта в заголовок, то есть между тегами <head> и </head>:
< SCRIPT LANGUAGE="VBScript">
<!--Для работы с несовместимым броузерами
Dim parol,login
