add_ck_save.asp

对学校物资管理系统的一份设计

<!--#include file = "Startup.asp"-->
<!-- #include file="Function.asp" -->
<%
call adminer()
Call ComeUrl()
Call adminck2()
%>

<%
wzname=request("wzname")
ckclass=request("ckclass")
shulang=request("shulang")
danji=request("danji")
gongyin=request("gongyin")
zhuangtai=request("zhuangtai")
rktime=request("rktime")
beizhu=request("beizhu")

set rs=server.createObject("adodb.recordset")
sql="select * from ckinfo"
rs.open sql,oconn,1,2
rs.addnew
rs("物资名称")=wzname
rs("所属仓库")=ckclass
rs("数量")=shulang
rs("单价")=danji
rs("供应商")=gongyin
rs("状态")=zhuangtai
rs("入库时间")=rktime
rs("备注")=beizhu

rs.update
rs.close
response.write"<center><font color=red>添加成功</font></center><br>"
response.write"<center><a href=ck_set.asp target='_self'>返回</a></center><br>"
%>
<link href="common.css" type="text/css" rel="stylesheet">