名不能为空；添加成功后回到学生信息页(student.asp).
编程语言：VBScript
2 模块接口：
调用模块名：studentadd.asp
被调用的模块名：studentadd.asp student.asp 输入的文件：studentadd.asp
输出的文件：student.asp xsgl.mdb(xsxx) 使用的文件或数据库标识：
使用主要内存变量的名称与类型：xh,xm,xb,born,zy,zzmm,mz,jd,dh,jl,mm
3 处理概要：
通过studentadd.asp中的表单输入数据，若其中的姓名、性别、出生日期、学号、家庭地址、专业、班级、电话、政治面貌、个人简介、密码都不为空，建立记录集对象，指定相关属性，打开记录集，通过记录集对象的添加记录到数据库表中，然后返回student.asp。 4.主要代码是：<% option explicit %> <html> <head> <%
if request.Form("xh")<>"" and request.Form("xm")<>"" and request.Form("xb")<>"" and request.Form("born")<>"" and request.Form("bh")<>"" and request.Form("mz")<>"" and request.Form("zzmm")<>"" and request.Form("jd")<>""then dim db
set db=server.CreateObject("adodb.connection")
db.open "driver={microsoft access driver (*.mdb)};dbq=" &server.MapPath("xsgl.mdb") dim sbh,sxb,sxh,sxm,smz,sborn,szzmm,sjd,sdh,sjl,strsql sxh=trim(request.form("xh")) sxm=trim(request.form("xm")) sbh=trim(request.form("bh")) sxb=trim(request.form("xb")) sborn=trim(request.form("born")) smz=trim(request.form("mz")) szzmm=trim(request.form("zzmm")) sjd=trim(request.form("jd")) sdh=trim(request.form("dh")) sjl=trim(request.form("jl"))
strsql="insert into xsxx(xh,xm,xb,born,bh,mz,zzmm,jd,dh,jl) values('" & sxh& "','" & sxm & "','" & sxb & "', '"&sborn&"' ,'" & sbh & "','" & smz & "','" & szzmm & "','" & sjd & "','" & sdh & "','" & sjl & "')" 'response.Write strsql db.execute(strsql)
response.Redirect"student.asp" else
搜索“diyifanwen.net”或“第一范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，第一范文网，提供最新教学研究ASP学生信息管理系统(17)全文阅读和word下载服务。
相关推荐：
缱绻成歌