簡単なASP改ページコード(正しいテスト)第1/2ページ


この文章は急いで全面的にテストしました。ASP+ACCESSとASP+SQLをサポートします。関連部分を修正してください。基本的な質問については、早々に断ってください。このコードはもう簡単です。もしまだわからないなら、当駅の他の欄を参照してください。include file=「conn.asp」--><% '以上はデータベース接続ファイルを含む---------------------------検索開始データベースset rs=server.reat Object(adodb.recordset)rs.open "プロジェクト * from ブックス where id=「&id&」 order by id。 desc",conn,1,1 if r.number<>0 thenレスポンス.write "データベースにデータがありません。 if'----------------------改ページ開始if RS.recordcount=0 then    レスポンス.write "データがありません。「else rs.PageSize」 =10 '各ページの記録条数iCount=rs.RecordCount '記録総数iPageSize=rs.PageSize maxpage=rs.PageCount  page=request(「page」)    if Not IsNumeric(page) or page=" then        page=1    else        page=cint(page)    end if    if page<1 then        page=1    elseif  page>maxpage then        page=maxpage    end if    RS.Absolute Page=Page if page=maxpage then  x=iCount-(maxpage-1)*iPageSize else  x=iPageSize end if For i=1 To x
1 2 次のページ 全文を読む