请教用什么方法可以把这些相同的代码放在另一个文件里，然后在小弟我的分页时调用就可以了？

请问用什么方法可以把这些相同的代码放在另一个文件里，然后在我的分页时调用就可以了？？？？
<%if rs.pagecount > 0 then%>
     当前页<%=intpage%>/<%=rs.PageCount%>
     <%else%>
     当前页0/0
 <%end if%>
     <a href="?page=1<%if request("step")="lei" then%>&step=lei<%end if%><%if request("step")="leimod" then%>&step=leimod<%end if%><%if request("fid")<>"" then%>&fid=<%=request("fid")%><%end if%><%if request("ceng")<>"" then%>&ceng=<%=request("ceng")%><%end if%><%if request("mc")<>"" then%>&mc=<%=request("mc")%><%end if%><%if request("id")<>"" then%>&id=<%=request("id")%><%end if%><%if request("step1")="so" then%>&step1=so<%end if%>">首页</a> | 
     <%if pre then%>
     <a href="?page=<%=intpage -1%><%if request("step")="lei" then%>&step=lei<%end if%><%if request("step")="leimod" then%>&step=leimod<%end if%><%if request("fid")<>"" then%>&fid=<%=request("fid")%><%end if%><%if request("ceng")<>"" then%>&ceng=<%=request("ceng")%><%end if%><%if request("mc")<>"" then%>&mc=<%=request("mc")%><%end if%><%if request("id")<>"" then%>&id=<%=request("id")%><%end if%><%if request("step1")="so" then%>&step1=so<%end if%>">上一页</a> | <%end if%>
     <%if last then%>
     <a href="?page=<%=intpage +1%><%if request("step")="lei" then%>&step=lei<%end if%><%if request("step")="leimod" then%>&step=leimod<%end if%><%if request("fid")<>"" then%>&fid=<%=request("fid")%><%end if%><%if request("ceng")<>"" then%>&ceng=<%=request("ceng")%><%end if%><%if request("mc")<>"" then%>&mc=<%=request("mc")%><%end if%><%if request("id")<>"" then%>&id=<%=request("id")%><%end if%><%if request("step1")="so" then%>&step1=so<%end if%>">下一页</a> |<%end if%>
 
     <a href="?page=<%=rs.PageCount%><%if request("step")="lei" then%>&step=lei<%end if%><%if request("step")="leimod" then%>&step=leimod<%end if%><%if request("fid")<>"" then%>&fid=<%=request("fid")%><%end if%><%if request("ceng")<>"" then%>&ceng=<%=request("ceng")%><%end if%><%if request("mc")<>"" then%>&mc=<%=request("mc")%><%end if%><%if request("id")<>"" then%>&id=<%=request("id")%><%end if%><%if request("step1")="so" then%>&step1=so<%end if%>">尾页</a> | 转到第
      <select name="sel_page" onchange="javascript:location=this.options[this.selectedIndex].value;">
      <%
       for i = 1 to rs.PageCount