ASP读取数据库中数据到数组的类

欢迎您访问我爱IT技术网，今天小编为你分享的编程技术是：【ASP读取数据库中数据到数组的类】，下面是详细的分享！

ASP读取数据库中数据到数组的类

以下为引用的内容：
  DbPath="test.mdb"’数据库位置
  ConnStr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(DbPath)
  Set Conn=Server.CreateObject("ADODB.Connection")
  Conn.open ConnStr
  
  Class Class_Read
  Public Arr,Rs,SQL,ArrTR,ArrTD,Page,TotalRead,TotalPage
  Public Function Read(SQL,TD,TR,PG)
  SQL=Replace(SQL,"’","")
  Page=Int(PG)
  Set Rs=Server.CreateObject("ADODB.Recordset") : Rs.open SQL,conn,1,1
  TotalRead=Rs.RecordCount
  If TotalRead>0 Then
  If TR>0 Then : Rs.PageSize=TR : Else : TR=TotalRead
  If TD>Rs.Fields.Count or TD<1 Then TD=Rs.Fields.Count
  If TotalRead Mod TR <>0 Then TotalPage=1 : End If : TotalPage=TotalPage + Int(TotalRead/TR)
  If Page>=TotalPage Then Page=TotalPage : TR=TotalRead-TR*(TotalPage-1)
  If Page>1 Then Rs.absolutePage=Page Else Page=1
  End If
  reDim Arr(TD-1,TR)
  For ArrTR=0 to TR-1 : If Rs.Eof Then Exit For
  For ArrTD=0 to TD-1 : Arr(ArrTD,ArrTR)=Rs(ArrTD) : Next : Rs.MoveNext
  Next
  ArrTR=ArrTR-1
  Rs.Close
  Set Rs=Nothing
  End Function
  End Class
  ’使用方法
  Dim C:Set C=New Class_Read
  C.Read ("SQL语句","读取列数","读取行数[既每页显示条数]","当前页数")
  Dim i
  For i=0 To C.ArrTR
  Response.Write "<br>内容:"&C.Arr(0,i)
  Next
  Response.Write "<br>总记录条数:"&C.TotalRead
  Response.Write "<br>总页数 :"&C.TotalPage
  Response.Write "<br>当前页 :"&C.Page
  Response.Write "<br>当前记录数:"&C.ArrTR+1

以上所分享的是关于ASP读取数据库中数据到数组的类，下面是编辑为你推荐的有价值的用户互动：

　　相关问题：asp 怎样读出数据库数据存入数组

　　答：RecordSet对象有个GetRows方法，可以把RS里的数据读取到数组，假如之前你已经用RecordSet得到了数据，那么你可以用 rs.GetRows() 来获取数据对应的数组。 所获得的数组是二维的，其中第一维对应数据库中的列，第二维对应的是数据库中的行，数组... >>详细

　　相关问题：asp.net怎样把数据库中的一列读取到一个string数组...

　　答：这个有很多方法，看你用什么方法读取数据库。这种简单的需求我喜欢用Linq。 using(DataContext oDatacontext=new DataContext()) { var lstResult=oDatacontext.T_Table.Select(x=>x.Result).ToList();//这里T_Table表示对应的表，Result表示你... >>详细

　　相关问题：asp.net C# 如何读取数据库中数据到数组

　　答：其实不用那么存的 ，在存图片的时候吧名字存到数据库中，取得时候直接 readImage.aspx?id={0} 但是要是绑定控件！ >>详细