saveaddgoods.asp

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

<!--#include virtual="/manage/include/conn.asp"-->
<%
    TypeName1=request("TypeName")
    yName=request("yName")
    set rs1=conn.execute("select * from tb_MedicineName where yName='"&yName&"'")
    Sl=request("Sl")
    set rs=server.CreateObject("adodb.recordset")
    strsql="insert into tb_Sell (TypeName,yName,Mode,Price,Sl,TotalPrice,Time1,itType,UserId) values ('"&TypeName1&"','"&yName&"','"&rs1("Mode")&"','"&rs1("Price")&"',"&Sl&","&Sl*rs1("Price")&",'"&now()&"',1,'"&Session("UserID")&"')"
    rs.open strsql,conn,3,3
%>
<script language="javascript">
   alert("添加药品成功");
   window.location.href="goodsadd.asp";
</script>