①数据库连接的建立: Ⅰ、没有密码的数据 < % set cn=server.createobject("adodb.connection") *建立connecton对象,定义了一个adodb数据库连接组件 cn.open"provider=microsoft.jet.oledb.4.0;data source="&server.mappath("test.mdb") *打开数据库 % > Ⅱ、设有密码的数据 < % set cn=server.createobject("adodb.connection") *建立connecton对象,定义了一个adodb数据库连接组件 cn.open"provider=microsoft.jet.oledb.4.0;data source="&server.mappath("test.mdb")&";jet oledb:database password="&pwd *打开数据库 % > ②读取记录: < % set cn=server.createobject("adodb.connection") cn.open"provider=microsoft.jet.oledb.4.0;data source="&server.mappath("test.mdb") set rs=server.createobject("adodb.recordset") *建立connecton对象 sql="select * from table" *SQL语句 rs.open sql,cn,1,1 *执行上面的SQL语句,其中参数1,1代表读取;参数1,3代表修改记录 if not rs.eof then *如果没有到库底 response.write"< tr >" for i=0 to rs.fields.count-1 *循环读取字段 resposne.write"< td >"&rs(i).name&"< /td >" next rs.movefirst *指针置于首记录 while not rs.eof response.write"< tr >" for i=0 to rs.fields.count-1 *循环读取记录 resposne.write"< td >"&rs(i)&"< /td >" next rs.movenext *指针下移一个记录 wend end if rs.close *关闭rs对像 set rs=nothing *释放rs对像 cn.close *…… set cn=nothing *…… % > ③写入记录: < % set cn=server.createobject("adodb.connection") cn.open"provider=microsoft.jet.oledb.4.0;data source="&server.mappath("test.mdb") cn.execute"insert into table(fields1,fields2,fields3,…)values(*"&变量1&"*,*"&变量2&"*,*"&变量3&"*,…)" cn.close *关闭cn对像 set cn=nothing *释放cn对像 % > ④查询记录: < % set cn=server.createobject("adodb.connection") cn.open"provider=microsoft.jet.oledb.4.0;data source="&server.mappath("test.mdb") set rs=server.createobject("adodb.recordset") sql="select * from table where fields1=*"&变量1&"* and fields2=*"&变量2&"*" rs.open sql,cn,1,1 : *关闭对象 : % > ⑤删除记录: < % set cn=server.createobject("adodb.connection") cn.open"provider=microsoft.jet.oledb.4.0;data source="&server.mappath("test.mdb") cn.execute"delect * from tablename where 条件" % > ⑥更新记录: < % set cn=server.createobject("adodb.connection") cn.open"provider=microsoft.jet.oledb.4.0;data source="&server.mappath("test.mdb") Ⅰ、 set rs=server.createobject("adodb.recordset") sql="update tablename set fields1=数值1 and fields2=数值2" rs.open sql,cn,1,3 Ⅱ、 cn.execute"update tablename set fields1=数值1,fields2=数值2 where fields=条件" Ⅲ、 set rs=server.createobject("adodb.recordset") sql="select * from tablename where fields=数值2" rs.open sql,cn,1,3 rs("fields1")=新数值1 rs("fields2")=新数值2 rs.update % > 以下是数据库的常用技巧: 1、设置最多返回条数: 有时候符合查询的记录可能有很多条,但我们并不需要查看全部记录,只是想看前几条记录。 如:看前6条件记录 select top 6 * from tablename order by id desc *desc为递减,asc为递增 另一种可以用百分比返回记录数: select top 20 percent * from tablename order by id desc 意思是返回全部记录的百分之二十的记录。 2、数据库中的指针操作指令: rs.movenext 将记录指针从当前的位置向下移一行 rs.moveprevious 将记录指针从当前的位置向上移一行 rs.movefirst 将记录指针移到数据表第一行 rs.movelast 将记录指针移到数据表最后一行 rs.recordcount 返回记录总数 ,但必须rs.open sql,cn,3,3时才有效 来源:https://blog.csdn.net/qq_38819293/article/details/93724965 免责声明:如果侵犯了您的权益,请联系站长,我们会及时删除侵权内容,谢谢合作! |