四川电力职业技术学院8品课程理 AsP程ASP精品课程建设 利用 insert语句添加记录(续) 插入Sq1语句的写法 StrSql= insert into link(name, URL, intro, " submit date) values(“"& varName&“’,’"& varRO&“’,’"& varlntro& 6 , Date 利用 Execute方法,添加记录 d b execute(strSql)
插入Sql语句的写法 StrSql= "insert into link(name,URL, intro, ”&_ ”submit_date) values(‘" &varName & “’ , ’" &_ varURL & “’ , ’" &_ varIntro & “’ , ’" & Date() & “’)" 利用Execute方法,添加记录 db.execute(strSql) 利用insert语句添加记录(续)
四川电力职业技术学院8品课程理 AsP程ASP精品课程建设 6.1.2.6利用 Delete删除记录 ◆删除记录,利用 Connection对象的 Execute方法,不必 返回记录集 连上数据库,建立一个 Connection对象实例db set db=Server. Createobject("ADODB Connection db. Open DBQ=&Server. Mappath( wwwlink. mdb" )& DRIVER= Microsoft Access Driver (* mdb))
删除记录,利用Connection对象的Execute方法,不必 返回记录集 6.1.2.6 利用Delete删除记录 连上数据库,建立一个Connection对象实例db set db=Server.Createobject("ADODB.Connection ") db.Open "DBQ= "&Server.Mappath(" wwwlink.mdb")&_ " ;DRIVER={Microsoft Access Driver (*.mdb)};
四川电力职业技术学院8品课程理 AsP程ASP精品课程建设 利用 Delete删除记录(续) ●传过来的要删除的记录的记录编号 varLink id=Request QueryString(link id ●删除SL语句的写法 strSql="delete from link where link id="& varLink id ●利用 Execute方法,删除记录 d b Execute(strsq
传过来的要删除的记录的记录编号 varLink_id=Request.QueryString("link_id“) strSql= "delete from link where link_id= " & varLink_id 删除SQL语句的写法 利用Execute方法,删除记录 db.Execute(strSql) 利用Delete删除记录(续)
四川电力职业技术学院8品课程理 AsP程ASP精品课程建设 6.1.2.7利用 Update修改语句 ◆修改记录,利用 Connection对象的 Execute方法。 ◆获取传入的要修改的 Link id varLink id=Request QueryString(" link id")
6.1.2.7 利用Update修改语句 修改记录,利用Connection对象的Execute方法。 获取传入的要修改的Link_ID varLink_id=Request.QueryString("link_id")
四川电力职业技术学院8品课程理 AsP程ASP精品课程建设 利用 Update修改语句(续) ◆连上数据库,建立一个 Connection对象实例db set db=Server. Createobject( "ADODB Connection") db. Open DBQ=&Server. Mappath( wwwlink mdb")& DRIVER=Microsoft Access Driver(*. mdb)y ◆建立 Recordset对象实例rs stra1=“ select* from link where link id=”& varlink id‘ varlink_id是传过来的 set rs=db. Execute(strSql)
建立Recordset对象实例rs strSql=“select * from link where link_id=” & varLink_id ‘ varLink_id是传过来的 set rs=db.Execute(strSql) 连上数据库,建立一个Connection对象实例db set db=Server.Createobject("ADODB.Connection ") db.Open "DBQ= "&Server.Mappath(" wwwlink.mdb")&_ " ;DRIVER={Microsoft Access Driver (*.mdb)}; " 利用Update修改语句(续)