刷新页面时JavaScript随机更换背景图，更换背景选择时背景预览
作者:随然 日期:2009-01-19
有时为了充分展示我们的页面，我们会希望用户每次进入页面时Banner条或者背景图能够是一组随机的图。
有时候在做网页时，你的程序有更换背景的功能，当用户选择另外的背景时，为了让用户能很快很方便的确定他对选择的背景是否喜欢，我们需要做一个背景预览功能。用户选择背景时，网页的背景自动更换。如何实现呢？当然是用JavaScript了，并且非常简便，今天我们就来完整的讨论这个问题。
首先，要达到随机展示目的，我们需要一个随机函数，这里我推荐这个函数：
有时候在做网页时，你的程序有更换背景的功能，当用户选择另外的背景时，为了让用户能很快很方便的确定他对选择的背景是否喜欢，我们需要做一个背景预览功能。用户选择背景时，网页的背景自动更换。如何实现呢？当然是用JavaScript了，并且非常简便，今天我们就来完整的讨论这个问题。
首先，要达到随机展示目的，我们需要一个随机函数，这里我推荐这个函数：
复制内容到剪贴板
程序代码
程序代码以下为JavaScript内容：
//randomizer.Generate random numbers。
rnd.today=new Date();
rnd.seed=rnd.today.getTime();
//randomizer.Generate random numbers。
rnd.today=new Date();
rnd.seed=rnd.today.getTime();
Cookies的设计，时间过期的设计。
作者:随然 日期:2009-01-18
在ASP技术中，Cookie是Response的唯一的一个集合，是Web服务器在用户的浏览器中用来代表用户的令牌。当同一浏览器又一次请求同一Cookie设定的页面时，它将从用户端把上一次从Web服务器中收到的Cookie发送回Web服务器进行数据处理。在实际应用中，Cookie一直起着相当重要的作用，设置Cookie的属性和它的失效期在Cookie的使用中扮演着举足轻重的角色。特别像在一些很重要的场合，比如说在线投票、电子商务中，设置Cookie以及它的失效期是很重要的。
要设置Cookie的失效期可以使用Expires属性。Expires是期满、终止、失效的意思。该属性是只写的，用于设置Cookie的期限，指定Cookie的失效期。没有指定期限的Cookie只能通过浏览器所提供的Cookies功能，将信息暂时存放在用户端，而不能以文件的形式存储到用户的计算机上，当用户关闭该浏览器时，此Cookie自动失效。所以无失效期的Cookie不能跟踪用户的信息。要延长Cookie的生命周期，跟踪用户来访信息，就必须用Expires属性来设置Cookie的失效时间。
在讨论设置Expires属性之前，首先回顾一下ASP技术中表示时间的几个关键字：time 、date 和now。这样做的好处是有利于大家进一步的学习。下面先请大家看一段程序以及它的运行结果：
<html>
<head>
<title>时间测试</title>
要设置Cookie的失效期可以使用Expires属性。Expires是期满、终止、失效的意思。该属性是只写的，用于设置Cookie的期限，指定Cookie的失效期。没有指定期限的Cookie只能通过浏览器所提供的Cookies功能，将信息暂时存放在用户端，而不能以文件的形式存储到用户的计算机上，当用户关闭该浏览器时，此Cookie自动失效。所以无失效期的Cookie不能跟踪用户的信息。要延长Cookie的生命周期，跟踪用户来访信息，就必须用Expires属性来设置Cookie的失效时间。
在讨论设置Expires属性之前，首先回顾一下ASP技术中表示时间的几个关键字：time 、date 和now。这样做的好处是有利于大家进一步的学习。下面先请大家看一段程序以及它的运行结果：
<html>
<head>
<title>时间测试</title>
计算机密码最佳选择与管理技巧
作者:随然 日期:2009-01-15
你是否曾经发现自己的邮箱出了奇怪的问题?你的QQ号码是不是莫名其妙地被盗用过?原因是什么呢?最主要原因的可能就是你的口令选择和保管有问题。
一、口令及其重要性
什么是口令?口令也就是常说的密码，英文名字是Password。在计算机领域尤其是在网络里面，口令可以说是你的钥匙。具体来说口令是让计算机确认你的一种简单方法。日常生活中我们能够根据容貌、声音和笔迹来认出一个人，但是计算机看不到我们、也听不到，至少大部分的计算机是这样的，所以就要口令来帮忙，口令就是计算机和你之间的一个共同秘密。计算机知道了你的用户名，但是它还不能确定就是你。你要提供口令向计算机证明这就是你。如果你的口令被别的人得到了，就好像你所有的钥匙都给了那个人，那后果是不堪设想的。不过，大家不要急，接着往下看，您将会告诉该怎么做。
二、不合适的口令
我不知道你的口令是什么样的形式，这里是常见的几类不合适的口令：
(1)使用用户名本身，如：用户名是Lizhigang，口令还是lizhigang;
一、口令及其重要性
什么是口令?口令也就是常说的密码，英文名字是Password。在计算机领域尤其是在网络里面，口令可以说是你的钥匙。具体来说口令是让计算机确认你的一种简单方法。日常生活中我们能够根据容貌、声音和笔迹来认出一个人，但是计算机看不到我们、也听不到，至少大部分的计算机是这样的，所以就要口令来帮忙，口令就是计算机和你之间的一个共同秘密。计算机知道了你的用户名，但是它还不能确定就是你。你要提供口令向计算机证明这就是你。如果你的口令被别的人得到了，就好像你所有的钥匙都给了那个人，那后果是不堪设想的。不过，大家不要急，接着往下看，您将会告诉该怎么做。
二、不合适的口令
我不知道你的口令是什么样的形式，这里是常见的几类不合适的口令：
(1)使用用户名本身，如：用户名是Lizhigang，口令还是lizhigang;
十种方法 解决电脑出现的无法启动故障
作者:随然 日期:2009-01-15
学习三部曲之三:培养认真的能力
作者:随然 日期:2009-01-15
培养认真的能力
认真是一种能力，不是态度 说认真是一种能力，是针对“认真是态度”的说法而言的。一般，我们都认为认真是一种态度，所以，每次学生表现出不认真时，家长或老师对学生的建议总是“下回认真点！”期待着下回考试的时候，学生会提示自己：“我要认真，我要认真……”于是，学生就认真起来了，并因而考出好成绩来。但这只是一种美好的奢望，学生不会因为这句话而学习好了，这种话对学生来说根本就没用！
人们往往认为，认真是一种态度，而态度是可以短时间“端正”的。当有人态度不认真的时候，就要求他端正态度，认真一点，于是他就会正襟危坐、两眼一瞪，于是就算是认真了。
到我们中心来学习的同学，一般我总会问他们一些问题：
——期中考试考了多少分？
——60来分。
——你觉得你会做的题目有多少分？
——差不多80～90分吧。
——会做的题目是80～90分，为什么只得了60来分？
——粗心呗。
——那么上一回有没有粗心？
——也有。
——是不是从小就是粗心长大的？
——嘿嘿，好像是吧。
学习三部曲之二：快速提高成绩的法宝:学会的三个标准
作者:随然 日期:2009-01-15
学习三部曲之一：学生为什么学习不好？
作者:随然 日期:2009-01-15
ASP给成绩排名(排序)的方法，要求分数相同的成绩名次相同
作者:随然 日期:2009-01-15
在用ASP制作成绩分析系统的时候，用到了很多的ASP函数，但就是没有成绩排名的函数，所以自己写了一个能排名的程序，供大家参考。我也想了几个能分析出一个分数在所有分数中占的位置或名次，想了半天还是觉得下面的办法来得简单一些，运算要快一些。
使用ASP给数据库中的成绩进行排名，要求分数相同的成绩名次相同。
实现思路：将成绩按从大到小排列，第一个数的名次写入1，然后循环，判断第二个数与第一个数是否相等，相等则写入相同的名次，不相等则名次加1，再循环……
使用ASP给数据库中的成绩进行排名，要求分数相同的成绩名次相同。
实现思路：将成绩按从大到小排列，第一个数的名次写入1，然后循环，判断第二个数与第一个数是否相等，相等则写入相同的名次，不相等则名次加1，再循环……
复制内容到剪贴板 程序代码
程序代码<%
'为班级排名
j=0
i=0
thesame=0
Set rs=Server.CreateObject("ADODB.Recordset")
sql="select stu_no,cj_all from student where class_no="&banji&" order by cj_all desc"
rs.open sql,conn,1,1
do while not rs.eof
'如果分数相同，则名次相同。如：两个并列第一名，则没有第二名，下一个为第三名
if rs("cj_all")=thesame then
i=i
j=j+1
else
i=i+j+1
j=0
end if
thesame=rs("cj_all")
sql="update student set cj_banxu="&i&" where stu_no='"&rs("stu_no")&"'"
conn.execute(sql)
rs.movenext
loop
rs.close
%>
'为班级排名
j=0
i=0
thesame=0
Set rs=Server.CreateObject("ADODB.Recordset")
sql="select stu_no,cj_all from student where class_no="&banji&" order by cj_all desc"
rs.open sql,conn,1,1
do while not rs.eof
'如果分数相同，则名次相同。如：两个并列第一名，则没有第二名，下一个为第三名
if rs("cj_all")=thesame then
i=i
j=j+1
else
i=i+j+1
j=0
end if
thesame=rs("cj_all")
sql="update student set cj_banxu="&i&" where stu_no='"&rs("stu_no")&"'"
conn.execute(sql)
rs.movenext
loop
rs.close
%>
