<tr id="wy22y"></tr>
global.asa ---------------------------------------------------------------------- <script language="c#" runat="server"> void Session_OnStart(){ Application.Lock(); Application["whoson"]=Convert.ToInt32(Application["whoson"])+1; Application.UnLock(); } void Session_OnEnd(){ Application.Lock(); Application["whoson"]=Convert.ToInt32(Application["whoson"])-1; Application.UnLock(); } public void Application_OnStart(){ Application.Lock(); Application["whoson"]=0; Application.UnLock(); } </script> ------------------------------------------------------------------------- count_txt.asp ------------------------------------------------------------------------- <%@ Page language="C#"%> <%@ Import Namespace="System.IO"%> <Script language="C#" runat="server"> public void Page_Load(Object src,EventArgs e) { //以下為讀取文件,當前目錄必須有count.txt這個文件否則會出錯 StreamReader sr=File.OpenText(Server.MapPath(".")+"\\count.txt"); Application.Lock(); Application["count"]=sr.ReadLine(); Application["count"]=Convert.ToInt32(Application["count"])+1; Application.UnLock(); sr.Close(); //建立文件 StreamWriter rw=File.CreateText(Server.MapPath(".")+"\\count.txt"); Application.Lock(); rw.WriteLine(Application["count"]); Application.UnLock(); rw.Flush(); //寫入 rw.Close(); count_1.Text="您是本站第"+Application["count"].ToString()+"位訪問者"; } </Script> <html> <head> </head> <body> <hr> <asp:Label ID="count_1" runat="server"/> </body> </html> global.asax文件與文本記數(shù)器的一樣，在此省略； 在images目錄中需要有0-9.gif十張圖片，同樣當前目錄需要有count.txt這個文件，否則會出錯 count_pic.aspx ----------------------------------------------------------------------------------- <%@ Page Language="C#" ContentType="text/html" ResponseEncoding="gb2312" %> <%@ Import Namespace="System.IO"%> <script Language="C#" runat="server"> public void Page_Load(Object src,EventArgs e) { //以下為讀取文件 StreamReader sr=File.OpenText(Server.MapPath(".")+"\\count.txt"); Application.Lock(); Application["count"]=sr.ReadLine(); Application["count"]=Convert.ToInt32(Application["count"])+1; Application.UnLock(); sr.Close(); //建立文件 StreamWriter rw=File.CreateText(Server.MapPath(".")+"\\count.txt"); Application.Lock(); rw.WriteLine(Application["count"]); Application.UnLock(); rw.Flush(); //寫入 rw.Close(); } public string G(int counter) { string myimage=""; string S=counter.ToString(); //strreplace=replace(strreplace,chr[92]); for(int i=0;i<=S.Length-1;i++) { myimage =myimage+"<img src=./images/"+S.Substring(i,1)+".gif>"; } return myimage; } </script> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <title>圖形記數(shù)器</title> </head> <body> <%=G(Convert.ToInt32((Application["count"])))%> </body> </html>
global.asa ---------------------------------------------------------------------- <script language="c#" runat="server"> void Session_OnStart(){ Application.Lock(); Application["whoson"]=Convert.ToInt32(Application["whoson"])+1; Application.UnLock(); } void Session_OnEnd(){ Application.Lock(); Application["whoson"]=Convert.ToInt32(Application["whoson"])-1; Application.UnLock(); } public void Application_OnStart(){ Application.Lock(); Application["whoson"]=0; Application.UnLock(); } </script> ------------------------------------------------------------------------- count_txt.asp ------------------------------------------------------------------------- <%@ Page language="C#"%> <%@ Import Namespace="System.IO"%> <Script language="C#" runat="server"> public void Page_Load(Object src,EventArgs e) { //以下為讀取文件,當前目錄必須有count.txt這個文件否則會出錯 StreamReader sr=File.OpenText(Server.MapPath(".")+"\\count.txt"); Application.Lock(); Application["count"]=sr.ReadLine(); Application["count"]=Convert.ToInt32(Application["count"])+1; Application.UnLock(); sr.Close(); //建立文件 StreamWriter rw=File.CreateText(Server.MapPath(".")+"\\count.txt"); Application.Lock(); rw.WriteLine(Application["count"]); Application.UnLock(); rw.Flush(); //寫入 rw.Close(); count_1.Text="您是本站第"+Application["count"].ToString()+"位訪問者"; } </Script> <html> <head> </head> <body> <hr> <asp:Label ID="count_1" runat="server"/> </body> </html>
global.asax文件與文本記數(shù)器的一樣，在此省略； 在images目錄中需要有0-9.gif十張圖片，同樣當前目錄需要有count.txt這個文件，否則會出錯 count_pic.aspx ----------------------------------------------------------------------------------- <%@ Page Language="C#" ContentType="text/html" ResponseEncoding="gb2312" %> <%@ Import Namespace="System.IO"%> <script Language="C#" runat="server"> public void Page_Load(Object src,EventArgs e) { //以下為讀取文件 StreamReader sr=File.OpenText(Server.MapPath(".")+"\\count.txt"); Application.Lock(); Application["count"]=sr.ReadLine(); Application["count"]=Convert.ToInt32(Application["count"])+1; Application.UnLock(); sr.Close(); //建立文件 StreamWriter rw=File.CreateText(Server.MapPath(".")+"\\count.txt"); Application.Lock(); rw.WriteLine(Application["count"]); Application.UnLock(); rw.Flush(); //寫入 rw.Close(); } public string G(int counter) { string myimage=""; string S=counter.ToString(); //strreplace=replace(strreplace,chr[92]); for(int i=0;i<=S.Length-1;i++) { myimage =myimage+"<img src=./images/"+S.Substring(i,1)+".gif>"; } return myimage; } </script> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <title>圖形記數(shù)器</title> </head> <body> <%=G(Convert.ToInt32((Application["count"])))%> </body> </html>
溫馨提示：喜歡本站的話，請收藏一下本站！
本站發(fā)布的Win7純凈版系統(tǒng)、Win10純凈版和XP純凈版系統(tǒng)僅為個人學習測試使用，請在下載后24小時內(nèi)刪除，不得用于任何商業(yè)用途，否則后果自負，請支持購買微軟正版軟件！
本站所有資源全部來自于網(wǎng)絡資源,如侵犯到您的權(quán)益,請及時通知我們(),我們會及時處理.
Copyright © 2018-2020 蘿卜系統(tǒng)下載站 手機站 關(guān)于本站
![Asp.Net中的記數(shù)器[初級]](http://img.luoboxitong.cn/upload/noimg.jpg)