Open Sql,Conn,1,1 在添加修改数据的时候 用Rs.Open Sql,Conn,1,3 Rs.Bof 是否为第一条数据 是 返回 True 反之 返回False Rs.Fof 是否为最后 一条数据 是 返回 True 反之 返回False 那就可以用这个来判断数据库里有没有记录 if rs.eof and rs.bof then 就是说当前游标 不在第一条也不在最后一条 就说明没有记录 if rs.eof then 这样说明有记录 那么我们就用个循环把数据输出 Rs和Conn一样理解,是变量
Set Rs = Server.CreateObject("Adodb.Recordset") Rs.Open Sql,Conn,1,1 If Not Rs.Eof Then 如果不在记录集的未端,说明有记录 Do While Not Rs.Eof 直到该记录集的最后 跳出循环 Response.Write Rs("字段名") Rs.MoveNext 游标向下移动 Loop End If Rs.Close //注销对象 Set Rs = Nothing //释放资源
因为asp是弱类型的 定量对象时不用定义类型 如果是C# 就是 int i; string str; asp 就 dim i,str 还有asp定义变量不能赋初始值
C# int i = 1; asp dim i i = 1
下面讲一下指针移动(就上面的游标,应该是指针,游标是C语言里面的,asp没有) Rs.MoveNext 向下移动一条 Rs.MovePrevious 向上移动一条 Rs.Movefirst 移动到第一条 Rs.MoveLast 移动到最后一条 Rs.Absoluteposition = n 移动记录指针到第n行 常用的就Rs.MoveNext
讲asp分页的几个方法属性 Rs.Pagesize = n 每页显示N条数据 Rs.absolutepage = n 将记录指针移动第N页的第一条数据 Rs.RecordCount 记录集的总记录数 Rs.PageCount 记录集的总页数
<% Dim Conn,ConnStr Set Conn = Server.CreateObject("Adodb.Connection") ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.Mappath("Date.mdb") Conn.Open ConnStr
Set Rs = Server.CreateObject("Adodb.Recordset") Rs.Open Sql,Conn,1,1 PageSize = 20 Rs.PageSize = PageSize ''每页显示20条 curpage = Request.QueryString("Page") ''得到当前页数 If curpage = "" Or IsNumeric(curpage) Or (curpage-Rs.pagecount) > 0 Then ''如果curpage等于空 或者 不是数值类型 或者 curpage大于总数 &n |