推薦:如何提高自己的編程水平有成功的喜悅,也有失敗的痛苦,但總不敢稱自己是高手,因?yàn)楹臀倚哪恐姓嬲母呤謧儽绕饋恚差的太遠(yuǎn)。世界上并沒有成為高手的捷徑,但一些基本原則是可以遵循的。
1. 扎實(shí)的基礎(chǔ)。
數(shù)據(jù)
ASP實(shí)現(xiàn)帶進(jìn)度條的測(cè)試網(wǎng)速。
把下列代碼存為.ASP的文件,放在你的服務(wù)器上就可以直接運(yùn)行了。
以下為引用的內(nèi)容:
<% Response.Expires = 0 Response.Expiresabsolute = Now() - 1 Response.AddHeader "pragma","no-cache" Response.AddHeader "cache-control","private" Response.CacheControl = "no-cache" %><html> <head> <title>網(wǎng)速測(cè)試-建站學(xué)-www.jzxue.com</title> <meta http-equiv="content-type" content="text/html; charset=gb2312"> <body style="cursor:wait;"> <p style="font-size:18pt;"><B>網(wǎng)速測(cè)試</B></p> <p id="t" style="font-size:16pt;">正在測(cè)試,請(qǐng)稍候...</p> <span style="width:300;height:16px;background-color:gray;"><span id="p" style="width:0;height:16px;background-color:red;"></span></span> <script language="javascript">st = new Date();function $(p){document.getElementById("t").innerHTML="正在測(cè)試,請(qǐng)稍候...(" p "%)";document.getElementById("p").style.width=p*3;}</script> <% defaultfs = 200 '數(shù)據(jù)默認(rèn)大小(K) minfs = 100 '數(shù)據(jù)最小值 maxfs = 500 '數(shù)據(jù)最高值 fs = Request("s") if len(fs) = 0 or isnumeric(fs) = false then fs = defaultfs if int(fs) > maxfs then fs = maxfs if int(fs) < minfs then fs = minfs//jzxue.com for a=1 to fs%><!--$%^)!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()!@#$%^&*()--><script language=javascript>$(<%=int(a*100/fs)%>)</script><%next%> <script language=javascript> et=new Date();ds=<%=fs%>;s=Math.round(ds*1000/(et-st)*10)/10;document.body.style.cursor='default'; nextsize=<%=fs%>;if(s>100){nextsize=<%=maxfs%>;}else if(s<20){nextsize=<%=minfs%>;} document.getElementById("t").innerHTML="測(cè)試完畢。您的速度:<font color='red'>" s "</font>(K/秒) [<a href='?s=" nextsize "&t=" Math.random() "'>重測(cè)</a>]";</script>//jzxue.com </body> </html>
|
分享:精彩:ASP遺留的二十大積習(xí)在技術(shù)更新的進(jìn)程中, 仍然有一些人死抱著已經(jīng)過了氣的東西不放. 也有一些人雖然進(jìn)入到新的世界, 但仍擺脫不了陳舊的習(xí)慣. 我沒有用”陋習(xí)”這個(gè)詞, 因?yàn)槲覍?duì)這個(gè)詞也非常反感.
新技