Editing: 56th/showdetail.asp.bak

<link href="../Templates/style.css" rel="stylesheet" type="text/css"> [<a href="http://bsris.swu.ac.th/55th/index.html">˹���á</a>] <!--#INCLUDE FILE="Connectdb.asp"--> <% name=session("name") sname=session("sname") id_regis=session("id_regis") tr1=session("tr") 'response.write id_regis if name="" and sname="" or id_regis = "" then name=request("name") sname=request("sname") id_regis=request("id_regis") end if set ors=server.createobject("adodb.recordset") sql="select * from regis where id_regis="&id_regis&"" ors.open sql,conn,1,3 if not ors.eof then '�������� response.write "<table><tr><td width=16% bgcolor=#EDEDEB><strong>����/ʡ��</strong> <td bgcolor=#EDEDEB>"&ors("fname")&""&ors("name")&" "&ors("sname")&"</tr>" response.write "<tr bgcolor=#F9F9F7><td><strong>���˹觷ҧ�Ԫҡ�� </strong><td>"&ors("position1")&"</tr>" response.write "<tr bgcolor=#EDEDEB><td><strong>ʶҹ���ӧҹ </strong><td>"&ors("addwork")&"</tr>" response.write "<tr bgcolor=#F9F9F7><td><strong>������� </strong><td>"&ors("address")&"</tr>" response.write "<tr bgcolor=#EDEDEB><td><strong>�������Ѿ��E </strong><td>"&ors("tel")&"</tr>" response.write "<tr bgcolor=#F9F9F7><td><strong>����� </strong><td> "&ors("fax")&"</tr>" response.write "<tr bgcolor=#EDEDEB><td><strong>E-mail </strong> <td>"&ors("email")&"</tr>" if tr1="1" then response.write "<tr bgcolor=#F9F9F7><td ><strong>���ͺ�����</strong><td colspan=2>"&ors("filename") end if response.write "<tr>" idc=session("id_regis") 'response.write idc 'response.write tr1 'if tr1=1 then if idc="" then response.write "<tr><td> �������::<td>"&ors("absn") 'elseif idc="" then else %> <form action="upfile.asp?id=<%=id_regis%>" method="post" enctype="multipart/form-data"> <tr><td colspan=2 >File: </b><input type="file" name="file1"><input type="submit" value="Upload" name="submit">�Ѻ੾�� .pdf </form> <% end if 'end if 'response.write "<tr bgcolor=#F9F9F7><td><strong>��ͤ������ҡ</strong><td>"&ors("mess") 'set ors1=server.createobject("adodb.recordset") 'sql1="select * from regis where id_regis="&ors("id_regis")&" order by id_regis" 'ors1.open sql1,conn,1,3 ' ors1.movefirst ' price=0 ' if not ors1.eof then ' do while not ors1.eof ' set ors2=server.createobject("adodb.recordset") ' sql2="select * from type_stat where id_type="&ors1("stat")&"" ' ors2.open sql2,conn,1,3 ' if not ors2.eof then ' response.write "<tr bgcolor=#EDEDEB><td><td >"&ors2("type_name")&"- "&ors2("pricee")&"</tr>" 'end if 'pr=ors2("pricee") 'price=price+pr 'ors1.movenext ' loop ' response.write "<tr><td colspan=2><strong>��������㹡��ͺ�� "&price&" �ҷ</strong></tr>" ' response.write "<tr bgcolor=#F9F9F7><td ><strong>�Ըա����Ѥ�</strong></tr>" ' set ors2=server.createobject("adodb.recordset") 'sql2="select * from pay where id_pay='"&ors("pay")&"' " 'ors2.open sql2,conn,1,3 'response.write "<tr bgcolor=#EDEDEB><td><td >"&ors2("pay")&" "&ors2("pay_detail")&"</tr>" ' response.write "<tr bgcolor=#F9F9F7><td><strong>�ҡ��ͤ���</strong><td>"&ors("mess")&"</tr>" response.write "</table>" response.write "<br><div align=right>�����Ѥ�ŧ��� ..............................................................................." response.write "<br><br>(..........................................................................)" end if 'end if %>