ページ関数はどう書きますか?


page.inc<%Sub Show PageBar(TotalPage、CurPage、strurl)'パラメータTotalPage:全ページ数;CurPage:現在のページ数;strul:ページをめくるときに使う接続アドレス.DIM strange CurePage=GetValidPageno(TotalPage,CurPage)Reponse.Write"
>EELESE Reponse.Write“次ページ”END IIF IF IFI IFI Int(>CurPage)<>cInt(TotalPage)THENENReponse.Write"