Скрипты
В любой поисковой системе в сети вы сможете найти огромное количество информации
по созданию скриптов и апплетов.(скрипты входят в состав HTML документа являясь
частью его кода, в то время как апплеты являются отдельными файлами, на которые
ссылается WEB страница) Я дам вам несколько адресов в internet с большим количеством
примеров скриптов для самостоятельного изучения:
http://www.gamelan.com
http://www.javaworld.com
http://ibm.com/java/
http://www.javasoft.com
http://javaboutique.com
Самый короткий из известных мне скриптов выглядит так:
<a href="javascript:history.back(1)">Назад.</a>
он работает как стрелочка браузера "Назад"
В качестве наиболее простого из "накрученных"
приведу вам пример часов, написанный на JavaScript (Текст данного примера скопированный
мышью может послужить основой для создания вашего html документа)
<html><head><meta http-equiv="Content-Type"
content="09.html; charset=windows-1251">
<title>Clock</title>
<script language="JavaScript"><!--
function JSClock() {var time = new Date()
var hour = time.getHours()
var minute = time.getMinutes()
var second = time.getSeconds()
var temp = "" + hour
temp += ((minute < 10) ? ":0" : ":") + minute
temp += ((second < 10) ? ":0" : ":") + second
document.clockForm.digits.value = temp
id = setTimeout("JSClock()",1000) }
--></script>
</head><body onLoad="JSClock()">
<form name="clockForm">
<center>Текущее время: <input type="text" name="digits"
size="8" value=""></center>
</form>
Место для остального кода страницы
</body></html>
Для примера VBScript, от меня лично, вам в подарок простейшая
программа- калькулятор.
Программа калькулятор на VBScript
Страничка автора: http://rafick.euro.ru
<script type="text/vbscript">
<!--
Dim a,b,c,d,e,f
sub n0_onclick
a=a+"0"
document.calk.ind.value=a
f=0
end sub
sub n1_onclick
a=a+"1"
document.calk.ind.value=a
f=0
end sub
sub n2_onclick
a=a+"2"
document.calk.ind.value=a
f=0
end sub
sub n3_onclick
a=a+"3"
document.calk.ind.value=a
f=0
end sub
sub n4_onclick
a=a+"4"
document.calk.ind.value=a
f=0
end sub
sub n5_onclick
a=a+"5"
document.calk.ind.value=a
f=0
end sub
sub n6_onclick
a=a+"6"
document.calk.ind.value=a
f=0
end sub
sub n7_onclick
a=a+"7"
document.calk.ind.value=a
f=0
end sub
sub n8_onclick
a=a+"8"
document.calk.ind.value=a
f=0
end sub
sub n9_onclick
a=a+"9"
document.calk.ind.value=a
f=0
end sub
sub point_onclick
if e = 0 then
e=1
a=a+","
document.calk.ind.value=a
end if
end sub
sub plus_onclick
if f=0 then
if c<>0 then
select case c
case 1
d=b-(-a)
case 2
d=b-a
case 3
d=b*a
case 4
d=b/a
end select
document.calk.ind.value=d
a=document.calk.ind.value
c=1
e=0
f=1
end if
b=document.calk.ind.value
a=""
c=1' сложение
e=0
f=1
else
c=1
f=1
end if
end sub
sub minus_onclick
if f=0 then
if c<>0 then
select case c
case 1
d=b-(-a)
case 2
d=b-a
case 3
d=b*a
case 4
d=b/a
end select
document.calk.ind.value=d
a=document.calk.ind.value
c=2
e=0
f=1
end if
b=document.calk.ind.value
a=""
c=2' вычитание
e=0
f=1
else
c=2
f=1
end if
end sub
sub umnog_onclick
if f=0 then
if c<>0 then
select case c
case 1
d=b-(-a)
case 2
d=b-a
case 3
d=b*a
case 4
d=b/a
end select
document.calk.ind.value=d
a=document.calk.ind.value
c=3
e=0
f=1
end if
b=document.calk.ind.value
a=""
c=3' умножение
e=0
f=1
else
c=3
f=1
end if
end sub
sub delen_onclick
if f=0 then
if c<>0 then
select case c
case 1
d=b-(-a)
case 2
d=b-a
case 3
d=b*a
case 4
d=b/a
end select
document.calk.ind.value=d
a=document.calk.ind.value
c=4
e=0
f=1
end if
b=document.calk.ind.value
a=""
c=4' деление
e=0
f=1
else
c=4
f=1
end if
end sub
sub result_onclick
select case c
case 1
d=b-(-a)
case 2
d=b-a
case 3
d=b*a
case 4
d=b/a
end select
document.calk.ind.value=d
a=document.calk.ind.value
c=0
d=""
e=0
end sub
Sub reset_onclick
a=""
b=0
c=0
e=0
document.calk.ind.value=0
d=document.calk.ind.value
End sub
'--></script>
<center>
<h4><font color="blue">Программа калькулятор на VBScript</font></h4>
<table border=2><tr><td>
<form name="calk">
<table border bordercolor="white">
<tr>
<th colspan="4"><input type="text" name="ind" size="9" value="0">
<tr>
<td><input type="button" name="n8" value="8">
<td><input type="button" name="n9" value="9">
<td><input type="button" name="n0" value="0">
<td><input type="button" name="reset" value="с">
<tr>
<td><input type="button" name="n4" value="4">
<td><input type="button" name="n5" value="5">
<td><input type="button" name="n6" value="6">
<td><input type="button" name="n7" value="7">
<tr>
<td><input type="button" name="point" value=" , ">
<td><input type="button" name="n1" value="1">
<td><input type="button" name="n2" value="2">
<td><input type="button" name="n3" value="3">
<tr>
<td><input type="button" name="plus" value="+">
<td><input type="button" name="minus" value="- ">
<td><input type="button" name="delen" value="/ ">
<td><input type="button" name="umnog" value="* ">
<tr>
<td colspan="4"><input type="button" name="result" value=" = ">
</tr></form></table>
</table></center>
Учтите также, что все эти чудеса сильно тормозят медленные машины, поэтому не стоит пихать в одну страницу неимоверное
количество скриптов. Также не советую использовать на одной странице JavaScript
и VBScript одновременно- может конкретно заглючить.
Остается добавить, что в последнее время в сети появилось новое "чудо"
-Flash -симбиоз графики, звука и сценариев в одном флаконе. Целесообразность их
использования при отечественной связи весьма сомнительна потому, что по крайней
мере дома, имея модемную связь около 2,5 кб в сек я никогда не жду их загрузки.
Хотя нет! Один раз я все-же пытался, но через 20 минут скачивания мой комп почему-то
завис. Если вы можете позволить себе выделенную линию ... то Вам меня не понять.
Хотя изучением данной технологии заняться уже пора. На будущее.
Назад | Содержание | Вперед
|