比如以下文字：
群星新城”项目是我司与新塘镇群星村合作投资兴建集住宅、商业、休闲娱乐于一体的综合性项目，该项目于2004年9月正式启动。新塘镇的地理位置优越，同时接受广州、深圳和香港三地的经济辐射，被国内外经济学家称为“黄金走廊、投资宝地”。天时地利人和的“合力”使公司在增城市房地产建设的大道上迈出了重要的一步。
群星新城项目占地约300亩：第一期村民公寓项目占地面积约100亩，总建筑面积约 331004平方米：其中公寓楼17幢，每幢包括商业裙楼 2 层，住宅19～24层；公寓配套项目占地面积约100亩，其中村委会大楼占地面积20亩，医疗卫生站占地面积约15亩，市场占地面积约20亩，小学及幼儿园共约占地45亩；第二期商业部分酒店占地约100亩。项目第一期概算投资七亿多元，计划于2008年元月竣工并交付使用。群星新城建设遵循园林化、花园式的生态谷设计理念，集中体现自然、人文和理性相得益彰的品位。整个项目形成三个相对完整的功能区域，动静状态相互区别又有机结合，为村民生活居住及休闲消费提供一流的内部环境。项目建成后将在增城形成高级社区一体化服务规模，推进居住及休闲消费的优质化发展，成为增城市今后市貌的一大亮点，铸造城市住宅社区的一大品牌。我想实现这样的效果 ： [上一页] [下一页] [返回] 如何实现呢？
群星新城”项目是我司与新塘镇群星村合作投资兴建集住宅、商业、休闲娱乐于一体的综合性项目，该项目于2004年9月正式启动。新塘镇的地理位置优越，同时接受广州、深圳和香港三地的经济辐射，被国内外经济学家称为“黄金走廊、投资宝地”。天时地利人和的“合力”使公司在增城市房地产建设的大道上迈出了重要的一步。
群星新城项目占地约300亩：第一期村民公寓项目占地面积约100亩，总建筑面积约 331004平方米：其中公寓楼17幢，每幢包括商业裙楼 2 层，住宅19～24层；公寓配套项目占地面积约100亩，其中村委会大楼占地面积20亩，医疗卫生站占地面积约15亩，市场占地面积约20亩，小学及幼儿园共约占地45亩；第二期商业部分酒店占地约100亩。项目第一期概算投资七亿多元，计划于2008年元月竣工并交付使用。群星新城建设遵循园林化、花园式的生态谷设计理念，集中体现自然、人文和理性相得益彰的品位。整个项目形成三个相对完整的功能区域，动静状态相互区别又有机结合，为村民生活居住及休闲消费提供一流的内部环境。项目建成后将在增城形成高级社区一体化服务规模，推进居住及休闲消费的优质化发展，成为增城市今后市貌的一大亮点，铸造城市住宅社区的一大品牌。我想实现这样的效果 ： [上一页] [下一页] [返回] 如何实现呢？
第一个参数：文章内容，第二个：页数样式 ，第三个：分页标签
很简单的功能，你可以自己在修改下！
sub PageBreak(RsContent,PageStyle,PageSign)
dim selectContent,sign,ThisPagePath,QuertString,StringArr,ArrUbound, FormtStringArr,RightAllPath,page,content,cont
selectContent=RsContent
if PageSign<>"" then
sign=PageSign
else
sign="{$GFnextpage$}"
end if
ThisPagePath= "http://" & request.ServerVariables("HTTP_HOST") & request.ServerVariables("SCRIPT_NAME")
QuertString=request.ServerVariables("QUERY_STRING")
StringArr=split(QuertString, "&") for each temp in StringArr
y=split(temp, "=")
if strcomp(y(0), "page",1)<>0 then
FormtStringArr=FormtStringArr & y(0) & "=" & y(1) & "&"
end if
next
RightAllPath=ThisPagePath & "?" & FormtStringArr
page=request.QueryString("page")
content=selectContent
if instr(content,sign)>0 then
cont=split(content,sign)
if page="" then page=0
if isnumeric(page)=false then page=0
page=cint(page)
page=page-1
if page<0 then page=0
if page>ubound(cont) then page=ubound(cont)
response.Write cont(page)
response.Write "<p align=center style=margin-top:10px;>"
response.Write " <font size='2px;'>"
for i=0 to ubound(cont)
if page<>i then
response.Write "<a href='" & RightAllPath & "page="&i+1&"' class="&PageStyle&">"&i+1&"</a> "
else
response.Write "<font color='#fffff0'>["&i+1&"]</font> "
end if
next
response.Write "</font></p>"
else
response.Write content
end if
end sub
<head runat="server">
<title>无标题页</title>
</head>
<body>
<form id="form1" runat="server">
<div id="divContent" runat="server">
</div>
<a id="pro" href='<%="Default.aspx?page="+(pageIndex-1) %>' >上一页</a>
<a id="next" href='<%="Default.aspx?page="+(pageIndex+1) %>'>下一页</a>
</form>
</body>
</html>using System;
using System.Data;
using System.Configuration;
using System.Web;
using System.Web.Security;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.WebControls.WebParts;
using System.Web.UI.HtmlControls;public partial class _Default : System.Web.UI.Page
{
private string[] strContents;
protected int pageIndex = 0;
protected void Page_Load(object sender, EventArgs e)
{
if (!IsPostBack)
{
//分隔符为"||"
string str = @"||群星新城”项目是我司与新塘镇群星村合作投资兴建集住宅、商业、休闲娱乐于一体的综合性项目，该项目于2004年9月正式启动。
||新塘镇的地理位置优越，同时接受广州、深圳和香港三地的经济辐射，被国内外经济学家称为“黄金走廊、投资宝地”。
||天时地利人和的“合力”使公司在增城市房地产建设的大道上迈出了重要的一步。
||群星新城项目占地约300亩：第一期村民公寓项目占地面积约100亩，总建筑面积约 331004平方米：其中公寓楼17幢，每幢包括商业裙楼 2 层，住宅19～24层；公寓配套项目占地面积约100亩，其中村委会大楼占地面积20亩，医疗卫生站占地面积约15亩，市场占地面积约20亩，小学及幼儿园共约占地45亩；第二期商业部分酒店占地约100亩。
||项目第一期概算投资七亿多元，计划于2008年元月竣工并交付使用。群星新城建设遵循园林化、花园式的生态谷设计理念，集中体现自然、人文和理性相得益彰的品位。
||整个项目形成三个相对完整的功能区域，动静状态相互区别又有机结合，为村民生活居住及休闲消费提供一流的内部环境。项目建成后将在增城形成高级社区一体化服务规模，推进居住及休闲消费的优质化发展，成为增城市今后市貌的一大亮点，铸造城市住宅社区的一大品牌。 ";
strContents=str.Split(new string[]{"||"},StringSplitOptions.RemoveEmptyEntries); string strPage = Request.QueryString["page"];
if (!int.TryParse(strPage, out pageIndex))
{
pageIndex = 0;
}
FillDiv(strContents, pageIndex);
}
} private void FillDiv(string[] strs,int i)
{
if (strs.Length == 0 || i < 0 || i >= strs.Length )
{
return;
}
divContent.InnerHtml = strs[i];
}
}