网站在线人数以及历史访问人数的统计代码

l来自http://hi.baidu.com/mydelicious/blog/item/22b10d38cb14ef25b8998fbb.html

准备工作1、新建一个TongJi 的数据库，添加一个 tongji 的表，在表中有一个 Number 的字段，为 int 类型，Numger初值为1000；2、新建一个网站；3、新建数据库连接字符串（<connectionStrings> <add name="TongJiConnectionString" connectionString="Data Source=.;Initial Catalog=TongJi;Integrated Security=True" providerName="System.Data.SqlClient"/> </connectionStrings>

关键代码 4、添加新项/全局应用程序类：Global.asax ,其文件的全部代码如下：

<%@ Application Language="C#" %>

<%@ Import Namespace="System.Data.SqlClient" %>

{

// 在应用程序启动时运行的代码

SqlConnection con = new SqlConnection();

con.ConnectionString = ConfigurationManager.ConnectionStrings["TongJiConnectionString"].ConnectionString;

con.Open();

SqlCommand cmd = new SqlCommand("select * from tongji", con);

int count = Convert.ToInt32(cmd.ExecuteScalar());

con.Close();

Application["total"] = count;

Application["online"] = 0; }

void Application_End(object sender, EventArgs e)

{ // 在应用程序关闭时运行的代码

SqlConnection con = new SqlConnection(); con.ConnectionString=ConfigurationManager.ConnectionStrings["TongJiConnectionString"].ConnectionString;

con.Open();

SqlCommand cmd = new SqlCommand("update tongji set Number=" + Application["total"].ToString(), con);

cmd.ExecuteNonQuery();

con.Close(); }

void Application_Error(object sender, EventArgs e)

{ // 在出现未处理的错误时运行的代码 }

void Session_Start(object sender, EventArgs e)

{ // 在新会话启动时运行的代码 Application.Lock();

Application["total"] = (int)Application["total"] + 1;

Application["online"] = (int)Application["online"] + 1;

Application.UnLock(); }

void Session_End(object sender, EventArgs e)

{ // 在会话结束时运行的代码。

Application.Lock();

Application["online"] = (int)Application["online"] - 1;

Application.UnLock(); }

</script>

运行测试5、

拖两个Lable 到 Default.ASPx 上；

6、其Default.ASPx.cs 代码如下： public partial class _Default : System.Web.UI.Page

{ protected void Page_Load(object sender, EventArgs e)

{

this.Label1.Text = "总访问人数" + Application["total"].ToString();

this.Label2.Text = "当前在线数" + Application["online"].ToString();

}

7、OK！！启动调试。

注意事项8、我在VS2005中调试进行时，显示：总访问人数为1001；当前在线数1当; 我重新打开另外一个IE，并把地址Copy过去，这时显示：总访问人数为1002；当前在线数2; 这说明一切正常。但数据库中仍然为1000,？？？？？？我就是在这里让耽误了很多的时间(一天)，但在我绝望时,我多试了一次，然而，这一次上天意给了我意外的恩赐。这时，我在VS2005中，"文件"菜单，选择“保存Global”；此时，数据库中的1000才更新为1002。如果在I I S 中调试也一样，要正常关机或停掉WWW服务才将数据一性写进数据库。