access.asp

oa办公系统asp程序

<!--#include file="../title.asp"-->

<%

      ref_no=request("ref")
      sql="select * from cloth_access_1 where ref_no = '"&ref_no&"' "
      rs.open sql,conn,3,1
      if not rs.eof then
%>
<p>
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111"  id="AutoNumber1" bgcolor="#0000FF">
  <tr>
    <td align="center"><br>辅料详细信息填写！<p></td></tr>
    <tr>
    <td align="left"><br>
      <%
      x=1
       do while not rs.eof
	   	sql2="select * from accessories where id = "&rs("access_id")&" "
	   	rs2.open sql2,conn,3,1
	   	%>
       <font color="#FFFFFF"> ◇ </font><a href="access_input.asp?access_id=<%=rs("access_id")%>&ref_no=<%=ref_no%>" title="点击添加详细信息！"><font color="#FFFFFF"><%=rs2("name")%></font></a>
     
      <%
      if x mod 5 = 0 then
      response.write "<br><br>"
      end if
      x=x+1
      rs2.close
      rs.movenext
      loop
      rs.close
      end if
      %>   

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