ASP动态网页设计：利用Command对象存取数据库

在前面的章节中介绍了Connection对象、Recordset对象存取数据库的例子，这里再看一下利用Command对象存取数据库的例子，在例子中只用最常用的属性和方法。

【例7.7】利用Command对象进行数据库的基本操作。

文件命名为7-7.htm的代码如下：

〈HTML〉

〈HEAD〉

〈TITLE〉利用Command 象进行数据库的基本操作〈/TITLE〉

〈/HEAD〉

〈BODY〉

〈％

Dim Conn，strConn

Set Conn＝Server.CreateObject（″ADODB.Connection″）

Conn.ConnectionString＝″DRIVER＝｛Microsoft Access Driver（＊.mdb）｝；DBQ＝″&_

Server .MapPath （″school .mdb″）

Conn.open

Set Cmd＝ Server .CreateObject （″ADODB.Command″）

Cmd .ActiveConnection＝Conn ′查询记录

Dim rs，strSql

strSql＝″select ＊ from student″

cmd.CommandText＝strSql_

Set rs＝cmd .Execute

Do While Not rs .Eof

Response .Write rs （″name″） & ″〈br〉″(www.xing528.com)

rs .Movenext

Loop

′添加记录

strSql＝″insert into student （s id，name，sex，class）

values （′GZ20050601001 ′，′袁飞中′，′男′，′环境艺术设计 ′）″

cmd .CommandText＝strSql

cmd.Execute

′更新记录

str Sql＝″update student set tel＝′6409151 ′where name＝′袁飞中′″

cmd .CommandText＝strSql

cmd .Execute

′删除记录，删除袁飞中的记录

strSgl＝″delete from student where name＝′ 飞中′″

cmd.CommandText＝strSql

cmd.Execute

Conn.close

Set Conn＝nothing

％〉

〈/BODY〉

〈/HTML〉