<%FunctionDownloadTime(intFileSize,strModemType)DimTimeInSeconds,ModemSpeed,strDownloadTime,AppendStringDimintYears,intWeeks,intDaysDimintHours,intMinutes,intSecondsintYears=0intWeeks=0intDays=0intHours=0intMinutes=0intSeconds=0strDownloadTime=""SelectCasestrModemTypeCase"Cable" ModemSpeed=4...

<%DimvarInitial_TimevarInitial_Time=TimerResponse.Write"Initial_Time=["&varInitial_Time&"]<br>"%><%ForI=1to10Response.write"随风起舞(www.intels.net)时尚咨询的个人网站欢迎您!"&I&"<br>"Next%> <br>您一共循环了显示了<%=(I-1)%>次.<br><%DimvarFinal_TimevarFinal_Time...

<%DimobjCMFUDimstrModifiedSetobjCMFU=Server.CreateObject("CM_FileUtils.GetProperty")'创建对象并赋给变量，并且GetProperty类是当前唯一可用的.strModified=objCMFU.LastModified'检索并返回包含最后修改日期和时间（LastModifiedfunction）值.当然了,还要考虑到出错的可能. SetobjCMFU=Nothing'清空.%><%IfstrModified="Error!"Then%>对不起,出错了!<%Else%>...