File Manager

<tr><td>
<div class="table-responsive">
<table class="table table-striped table-bordered">
<tr align=center><td width=35%>�Ԩ����<td width=12%>�������ҷ���<td width=21%>ʶҹ�<td width=11%>�ѹ�����§ҹ<td width=11%>���<td width=10%>��§ҹ��/��������´
			<%
sqlrp1="select * from rp_activity_relate where id_table='6' order by id_activity_r " 
			'sqlrp1="select * from rp_thesis_progress where id_activity='"&id_activity&"' "
			'sqlrp1="select * from "&orsrpt("table_name")&" where id_stu='"&id_stu&"' "
			set orsrp1=server.createobject("adodb.recordset")
			orsrp1.open sqlrp1,conn,1,3
			if not orsrp1.eof then
			orsrp1.movefirst
			t1=1
			do while not orsrp1.eof
			%>
						
						<%
			Response.write "<tr><td width=280>"&t1&". "&orsrp1("activity_name")
If orsrp1("curri_r_s")>0 Then
				checky=ys_year_edu-1
				checky=checky+orsrp1("curri_r_y")
				Response.write "<td align=center>"&orsrp1("curri_r_s")&"/"&checky
			Else 
				Response.write "<td>"
				checky=0

End if
				sql_ac_r="select * from thesis_plan_activity where id_stu='"&id_stu&"' and id_activity_r='"&orsrp1("id_activity_r")&"' and id_table='6'"
				Set ors_ac_r=server.createobject("adodb.recordset")
				ors_ac_r.open sql_ac_r,conn,1,3
				If Not ors_ac_r.eof Then
					sqlres="select * from rp_result2 where id_result='"&ors_ac_r("id_result")&"'"
					Set orsres=server.createobject("adodb.recordset")
					orsres.open sqlres,conn,1,3
					If Not orsres.eof Then

id_activity=ors_ac_r("id_activity")
					'Response.write "<td width=180>"&orsres("result_name")
					Response.write "<td width=150 align=center>"&orsres("result_name")&"<br>"&semetery&"/"&yeary&"</td>"
					Response.write "<td width=280>"
						sqlrpt="select * from rp_con_attend where id_report='"&ors_ac_r("id_activity")&"' "
						Set orsrpt=server.createobject("adodb.recordset")
						orsrpt.open sqlrpt,conn,1,3
						If Not orsrpt.eof Then
							Response.write " ��§ҹ����� "&orsrpt("date_create")	
						'Else Response.write "<td>"	
						End if
		
				 %><td>
	
	
	
	<%

End If
					'Else Response.write "<td>"

End if

Response.write "</p>"
				t1=t1+1
			orsrp1.movenext
			Loop
			Else
			Response.write "No Data"
			End if
			%>
</table>
</div>

File Manager

Editing: t6detail_stu.asp.bak