Recordset对象中的AddNew、Delete和Update方法应用示例

请输入新增加的课程信息

课程代号
课程名称
授课教师
<% dh=request.form("dh") mc=request.form("mc") js=request.form("js") if dh<>"" and mc<>"" and js<>"" then set cnn=server.createobject("adodb.connection") cnn.open "dbq="&server.mappath("jxgl.mdb")& _ ";driver={microsoft access driver (*.mdb)}" set rs=server.CreateObject("adodb.recordset") rs.open "kc",cnn,1,3,2 '添加记录 rs.addnew '缺省参数时，在表尾添加空白记录 rs("课程代号")=dh rs("课程名称")=mc rs("教师")=js rs.update '本句可省略，因为后面使用了rs.move '删除记录 if not bof then rs.move -3,2 '-3表示向表头方向移动，2表示当前记录指针在表尾 rs.delete end if rs.update response.Write("分别添加和删除了一条记录") rs.close cnn.close end if %>