<% If Request("page")="" Then pageNum=0 Else pageNum=Request("page") End if Content=Replace(recordset1("content"),"","｜｜｜") ContentStr=split(Content,"｜｜｜") For i=pageNum to pageNum %> <%=ContentStr(i)%> <% Next %> </td> </tr> <%if ubound(ContentStr)>=1 then%> <tr> <td height="30" >本文共分 <% For p = 0 to ubound(ContentStr) if p+1= Request("page")+1 then a="<font color=red>" aa="</font>" else a="" aa="" end if %> <a href="detail.asp?ID=<%=request("ID")%>&page=<%=p%>"><%=a%><%=p+1%><%=aa%></a> <% Next %> 頁 </td> </tr> <%end if%>
