down_add.asp

吻宇考试管理系统源码 吻宇考试管理系统源码

<!--#include file="conn.asp"-->
<!--#include file="checkuser.asp"-->
<%
dim namer,kemu,dx,tjcd,pt,downurl,xgjs
namer=request.form("name")
kemu=request.form("kemu")
dx=request.form("dx")
tjcd=request.form("tjcd")
pt=request.form("pt")
downurl=request.form("downurl")
xgjs=request.form("xgjs")
sql="insert into down (name,kemu,dx,pt,tjcd,downurl,xgjs,hit) values ('"&namer&"','"&kemu&"','"&dx&"','"&pt&"','"&tjcd&"','"&downurl&"','"&xgjs&"','1')"
conn.execute(sql)
conn.close
set conn=nothing
%>
<script language="vbscript">
msgbox("恭喜你增加下载课件操作成功~!")
window.location.href"down.asp"

</script>