stu_add_ok.asp

本 源码是 VF 管理系统

<!--#include file="chkadmin.asp"-->
<!--#include file="conn.asp"-->
<%
If Not IsNumeric(Trim(Request.Form("xid"))) Then
  Response.Write "填写的学号必须是数字,请后退重新填写!"
  Response.end 
End If

set rs=server.createobject("adodb.recordset")
rs.open "select * from [stu]",conn,1,3

rs.AddNew
rs("name")=Trim(Request.Form("stu"))
rs("xid")=Trim(Request.Form("xid"))
rs("sex")=Request.Form("sex")
rs("classid")=Request.Form("classid")

rs.Update
rs.Close
Set rs=nothing
Response.Write "该同学信息添加成功!"
%>