Аналоговий годинник

March 28th, 2009 by


« Вставка властивостей анімації руху   |   Ефект друкарської машинки »


Set Variable: “h” = h - 12

End If

Set Variable: “HourAngle” = h*30 + m/2

Set Variable: “MinuteAngle” = m*6

Set Property (”HourHandMovie”, Rotation) = HourAngle

Set Property (”MinuteHandMovie”, Rotation) = MinuteAngle

Крок 6

Цей код переводить значення годинника і хвилин в кути в градусах і міняє властивість Rotation кліпів стрілок відповідно до отриманих кутів.

Навчальні матеріали - Аналоговий годинник

Крок 7

Ось структура файлу clock.asp , який надає значення годинника і хвилин нашому годиннику.
<%@Language = "VBScript"%>

<%

Option Explicit

Response.Buffer = True

Response.Expires = -1000

Response.Write “Hour=” & Hour(Now)& “&Minute=” & Minute(Now)

Response.Flush

%> Наш годинник готовий!

Джерело: web-silver.ru


Tags: , , , , , ,

Навчальні матеріали


Схожі записи