ASP.NET实现简单的聊天室

目录

Default.aspx

Default.aspx.cs

main.aspx

main.aspx

SendMessage.aspx

SendMessage.aspx.cs 

ShowMessage.aspx

ShowMessage.aspx.cs

Users.aspx 

Users.aspx .cs

运行结果


ASP.NET实现简单的聊天室_第1张图片

Default.aspx


    

登陆

用户名: 

Default.aspx.cs

protected void btnLogin_Click(object sender, EventArgs e)
    {
        bool IsChonfu = false;
        if (this.txtUsername.Text.Trim().Length < 1)
        {
            lblTs.Visible = true;
        }
        else
        {
            string UserIp = Request.UserHostAddress.ToString();
            Session["User"] = this.txtUsername.Text.Trim();
            string UserInfo = this.txtUsername.Text.Trim() + "--" + UserIp;
            ArrayList UserList;
           
            if (Application["UserList"] == null)
            {
                UserList = new ArrayList();
                UserList.Add(UserInfo);
                Application["UserList"] = UserList;
                Response.Redirect("main.aspx");
            }
            else
            {
                
                UserList = (ArrayList)Application["UserList"];
                
                for (int i = 0; i 

main.aspx




    聊天室主页
    



    

main.aspx

    protected void Page_Load(object sender, EventArgs e)
    {
        if (Session["User"] == null)
        {
            Response.Redirect("Default.aspx");
        }
    }

SendMessage.aspx


    

发送消息  

SendMessage.aspx.cs 

 protected void Page_Load(object sender, EventArgs e)
    {
        if (Session["User"] == null)
        {
            Response.Redirect("Default.aspx");
        }

    }
    protected void btnSend_Click1(object sender, EventArgs e)
    {
        ArrayList MessageList = new ArrayList();
        string SendUser = Session["User"].ToString();
        string SendMessage = this.txtMessage.Text;
        string SendTime = DateTime.Now.ToString();
        string Message = SendUser + "于" + SendTime + "说:" + SendMessage + "

"; if (Application["MessageList"] == null) { MessageList.Add(Message); Application["MessageList"] = MessageList; } else { MessageList = (ArrayList)Application["MessageList"]; MessageList.Add(Message); Application["MessageList"] = MessageList; } this.txtMessage.Text = ""; this.txtMessage.Focus(); } protected void btnDeleteMessage_Click(object sender, EventArgs e) { Application.Remove("MessageList"); } protected void btnDeleteUsers_Click1(object sender, EventArgs e) { Application.Remove("UserList"); Response.Redirect("Default.aspx"); }

ShowMessage.aspx



    聊天室
     


    
    
<% ArrayList MessageList = new ArrayList(); if(Application["MessageList"]==null) { Response.Write("暂无聊天信息"); } else { MessageList = (ArrayList)Application["MessageList"]; for(int i=0;i

ShowMessage.aspx.cs

    protected void Page_Load(object sender, EventArgs e)
    {
        if (Session["User"] == null)
        {
            Response.Redirect("Default.aspx");
        }
    }

Users.aspx 


    
      用户列表

<% ArrayList UserList = new ArrayList(); if(Application["UserList"]==null) { Response.Write("暂无用户"); } else { UserList = (ArrayList)Application["UserList"]; for(int i = 0; i < UserList.Count; i++) { Response.Write(UserList[i] + "

"); } } %>


Users.aspx .cs

    protected void Page_Load(object sender, EventArgs e)
    {
        if (Session["User"] == null)
        {
            Response.Redirect("Default.aspx");
        }
    }

运行结果

ASP.NET实现简单的聊天室_第2张图片

ASP.NET实现简单的聊天室_第3张图片

你可能感兴趣的:(ASP.NET网站开发)