时间警告器

- 中国WEB开发者网络 (http://www.webasp.net)
-- 网页特效 (http://www.webasp.net/javascript/)
--- 时间警告器 (http://www.webasp.net/javascript/1/687.htm)
-- 发布日期： 2005-06-29
<!-- 网页特效代码由[中国WEB开发者网络:http://www.ChinaWebDev.com]提供！ -->
<!-- 要实现此效果需要 2 个步骤： -->

<!-- 第 1 步： -->
<!-- 把<BODY>中的属性代码改为： -->

<BODY bgcolor="#fef4d9" onload=startclock();>



<!-- 第 2 步： -->
<!-- 把下面的代码加到<BODY></BODY>区域中： -->

<SCRIPT language=JavaScript>
set = null
var timerID = null
var timerRunning = false
function stopclock() {
if(timerRunning)
clearTimeout(timerID)
timerRunning = false
}
function startclock() {
stopclock()
showtime()
}
function showtime(){
var now = new Date()
var hours = now.getHours()
var minutes = now.getMinutes()
var seconds = now.getSeconds()
var timeValue = "" + ((hours > 12) ? hours - 12 : hours)
timeValue += ((minutes < 10) ? ":0" : ":") + minutes
timeValue += ((seconds < 10) ? ":0" : ":") + seconds
timeValue += (hours >= 12) ? " PM" : " AM"
document.alert.time.value = timeValue
if(timeValue == set) {alert(message);}
timerID = setTimeout("showtime()",1000)
timerRunning = true
}
function setalert() {
set = prompt("设置警告时间\n请输入标准格式的时间---0:00:00 AM/PM .\n例如： 11:01:00 AM \n ","");
document.alert.set.value = set
setmess()
}
function setmess() {
message = prompt("设置警告信息\n 如：别忘了你上网已经快一个小时了.","");
document.alert.message.value = message
}
function about() {
alert("时间警告器\n (webmaster@javascript2000.com) [http://1stscript.com]");
}
function quit() {
if(confirm("确定吗？还是多呆一会吧...")) {
about()
close()
}
}
</SCRIPT>
<FORM name=alert>
<TABLE border="3" cellpadding="2" cellspacing="0">
<TBODY>
<TR>
<TD ><b>现在时间 - </b></TD>
<TD>
<INPUT name=time size=10 value="00:00 ?M">
</TD>
</TR>
<TR>
<TD ><b>警告时间 - </b></TD>
<TD>
<INPUT name=set size=10 value="00:00 AM">
</TD>
</TR>
<TR>
<TD ><b>警告信息 - </b></TD>
<TD>
<INPUT name=message size=30 value=None>
</TD>
</TR>
<TR>
<TD>
<INPUT onclick=setalert() type=button value="设置警告时间">
</TD>
<TD>
<INPUT onclick=setmess() type=button value="设置警告信息">
</TD>
</TR>
<TR>
<TD>
<INPUT onclick=about() type=button value=关于>
</TD>
<TD>
<INPUT onclick=quit() type=button value=退出>
</TD>
</TR>
</TBODY>
</TABLE>
</FORM>

webasp.net