salegoods.asp

医药进销存管理系统 全代码 很详细 可惜没有数据库 可供参考

<!--#include file="../include/top.asp"-->
<%
Set conn=Server.CreateObject("ADODB.Connection")
conn.connectionstring="Driver={Sql Server};Server=(local);UID=sa;database=DB_lsmanage"
conn.open
%>
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
    <tr>
        <td height="34" bgcolor="#FFCC33"><div align="left"><span class="">　<img src="../images/borrow.gif"><span class="style2"><strong>　药品销售登记</strong></span></span></div></td>
    </tr>
</table>  
<br>
<form action="savesalegoods.asp" method="post" name="form1">
<table border="0" width="90%" cellpadding="4" cellspacing="1" bgcolor="#CCCC33">
    <tr>
        <td width="27%"  align="right" bgcolor="#FFFFFF">请点击按钮选择大类：</td>
	        <td width="73%" bgcolor="#FFFFFF"><div align="left">
                <input name="TypeName" type="text" value="<%if request("TypeId")<>"" Then
					    set rs=conn.execute("select * from tb_MedicineType where TypeId="&request("TypeId"))
						response.write rs("TypeName")
					end if
			     %>" readonly align="left" size="10">　
			    <input name="button2" type="button"style="border:1px solid;border-color:#CC6666;background-color:#FFCC33" onClick="window.open('2.asp','','width=300,height=300,resizable=yes,left=540,top=350')" value="选择大类">
				</div>
		    </td>
	    </tr>
		<tr>
	        <td align="right" bgcolor="#FFFFFF">药品名称：</td>
		    <td bgcolor="#FFFFFF">
	        <div align="left">
            <%
		        if request("TypeId")<>"" then
		            set rs1=conn.execute("select * from tb_MedicineName where TypeId="&request("TypeId"))
				    response.write "<select name=yName>"
				        do while not rs1.eof
						   response.write "<option value="&rs1("yName")&">"&rs1("yName")&"</option>"
						   rs1.movenext
						loop
						   response.write "</select>"
			     else
						   response.write "选择药名"
			     end if
		      %>
			  </div>
			  </td>
	      </tr>
	      <tr>
	          <td align="right" bgcolor="#FFFFFF">数量</td>
	          <td bgcolor="#FFFFFF">
			      <div align="left">
	                  <input type="text" name="Sl" size="5" value="1">
		          </div>
			   </td>
		   </tr>
		   <tr bgcolor="#FFFFFF">
		       <td colspan="2">
			       <div align="left">         　　　　　　　　　
			           <input name="salebtn" type="submit" id="salebtn" style="border:1px solid;border-color:#cc6666;background-color:#FFCC33" value="卖 出"  onClick="return chkfields();">　
			           <input name="cancel" type="reset" id="cancel" style="border:1px solid;border-color:#cc6666;background-color:#FFCC33" value="取 消">
				   </div>
			   </td>
		   </tr>
	   </table>
   </form>
<script language="javascript">
  function chkfields(){
  if(document.form1.TypeName.value==''){
    alert("请选择大类");
	form1.TypeName.focus();
	return false;
  }
  if (document.form1.yName.value==''){
     alert("请选择药品名");
	 return false;
   }
   if(document.form1.Sl.value=='' || document.form1.Sl.value==0){
   alert("请输入添加的数量");
   return false;
   }
   return true;
  }
</script>