hỏi cách phân trang sau khi tìm kiếm trong CSDL

Thảo luận trong 'Lập Trình Web' bắt đầu bởi xXchienthanXx, 10/1/09.

  1. xXchienthanXx

    xXchienthanXx Mr & Ms Pac-Man

    Tham gia ngày:
    17/11/06
    Bài viết:
    129
    Nơi ở:
    trục quận
    bạn nào cho mình hỏi cách phân trang sau khi tìm kiếm trong CSDL với
    code mình :
    _______________
    <%
    Set prodRS=Server.CreateObject("ADODB.Recordset")
    prodRS.Activeconnection= con
    prodRS.CursorType=adOpenStatic
    prodRS.PageSize=8
    sql = "select * from Bai_Gui_Binh_Luan where Noi_Dung_Bai_Viet LIKE '%" & TuKhoa & "%'"
    set prodRS=con.execute(sql)
    'prodRS.AbsolutePage=pg 'Cái này để phân trang mà nó báo lỗi.
    'nếu "set prodRS=con.execute(sql)" mà thành 'prodRS.Open sqlString' thì có lẽ phân trang được. nhưng mình hem bít ::(
    %>
    <%if prodRS.eof then%>
    ten nay ko ton tai hoac ko co trong CSDL !
    <% else %> <P>
    <b> KET QUA TIM KIEM<hr></b>
    <%WHILE NOT prodRS.EOF%>
    response.Write(prodRS("Ten_Bai_Viet"))
    prodRS.MoveNext
    WEND
    end if %>

    __________
    vấn đề là thế. ai bít chỉ giúp mình. thanks :whew:
     
  2. New Heaven

    New Heaven C O N T R A

    Tham gia ngày:
    9/3/07
    Bài viết:
    1,794
    Nơi ở:
    Cà Mao
    Theo kinh nghiệm mình thì nếu lỗi ở đây là vì chưa có bản ghi nào trả về tức là EOF đã xảy ra ở đây rồi . Bạn set lại thế này xem :

    '
     
  3. xXchienthanXx

    xXchienthanXx Mr & Ms Pac-Man

    Tham gia ngày:
    17/11/06
    Bài viết:
    129
    Nơi ở:
    trục quận
    thank nha. nhưng cách bạn làm ko được. mình mới search google, được đoạn code, chỉnh sửa lại được rùi.
     

Chia sẻ trang này