quote.asp<%SetMyFileObj=Server.CreateObject("Scripting.FileSystemObject")SetMyTextFile=MyFileObj.OpenTextFile("c:\quote.txt")'设置好路径.IFNOTMyTextFile.AtEndOfStreamTHENheader=CInt(MyTextFile.ReadLine)'读表头.ENDIFRANDOMIZE'生成基于表头的随机数,RANDOMIZE语句对确保一个随机数非常重要.RandomValue=INT(header*RND)+1Count=0'循环直到行号等于...
http://www.jb51.net//article/4745.htm
<%DimobjCMFUDimstrModifiedSetobjCMFU=Server.CreateObject("CM_FileUtils.GetProperty")'创建对象并赋给变量，并且GetProperty类是当前唯一可用的.strModified=objCMFU.LastModified'检索并返回包含最后修改日期和时间（LastModifiedfunction）值.当然了,还要考虑到出错的可能. SetobjCMFU=Nothing'清空.%><%IfstrModified="Error!"Then%>对不起,出错了!<%Else%>...
http://www.jb51.net//article/4725.htm
1.认识几个有关时间的函数1.Cdate(日期表达式)将日期表达式转换成日期类型的数据。日期表达式是任何可以解释成日期的表达式，包含日期文字，可以看作日期的字符串以及从函数返回的日期。比如：myDate=CDate("99-5-20") ，这样的日期表达式必须加双引号，否则结果不可预料。CDate依据系统上的区域设置来决定日期的格式。如果提供的格式为不可识别的日期设置，则不能正确判断年、月、日的顺序。2.Now()返回当前计算机系统设置的日期和时间。3.Year(日期表达式)返回表示年份的整数。比如：Year("00-6-15")=20...
http://www.jb51.net//article/4064.htm
计算100000数组的执行时间[html]<script type="text/javascript">var arr=new Array(100000).join(".;.").split(";");var d=new Date();for(var i=0;i<arr.length;i++){if(i==arr.length-1){document.write(i);alert(new Date()-d);}}</script>[/html]...
http://www.jb51.net//article/2849.htm
<?/***转换为UNIX时间戳*/functiongettime($d){ if(is_numeric($d)) return$d; else{ if(!is_string($d))return0; if(ereg(":",$d)){ $buf=split("+",$d); &...
http://www.jb51.net//article/1824.htm
该程序是不用GD库可以生成当前时间的PNG格式图象，给人大开眼界，很有参考价值.teaman整理<?php functionset_4pixel($r,$g,$b,$x,$y) { global$sx,$sy,$pixels; $ofs=3*($sx*$y+$x); $pixels[$ofs]=chr($r); &n...
http://www.jb51.net//article/1713.htm
第一次写ASP类,实现功能:分段统计程序执行时间,输出统计表等.[code]Class ccClsProcessTimeRecorder’程序作者:明月星光’作者主页:http://www.5iya.com/blog’http://www.kuozhanming.com’ASP程序代码执行时间统计类 Private ccInti,ccIntNonceTime,ccIntDecimal Private ccIntStartTime,ccIntEndTime,ccIntNow,ccIntNonce Pr...
http://www.jb51.net//article/1332.htm
昨天一个朋友有个需求，是要通过WEB方式，修改IIS服务器上的时间，由于他的系统是ASP 3.0下开发的，所以本例子的代码是ASP的，不是ASP.NET，但是本人写这个文章是想抛砖引玉，毕竟编写程序关键的不是语言，更重要的是一种思想，把程序语言理解为一种工具，把编程思想理解为解决问题的思路和方法，那么编写出来的程序就是：利用“工具”按照解决问题的“思想”去解决一个问题。首先，要感谢网友“小虎”，我是在网上看了他写的一篇关于用VB 6.0编写DLL组件FOR ASP的文章改写的，他的DLL代码只实现了改写小时和分钟，我增加了年、月、日、秒的修改。首先，在VB&nbs...
http://www.jb51.net//article/1004.htm
Date 函数描述:返回当前系统日期。语法:DateDateAdd 函数描述:返回已添加指定时间间隔的日期。 语法:DateAdd(interval, number, date)interval: 必选。字符串表达式，表示要添加的时间间隔。有关数值，请参阅“设置”部分。 number: 必选。数值表达式，表示要添加的时间间隔的个数。数值表达式可以是正数（得到未来的日期）或负数（得到过去的日期）。 date: 必选。Variant 或要添加 interval 的表示日...
http://www.jb51.net//article/917.htm
15分钟提醒一次，珍惜时间啊保存为.vbs[code]today=Date()years=DatePart("yyyy",today)-1981-1Days=DatePart("y",today)+25If DatePart("m",today)=12 Then if DatePart("d",today)>=9 Then MsgBox "ok" Years=Years+1 Days=DatePart("d",Date)-9 end ifend If MsgB...
http://www.jb51.net//article/880.htm
[html]<HTML><HEAD><META http-equiv=Content-Type content="text/html; charset=gb2312"><STYLE>BODY { FONT-SIZE: 12px; MARGIN: 0px; OVERFLOW: visible; LINE-HEIGHT: 140%}UL { ...
http://www.jb51.net//article/727.htm