<!--#include file="../Conn.asp" -->
<%
PagePath = "../"

ConnectionDatabase()
%>
<!--#include file="Check_Login.asp" -->
<%
	Dim BoxId,ComId
	
	BoxId = Trim(Request.QueryString("BoxId"))
	ComId = Trim(Request.QueryString("ComId"))
	
	If BoxId = "" Or IsNull(BoxId) Or Not IsNumeric(BoxId) Then BoxId = 0
	If ComId = "" Or IsNull(ComId) Or Not IsNumeric(ComId) Then ComId = 0
	
	Conn.Execute("update PersonBoxTbl set IsRead = '1' where BoxId = "& BoxId &" and PerId = "& Session("PerId"))
	
	Response.Redirect("../Company_View.asp?ComId="& ComId)
	
	Response.End()
%>