2.asp

来自「医药进销存管理系统 全代码 很详细 可惜没有数据库 可供参考」· ASP 代码 · 共 35 行

<title>选择大类</title>
<!--#include file="../include/conn.asp"-->
<%
set rs=conn.execute("select * from tb_MedicineType")
if rs.eof then
    response.write "还没有大类"
else
%>   
<form action="salegoods.asp" method="post" target="main" name="form1">
<table border=0 cellpadding=4 cellspacing=1 bgcolor=#999999 width='380'>
    <%do while not rs.eof%>
    <tr><td bgcolor="#ffffff"><input type="radio" value="<%=rs("TypeId")%>" name="TypeId"><%=rs("TypeName")%></td></tr>
    <%
    rs.movenext
    loop
    %>
    <tr>     
        <td bgcolor=#ffffff>
	        <input type="button" onclick="tijiao()" value="确定">&nbsp;
			<input type="button" name="b2" value="关闭" onClick="window.close();">
	    </td>
    </tr>
</table>
</form>
<%	   
end if
%>
<script language="javascript">
 function tijiao(){
   document.form1.submit();
   window.close();
 }
</script>