File Manager

<%
Response.Expires = 0
Response.CacheControl = "no-cache"
Response.AddHeader "Pragma", "no-cache"
%>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<meta http-equiv="Content-Type" content="text/html; charset=windows-874">
<html>

body {
  font-family: "Trirong", Helvetica, Arial, sans-serif;
  font-weight: 100;
  font-size: 18px;
  line-height: 30px;
  color: #000000;
  
}
h1, h2, h3 { margin: 0; }
h1 { font-size: 33px; }
h2 { font-size: 31px; }

h3 {
	color: #7f7f7f;
	font-size: 28px;
}
p {
text-indent: 2em; 
font-size: 27px;
line-height: 25pt
}
.container {
  max-width: 90%;
  width: 100%;
  margin: 0 auto;
  position: relative;
}

#contact input[type="text"],
#contact input[type="email"],
#contact input[type="tel"],
#contact input[type="url"],
#contact textarea,
#contact button[type="submit"] {
  font: 400 12px/16px "Trirong", Helvetica, Arial, sans-serif;
}

#contact {
  background: #F9F9F9;
  padding: 25px;
  margin: 150px 0;
  box-shadow: 0 0 20px 0 rgba(0, 0, 0, 0.2), 0 5px 5px 0 rgba(0, 0, 0, 0.24);
}

#contact h3 {
  display: block;
  font-size: 33px;
  font-weight: 500;
  margin-bottom: 10px;

}
#contact h2 {
  display: block;
  font-size: 26px;
  font-weight: 400;
  margin-bottom: 5px;
  text-align: left;

}

#contact h4 {
  margin: 5px 0 15px;
  display: block;
  font-size: 20px;
  font-weight: 400;
}

fieldset {
  border: medium none !important;
  margin: 0 0 10px;
  min-width: 100%;
  padding: 0;
  width: 100%;
  background: #FFF;
  
}

#contact input[type="text"],
#contact input[type="email"],
#contact input[type="tel"],
#contact input[type="url"],
#contact textarea {
  width: 100%;
  border: 1px solid #ccc;
  background: #FFF;
  margin: 0 0 5px;
  padding: 10px;
}

#contact input[type="text"]:hover,
#contact input[type="email"]:hover,
#contact input[type="tel"]:hover,
#contact input[type="url"]:hover,
#contact textarea:hover {
  -webkit-transition: border-color 0.3s ease-in-out;
  -moz-transition: border-color 0.3s ease-in-out;
  transition: border-color 0.3s ease-in-out;
  border: 1px solid #aaa;
}

#contact textarea {
  height: 100px;
  max-width: 100%;
  resize: none;
}
#contact input[type="radio"] {
    border: 0px;
    width: 4em;
    height: 4em;

}

#contact button[type="submit"] {
  cursor: pointer;
  width: 100%;
  border: none;
  background: #0000cc;
  color: #FFF;
  margin: 5px 5px 5px;
  padding: 20px;
  font-size: 29px;
  line-height: 150%;
}

#contact button[type="submit"]:hover {
  background: #0066ff;
  -webkit-transition: background 0.3s ease-in-out;
  -moz-transition: background 0.3s ease-in-out;
  transition: background-color 0.3s ease-in-out;
}

#contact button[type="submit"]:active {
  box-shadow: inset 0 1px 3px rgba(0, 0, 0, 0.5);
}

.copyright {
  text-align: center;
}

#contact input:focus,
#contact textarea:focus {
  outline: 0;
  border: 1px solid #aaa;
}

::-webkit-input-placeholder {
  color: #888;
}

:-moz-placeholder {
  color: #888;
}

::-moz-placeholder {
  color: #888;
}

:-ms-input-placeholder {
  color: #888;
}
p {
  border: 0px solid green; 
  padding: 30px 10px;
}
	label {
  font-size: 25px;

vertical-align: middle;
}
#customers {
  
  border-collapse: collapse;
  width: 100%;
}

#customers td, #customers th {
  border: 1px solid #ddd;
  padding: 8px;
  text-align: center;
  font-size: 28px;
}

#customers tr:nth-child(even){background-color: #f2f2f2;}

#customers tr:hover {background-color: #ddd;}

#customers th {
  padding-top: 12px;
  padding-bottom: 12px;
  text-align: center;
  background-color: #0000cc;
  color: white;
  font-size: 29px;
}
    </style>
  </head>
  <script src="Chart.min.js"></script>
  <body>
<%
'ide=session("ide")
ide=request.form("id")
'ide=62
sqlcheck="select * from ehealth where author=1 and q31>0 and province=2"
set orscheck=server.createobject("adodb.recordset")
orscheck.open sqlcheck,conn,1,3
If Not orscheck.eof Then
	orscheck.movefirst
	Do While Not orscheck.eof
		v1=v1+1
	orscheck.movenext
	loop
End if

sqlcheck="select * from ehealth where author=2 and q31>0 and province=3"
set orscheck=server.createobject("adodb.recordset")
orscheck.open sqlcheck,conn,1,3
If Not orscheck.eof Then
	orscheck.movefirst
	Do While Not orscheck.eof
		v2=v2+1
	orscheck.movenext
	loop
End if

sqlcheck="select * from ehealth where author=3 and q31>0 and province=1"
set orscheck=server.createobject("adodb.recordset")
orscheck.open sqlcheck,conn,1,3
If Not orscheck.eof Then
	orscheck.movefirst
	Do While Not orscheck.eof
		v3=v3+1
	orscheck.movenext
	loop
End if
allv=v3+v0+v2+v1
sqlcheck="select * from ehealth where author=0"
set orscheck=server.createobject("adodb.recordset")
orscheck.open sqlcheck,conn,1,3
If Not orscheck.eof Then
	orscheck.movefirst
	Do While Not orscheck.eof
		v0=v0+1
	orscheck.movenext
	loop
End if
%>
<table id="customers">

<tr><th>�ԧ�����<th>������<th>��ا෾-�ر��ѵ��<th>��� �
	<tr><td>[<a href=list.asp?id=1><%=v1%></a>]<td>[<a href=list.asp?id=2><%=v2%></a>]<td>[<a href=list.asp?id=3><%=v3%></a>]<td>[<a href=list.asp><%=v0%></a>]
	<tr><td colspan="3">���<td>[<%=allv%>]

</table>

'Else
'Response.write "No anwers"
'End if

%>
  </body>
</html>

File Manager

Editing: ehealthy/countsum.asp