gusucode.com > ASP+ACCESS学生成绩查询系统毕业设计(源代码+论文+开题报告) > ASP+ACCESS学生成绩查询系统毕业设计(源代码+论文+开题报告)\score\score\addnew.asp
<!--#include file="conn.asp"--> <%if session("password")<>"" then%> <% if request("xh")="" then response.write "<script language=JavaScript>" & chr(13) & "alert('学号栏要全部填');" & "history.back()" & "</script>" Response.End end if bj=Replace(Request.Form("bj"),"'","''") xh=Replace(Request.Form("xh"),"'","''") user=Replace(Request.Form("user"),"'","''") kc=Replace(Request.Form("kc"),"'","''") cj=Replace(Request.Form("cj"),"'","''") xq=Replace(Request.Form("xq"),"'","''") lx=Replace(Request.Form("lx"),"'","''") set savebbs=conn.execute("insert into bbs1(bj,xh,user,kc,cj,xq,lx)values('"&bj&"','"&xh&"','"&user&"','"&kc&"','"&cj&"','"&xq&"','"&lx&"')") response.write "<script language=JavaScript>" & chr(13) & "alert('添加成功!');"&"window.location.href = 'add.asp'"&" </script>" set savebbs=nothing %> <%else Response.Redirect "admpost.asp" end if%>