show_access.asp

oa办公系统asp程序

<!--#include file="../title.asp"-->
<meta http-equiv="Content-Language" content="en-us">
<%

dim ref_no,access_id
ref_no=request("ref")
access_id=request("access_id")
%>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber1">
  <tr>
    <td width="100%" align="center"><b><font size="5">PURCHASE ORDER<br>
	</font></b>
	<%
	sql="select * from cloth_access_2 where ref_no = '"&ref_no&"' and access_id = "&access_id&" "
	rs.open sql,conn,3,1
	do while not rs.eof
	response.write "<br>"
	sql2="select * from accessories where id = "&access_id&" "
	rs2.open sql2,conn,1,3
	if not rs2.eof then
	response.write rs2("name")
	end if
	rs2.close
	%>
	<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111"  id="AutoNumber2" height="119" width="471">
      <tr>
        <td width=70 height="21">
    <span lang="zh-cn">REF NO：</span></td>
        <td width=163 height="21">
        <input type="text" name="ref_no" size="20" tabindex="1" value="<%=rs("ref_no")%>"></td>
        <td width=60 height="21">Etd_Date</td>
        <td width=150 height="21">
        <input type="text" name="etd_date" size="20" tabindex="8" value="<%=rs("etd_date")%>"></td>
      </tr>
      <tr>
        <td width=61 height="11">Name：</span></td>
        <td width=163 height="11">
        <input type="text" name="name" size="20" tabindex="2" value="<%=rs("name")%>"></td>
        <td width=243 height="70" rowspan="6" colspan="2">
        <textarea rows="10" name="meno" cols="29" tabindex="9" value="<%=rs("meno")%>">备注</textarea></td>
      </tr>
      <tr>
        <td width=61 height="13">Size：</td>
        <td width=163 height="13">
        <input type="text" name="size" size="20" tabindex="3" value="<%=rs("size")%>"></td>
      </tr>
      <tr>
        <td width=61 height="10">Color：</td>
        <td width=163 height="10">
        <%
         sql3="select * from fabric_color where id = "&rs("color")&" "
         rs3.open sql3,conn,3,1
	%>
	   <input type="text" name="color" size="20" tabindex="3" value="<%=rs3("en_name")%>"><%rs3.close%></td>
</td>
      </tr>
      <tr>
        <td width=61 height="14">Quantity：</td>
        <td width=163 height="14">
        <input type="text" name="quantity" size="20" tabindex="5" value="<%=rs("quantity")%>"></td>
      </tr>
      <tr>
        <td width=61 height="8">Destination：</td>
        <td width=163 height="8">
        <input type="text" name="T6" size="20" tabindex="6" value="<%=rs("destination")%>"></td>
      </tr>
      <tr>
        <td width=61 height="14">Unit Price：</td>
        <td width=163 height="14">
        <input type="text" name="unit_p" size="20" tabindex="7" value="<%=rs("unit_p")%>"></td>
      </tr>
    </table>
     <%
    rs.movenext
    loop
    rs.close
    %>
    <p><tr> <td colspan="4" height="21">
        <p align="center"><a href="javascript:history.go(-1)">BACK</a>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;    <a href="show_allaccess.asp?ref_no=<%=ref_no%> ">List All</a></td>
</tr>         

  
</td>
  </tr>
</table>