[代码fts=6][代码ftf=Wingdings]这里换成你要写的文字,写多少字都可以[代码/ft]
用的时候记得把代码两个字都去掉

此代码只有在日志中使用，想知道什么字只要把图案粘贴到记事本中就可以知道打的是什么字了。

 <%  
  定义分页变量，7000是每页显示的字数  
  dim   wznr,wzcd  
  wznr=ar("content")  
  wzcd=len(wznr)  
  n=int(wzcd/7000)+1  
  dim   n_c(50)  
  for   ys=1   to   n  
  n_c(ys)=mid(wznr,((ys-1)*7000+1),7000)  
  next  
  %>  
  <%  
  dim   n_p  
  n_p=request("offset")  
  if   n_p=""   then   n_p=1  
  定义结束  
  %>  
   
  页码显示  
  <%   if   n>=2   then   %>  
              <%   for   n_p=1   to   n   %>  
              [   <a   href="detail.asp?thirdID=<%=ar("thirdID")%>&offset=<%=n_p%>">第<%=n_p%>页</a>]    
              <%   next   %>  
              <%   end   if   %>  
   
  内容调用  
  <%=n_c(n_p)%>