Asp数据库访问程序

Asp数据库访问程序：（粗体字为原程序）

（conn文件）{ }

{

<%

Set conn=Server.CreateObject("ADODB.Connection")

dbpath=Server.MapPath("../liuyan.mdb") <!--连接数据库 -->

conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&dbpath

%>   <！--驱动程序  -->

 

 }

连接程序

<%

sqlcmd="select * from message order by A_TIME desc"    <！--查询语句  -->

set rs =conn.Execute(sqlcmd)  

%>

Recordset常用的属性和方法：

<%

Rs.fields.Count  

<!—取得目前包括recordset在内,总共有多少个字段,字段注标由0开始 -->

Rs(“字段名”).Name 

<!—取得目前recordset的字段名字  -->

Rs(n).Name  

 <!--  取得目前recordset的n栏的字段名字,次数有0开始-->

Rs(“字段名”).Value

 <!—取得目前recordset指定的字段的数据内容,可省略value不写 -->

Rs(n).Value         

   <!—取得recordset第n栏的字段数据,由0开始,value可不写  -->

Rs.MOveNext       <!—将recofeset记录指针移到下一笔记录 -->

Rs.MovePre       <!--将recofeset记录指针移到上一笔记录   -->

Rs.MoveFirst     <!--将recofeset记录指针移到第一笔记录  -->

Rs.MoveLast      <!--将recofeset记录指针移到最后一笔记录   -->

%>

数据库记录指针能够上下移动的程序：

（conn文件）{ }

{

<%

Set conn=Server.CreateObject("ADODB.Connection")

Set rs=Server.CreateObject("ADODB.Recordset")   <！-- rs的新建对象 -->

dbpath=Server.MapPath("../liuyan.mdb")     <！-- 连接数据库 -->

conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&dbpath

%>    <！-- 驱动程序 -->

}

 

 

 

连接程序

<%

sqlcmd="select * from message order by A_TIME desc"   <！--查询语句  -->

rs.open sqlcmd ,conn ,3 ,2

%>

Rs的属性:

<%

page=2

rs.AbsolutePage= page    <!--指定现在对象位于那一页-->

rs.PageSize=2           <!--一页所能显示的数据笔录-->

n= rs.RecordCount    <!--取得目前recordset对象所取得的数据的总笔数-->

m=rs.PageCount        <!--取得recordset对象中数据的页数-->

%>

 

 

数据库连接：

<%

set conn= Server.CreateObject("ADODB.Connection")

dbpath= server.MapPath("数据库")

conn.open "driver={Microsoft Access Driver(*.mdb)};dbq="&dbpath

sqlcmd= "查询语句  "

set RS =conn.Execute(sqlcmd)

%>

或则：

<% set rs=server.CreateObject("ADODB.Recordset")

rs.open sqlcmd ,conn, 3,2   %>  与下面的象似：

<%const  abOpenstatic=3

const abLockPessimistic=2

rs.open sqlcmd ,conn, abOpenstatic , abLockPessimistic %>

 

(rs.open sql命令  数据库的连接对象  记录指针的移动方式   数据库的打开方式)