ASP数据库操作
时间：2006-11-18 来源：txkss
(6) 记录集对象的方法：
rs.movenext 将记录指针从当前的位置向下移一行
rs.moveprevious 将记录指针从当前的位置向上移一行
rs.movefirst 将记录指针移到数据表第一行
rs.movelast 将记录指针移到数据表最后一行
rs.absoluteposition=N 将记录指针移到数据表第N行
rs.absolutepage=N 将记录指针移到第N页的第一行
rs.pagesize=N 设置每页为N条记录
rs.pagecount 根据 pagesize 的设置返回总页数
rs.recordcount 返回记录总数
rs.bof 返回记录指针是否超出数据表首端，true表示是，false为否
rs.eof 返回记录指针是否超出数据表末端，true表示是，false为否
rs.delete 删除当前记录，但记录指针不会向下移动
rs.addnew 添加记录到数据表末端
rs.update 更新数据表记录
判断所填数据是数字型 if not isNumeric(request("字段名称")) then
response.write "不是数字"
else
response.write "数字"
end if
经常使用到有关数据库的操作。包括连接代码、SQL命令等等，又不曾刻意去记忆它们（我本人是不愿意 去记这东东），所以常常在用到的时候又去查书本，翻来翻去。一些比较少用的数据库还不一定能顺利找 到，所以现在把它们全归纳到这里，提供大家参考。（个人水平有限，有缺陷之处，欢迎大家指正。） <一>。数据库的连接方法： 1.Access数据库的DSN-less连接方法: set adocon=Server.Createobject("adodb.connection")
adoconn.Open"Driver={Microsoft Access Driver(*.mdb)};DBQ="& _
Server.MapPath("数据库所在路径") 2.Access OLE DB连接方法： set adocon=Server.Createobject("adodb.connection")
adocon.open"Provider=Microsoft.Jet.OLEDB.4.0;"& _
"Data Source=" & Server.MapPath("数据库所在路径") 3.SQL server连接方法： set adocon=server.createobject("adodb.recordset")
adocon.Open"Driver={SQL Server};Server=(Local);UID=***;PWD=***;"& _
"database=数据库名;"
作者: iamfy 发布日期: 2005-3-23
4.SQL server OLE DB连接方法: set adocon=Server.Createobject("adodb.connection")
adocon.open"provider=SQLOLEDB.1;Data Source=RITANT4;"& _
"user ID=***;Password=***;"& _
"inital Catalog=数据库名" 5.Oracle 连接方法: set adocon=Server.Createobject("adodb.connection")
adocon.open"Driver={microsoft odbc for oracle};server=oraclesever.world;uid=admin;pwd=pass;" 6.Oracle OLE DB 连接方法: set adocon=Server.Createobject("adodb.connection")
adocon.open"Provider=OraOLEDB.Oracle;data source=dbname;user id=admin;password=pass;" 7.dBase 连接方法: set adocon=Server.Createobject("adodb.connection")
adocon.open"Driver={microsoft dbase driver(*.dbf)};driverid=277;dbq=------------;" 8.mySQL 连接方法: set adocon=Server.Createobject("adodb.connection")
adocon.open"Driver={mysql};database=yourdatabase;uid=username;pwd=yourpassword;option=16386; " 9.Visual Foxpro 连接方法: set adocon=Server.Createobject("adodb.connection")
adocon.open"Driver={microsoft Visual Foxpro driver};sourcetype=DBC;sourceDB=*.dbc;Exclusive=No;" 10.MS text 连接方法: set adocon=Server.Createobject("adodb.connection")
adocon.open"Driver={microsoft text driver(*.txt; *.csv)};dbq=-----;"&_
"extensions=asc,csv,tab,txt;Persist SecurityInfo=false;" 11.MS text OLE DB 连接方法: set adocon=Server.Createobject("adodb.connection")
adocon.open"Provider=microsof.jet.oledb.4.0;data source=your_path;"&_
"Extended Properties'text;FMT=Delimited'"
作者: iamfy 发布日期: 2005-3-23
<二>。常用的四种SQL命令： 1.查询数据记录(Select)
语法：Select 字段串行 From table Where 字段=内容
例子：想从book表中找出作者为"cancer"的所有记录，SQL语句便如下：
select * from book where author=’cancer’
"*"是取出book表所有的字段，如查询的字段值为数字，则其后的"内容"便无须加上单引号， 如是日期，则在Access中用(#)包括，而在SQL server中则用(’)包括，
如: select * from book where id=1
select * from book where pub_date=#2002-1-7# (Access)
select * from book where pub_date=’2002-1-7’ (SQL Server) 提示：
日期函数to_date不是标准sql文，不是所有的数据库适用，所以大家在使用的时候要参考数据库具体语法 另外如果是查询传入的变量，则如下： strau=request.form("author")
strsql="select * from book where author=’"&strau&"’" 如果查询的是数字，则： intID=request.form("id")
strsql="select * from book where id="&intID 在很多数据库中，如：oracle，上面的语句是可以写成：
strsql="select * from book where id='"&intID&"'"的。
但是字符型一定不能按照数字格式写，需要注意。 2.添加记录(Insert)
语法：Insert into table(field1,field2,....) Values (value1,value2,....)
例子：添加一作者是"cancer"的记录入book表:
insert into book (bookno,author,bookname) values (’CF001’,’cancer’,’Cancer无组件上传程 序’)
同样，如果用到变量就如下： strno=request.form("bookno")
strau=request.form("author")
strname=request.form("bookname")
strsql="insert into book (bookno,author,bookname) values (’"&strno&"’,’"&strau&"’,’ "&strname&"’)" 3.用Recordset对象的Addnew插入数据的方法:
语法： rs.addnew
rs("field1").value=value1
rs("field2").value=value2
...
rs.update 4.修改数据记录(Update)
语法：update table set field1=value1,field2=value2,...where fieldx=valuex
例子：update book set author=’babycrazy’ where bookno=’CF001’
如果用到变量就如下： strno=request.form("bookno")
strau=request.form("author")
strsql="update book set author=’"&strau&"’ where bookno=’"&strno"’" 5.Recordset对象的Update方法:
语法： rs("field1").value=value1
rs("field2").value=value2
...
rs.update 注意：使用语法3和语法5的时候，一定要注意字段的类型（尤其是日期型）一致，否则出错的几率非常的高。
作者: iamfy 发布日期: 2005-3-23
例子： strno=request.form("bookno")
strau=request.form("author")
set adocon=server.createobject("adodb.connection")
adocon.open "Driver={Microsoft Access Driver(*.mdb)};DBQ=" & _
Server.Mappath=("/cancer/cancer.mdb")
strsql="select * from book where bookno=’"&strno&"’"
set rs=server.createobject("adodb.recordset")
rs.open strsql,adconn,1,3
if not rs.eof then ’如果有此记录的话
rs("author").value=strau
rs.update
end if
rs.close
set rs=nothing
adocon.close
set adocon=nothing 6.删除一条记录(Delete)
语法：Delete table where field=value
例子：删除book表中作者是cancer的记录 delete book where author=’cancer’ (注意：如果book表中author字段的值为cancer的记录有多条，将会删除所有author为cancer的记录) 好了，学会了用这些操作，大家在用asp操作数据库的时候，该是没有什么问题了
rs.movenext 将记录指针从当前的位置向下移一行
rs.moveprevious 将记录指针从当前的位置向上移一行
rs.movefirst 将记录指针移到数据表第一行
rs.movelast 将记录指针移到数据表最后一行
rs.absoluteposition=N 将记录指针移到数据表第N行
rs.absolutepage=N 将记录指针移到第N页的第一行
rs.pagesize=N 设置每页为N条记录
rs.pagecount 根据 pagesize 的设置返回总页数
rs.recordcount 返回记录总数
rs.bof 返回记录指针是否超出数据表首端，true表示是，false为否
rs.eof 返回记录指针是否超出数据表末端，true表示是，false为否
rs.delete 删除当前记录，但记录指针不会向下移动
rs.addnew 添加记录到数据表末端
rs.update 更新数据表记录
判断所填数据是数字型 if not isNumeric(request("字段名称")) then
response.write "不是数字"
else
response.write "数字"
end if
经常使用到有关数据库的操作。包括连接代码、SQL命令等等，又不曾刻意去记忆它们（我本人是不愿意 去记这东东），所以常常在用到的时候又去查书本，翻来翻去。一些比较少用的数据库还不一定能顺利找 到，所以现在把它们全归纳到这里，提供大家参考。（个人水平有限，有缺陷之处，欢迎大家指正。） <一>。数据库的连接方法： 1.Access数据库的DSN-less连接方法: set adocon=Server.Createobject("adodb.connection")
adoconn.Open"Driver={Microsoft Access Driver(*.mdb)};DBQ="& _
Server.MapPath("数据库所在路径") 2.Access OLE DB连接方法： set adocon=Server.Createobject("adodb.connection")
adocon.open"Provider=Microsoft.Jet.OLEDB.4.0;"& _
"Data Source=" & Server.MapPath("数据库所在路径") 3.SQL server连接方法： set adocon=server.createobject("adodb.recordset")
adocon.Open"Driver={SQL Server};Server=(Local);UID=***;PWD=***;"& _
"database=数据库名;"
作者: iamfy 发布日期: 2005-3-23
4.SQL server OLE DB连接方法: set adocon=Server.Createobject("adodb.connection")
adocon.open"provider=SQLOLEDB.1;Data Source=RITANT4;"& _
"user ID=***;Password=***;"& _
"inital Catalog=数据库名" 5.Oracle 连接方法: set adocon=Server.Createobject("adodb.connection")
adocon.open"Driver={microsoft odbc for oracle};server=oraclesever.world;uid=admin;pwd=pass;" 6.Oracle OLE DB 连接方法: set adocon=Server.Createobject("adodb.connection")
adocon.open"Provider=OraOLEDB.Oracle;data source=dbname;user id=admin;password=pass;" 7.dBase 连接方法: set adocon=Server.Createobject("adodb.connection")
adocon.open"Driver={microsoft dbase driver(*.dbf)};driverid=277;dbq=------------;" 8.mySQL 连接方法: set adocon=Server.Createobject("adodb.connection")
adocon.open"Driver={mysql};database=yourdatabase;uid=username;pwd=yourpassword;option=16386; " 9.Visual Foxpro 连接方法: set adocon=Server.Createobject("adodb.connection")
adocon.open"Driver={microsoft Visual Foxpro driver};sourcetype=DBC;sourceDB=*.dbc;Exclusive=No;" 10.MS text 连接方法: set adocon=Server.Createobject("adodb.connection")
adocon.open"Driver={microsoft text driver(*.txt; *.csv)};dbq=-----;"&_
"extensions=asc,csv,tab,txt;Persist SecurityInfo=false;" 11.MS text OLE DB 连接方法: set adocon=Server.Createobject("adodb.connection")
adocon.open"Provider=microsof.jet.oledb.4.0;data source=your_path;"&_
"Extended Properties'text;FMT=Delimited'"
作者: iamfy 发布日期: 2005-3-23
<二>。常用的四种SQL命令： 1.查询数据记录(Select)
语法：Select 字段串行 From table Where 字段=内容
例子：想从book表中找出作者为"cancer"的所有记录，SQL语句便如下：
select * from book where author=’cancer’
"*"是取出book表所有的字段，如查询的字段值为数字，则其后的"内容"便无须加上单引号， 如是日期，则在Access中用(#)包括，而在SQL server中则用(’)包括，
如: select * from book where id=1
select * from book where pub_date=#2002-1-7# (Access)
select * from book where pub_date=’2002-1-7’ (SQL Server) 提示：
日期函数to_date不是标准sql文，不是所有的数据库适用，所以大家在使用的时候要参考数据库具体语法 另外如果是查询传入的变量，则如下： strau=request.form("author")
strsql="select * from book where author=’"&strau&"’" 如果查询的是数字，则： intID=request.form("id")
strsql="select * from book where id="&intID 在很多数据库中，如：oracle，上面的语句是可以写成：
strsql="select * from book where id='"&intID&"'"的。
但是字符型一定不能按照数字格式写，需要注意。 2.添加记录(Insert)
语法：Insert into table(field1,field2,....) Values (value1,value2,....)
例子：添加一作者是"cancer"的记录入book表:
insert into book (bookno,author,bookname) values (’CF001’,’cancer’,’Cancer无组件上传程 序’)
同样，如果用到变量就如下： strno=request.form("bookno")
strau=request.form("author")
strname=request.form("bookname")
strsql="insert into book (bookno,author,bookname) values (’"&strno&"’,’"&strau&"’,’ "&strname&"’)" 3.用Recordset对象的Addnew插入数据的方法:
语法： rs.addnew
rs("field1").value=value1
rs("field2").value=value2
...
rs.update 4.修改数据记录(Update)
语法：update table set field1=value1,field2=value2,...where fieldx=valuex
例子：update book set author=’babycrazy’ where bookno=’CF001’
如果用到变量就如下： strno=request.form("bookno")
strau=request.form("author")
strsql="update book set author=’"&strau&"’ where bookno=’"&strno"’" 5.Recordset对象的Update方法:
语法： rs("field1").value=value1
rs("field2").value=value2
...
rs.update 注意：使用语法3和语法5的时候，一定要注意字段的类型（尤其是日期型）一致，否则出错的几率非常的高。
作者: iamfy 发布日期: 2005-3-23
例子： strno=request.form("bookno")
strau=request.form("author")
set adocon=server.createobject("adodb.connection")
adocon.open "Driver={Microsoft Access Driver(*.mdb)};DBQ=" & _
Server.Mappath=("/cancer/cancer.mdb")
strsql="select * from book where bookno=’"&strno&"’"
set rs=server.createobject("adodb.recordset")
rs.open strsql,adconn,1,3
if not rs.eof then ’如果有此记录的话
rs("author").value=strau
rs.update
end if
rs.close
set rs=nothing
adocon.close
set adocon=nothing 6.删除一条记录(Delete)
语法：Delete table where field=value
例子：删除book表中作者是cancer的记录 delete book where author=’cancer’ (注意：如果book表中author字段的值为cancer的记录有多条，将会删除所有author为cancer的记录) 好了，学会了用这些操作，大家在用asp操作数据库的时候，该是没有什么问题了
相关阅读 更多 +
