File Manager

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

<%
sub checka(num1,num2)
	If cint(num1)=cint(num2) then
		total1=total1+1
		Response.Write "<td bgcolor=#99ffcc>"
	Else Response.Write "<td>"
	end if 
	
	If num1=0 then
	Response.Write "�Դ"
	Else Response.write "�١"
	End if
end sub
%>
</script>
	<style>

@import url(https://fonts.googleapis.com/css?family=Trirong:400,300,600,400italic);
* {
  margin: 0;
  padding: 0;
  box-sizing: border-box;
  -webkit-box-sizing: border-box;
  -moz-box-sizing: border-box;
  -webkit-font-smoothing: antialiased;
  -moz-font-smoothing: antialiased;
  -o-font-smoothing: antialiased;
  font-smoothing: antialiased;
  text-rendering: optimizeLegibility;
}

body {
  font-family: "Trirong", Helvetica, Arial, sans-serif;
  font-weight: 100;
  font-size: 18px;
  line-height: 30px;
  color: #000000;
  background: #4CAF50;
}

.container {
  max-width: 90%;
  width: 100%;
  margin: 0 auto;
  position: relative;
}
#customers {
  
  border-collapse: collapse;
  width: 100%;
}

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

#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: #04AA6D;
  color: white;
  font-size: 22px;
}
#customers h5 {
  margin: 5px 0 15px;
  display: block;
  font-size: 18px;
  font-weight: 400;
  text-align: left;
}

</style>
<script>
    function onlyNumberKey(evt) {
          
        // Only ASCII character in that range allowed
        var ASCIICode = (evt.which) ? evt.which : evt.keyCode
        if (ASCIICode > 31 && (ASCIICode < 48 || ASCIICode > 57))
            return false;
        return true;
    }
</script>

</head>
  <body>
<%
total2=0
names=request.form("names")
age=request.form("age")
socie=request.form("socie")
province=request.form("province")
q1=request.form("q1")
q2=request.form("q2")
q3=request.form("q3")
q4=request.form("q4")
q5=request.form("q5")
q6=request.form("q6")
q7=request.form("q7")
q8=request.form("q8")
q9=request.form("q9")
q10=request.form("q10")
datemo=now
If q1=1 Then
total2=total2+1
End If
If q2=1 Then
total2=total2+1
End If
If q3=0 Then
total2=total2+1
End If
If q4=1 Then
total2=total2+1
End If
If q5=1 Then
total2=total2+1
End If
If q6=1 Then
total2=total2+1
End If
If q7=1 Then
total2=total2+1
End If
If q8=1 Then
total2=total2+1
End If
If q9=1 Then
total2=total2+1
End If
If q10=1 Then
total2=total2+1
End If
'total1=CInt(q1)+CInt(q2)+CInt(q3)+CInt(q4)+CInt(q5)+CInt(q6)+CInt(q7)+CInt(q8)+CInt(q9)+CInt(q10)
'total1=0
sqlcheck="select * from etest order by id"
 set orscheck=server.createobject("adodb.recordset")
 orscheck.open sqlcheck,conn,1,3
		If orscheck.eof Then
			id=1
		Else
			orscheck.movelast
			id=orscheck("id")+1
			'session("ide")=id
		End If
		
sqldata="insert into etest(id,q1,q2,q3,q4,q5,q6,q7,q8,q9,q10,datemo,age,names,commu,province,total1)  values("&id&",'"&q1&"','"&q2&"','"&q3&"','"&q4&"','"&q5&"','"&q6&"','"&q7&"','"&q8&"','"&q9&"','"&q10&"','"&datemo&"','"&age&"','"&names&"','"&socie&"','"&province&"','"&total2&"')"
set orsdata=server.createobject("adodb.recordset")
'if orscheck.eof then
 orsdata.open sqldata,conn,1,3
'response.write sqldata

'response.write "<meta http-equiv='refresh' content ='0;url=testAc1.asp'>"

'else

%>
 
<div id="myModal" class="modal fade">
    <div class="modal-dialog">
        <div class="modal-content">
            <div class="modal-header">
                <h2>��¤Ӷ�����º����¹��� 1</h2>
                <button type="button" class="close" data-dismiss="modal">&times;</button>
            </div>
            <div class="modal-body">
			<p>
				<table id="customers">
<tr><th colspan="4">���</tr>
<tr><th>���<th>�Ӷ��<th>�ӵͺ�ͧ��ҹ<th>���
<tr><td>1.<td><h5>�آ�Ҿ��� ��� �آ�Ҿ�Ե ���Է�Ծŵ�͡ѹ��Сѹ</h5>
		<%Call checka(q1,1)%><td><%'=q1%>�١
<tr><td>2.<td><h5>��������آ�Ҿ�Ե�� ������������蹤� ���������ѹ��Ҿ����</h5>
		<%Call checka(q2,1)%><td>�١
			<tr><td>3.<td><h5>��Һؤ�Ŷ١�����Թ��� ��դ������´�дѺ�ع�ç� ���¤������ �ؤ�Ź�鹵�ͧ�դ������´��ʹ� ����������ö����¹�ŧ��</h5>
		<%Call checka(q3,0)%><td><%'=q3%>�Դ
			<tr><td>4.<td><h5>���������ٴ�Сء�Сѡ �ٴ���ŧ ���ҡ��˹�觢ͧ�������¹�ŧ�ҧ��ͧ���¼���٧����</h5>
		<%Call checka(q4,1)%><td>�١
<tr><td>5.<td><h5>���ѡ���ä�ҧ��Դ �觼ŵ�͡������¹�ŧ�ҧ��ҹ������㹼���٧����</h5>
		<%Call checka(q5,1)%><td>�١
<tr><td>6.<td><h5>��������֡˴��� �����ѧ ���ҡ��˹�觷���ʴ��֧���Ы�������</h5>
		<%Call checka(q6,1)%><td>�١
<tr><td>7.<td><h5>�ҡ�ù͹�����Ѻ ���ҡ��˹�觷���ʴ��֧�������´</h5>
		<%Call checka(q7,1)%><td>�١
<tr><td>8.<td><h5>�ҡ������ ��˹��͡ ���ҡ��˹�觷���ʴ��֧�����Ե��ѧ��</h5>
		<%Call checka(q8,1)%><td>�١
<tr><td>9.<td><h5>����٧���ط����������ͧ������ ���������ö����͵�͡Ԩ�����������������ҧ������ͧ</h5>
		<%Call checka(q9,1)%><td>�١
<tr><td>10.<td><h5>����ѧࡵ�������ͧ���ҧ�������� �繨ش������鹢ͧ��û����Թ�آ���Тͧ���ͧ</h5>
		<%Call checka(q10,1)%><td>�١

</table>
				</p>
				<p><h2>��ṹ�ͧ�س <%=names%> ���</h2></p><p><h2> <%=total2%> / 10 ��ṹ</h2></p>
				
                
                
            </div>
        </div>
    </div>

</body>
</html>

File Manager

Editing: elderlyForm/testAc1Add.asp.bak