-
在被截断的地方很容易找到下列标志。
；'！
如果以后有存在
或
分页。最主要的目的是研究文章的格式。
如果Request.ServerVariables（content_length ）> 0
内容=请求。形式（textarea1 ）
页长= 1000每页号
clength = Len（内容）
总页数= int（clength /页长）页+ 1的数
昏暗的pagearray
ReDim PageArray（总页数）
分离器=阵列（CHR（13），CHR（10），，
PageArray（0）= 0
POS = 0
J = 0，UBound（分离器）
POS =仪器（PageArray（我）+ 900、内容、分离器（j））'pagearray（我）+ 900近100字的位置，1-999可调
而POS > 0和POS我页长
PageArray（我）= POS
POS =仪器（POS +页长，内容、分离器（j））
走
如果PageArray（我）> 0
响应。写0：ibrvbar；pagearray（我）
J：J分离器（J ）
J = J + UBound（分离器）+ 1
最后如果
下一个
我pagecount-1 = 1
PageArray（我）= 0
POS = 0
J = 0，UBound（分离器）
POS =仪器（PageArray（i-1）+ 950、内容、分离器（j））
而POS > 0和POS我页长
PageArray（我）= POS
POS =仪器（POS +页长，内容、分离器（j））
走
如果PageArray（我）> 0
反应。我写的：ibrvbar；pagearray（我）
J：J分离器（J ）
J = J + UBound（分离器）+ 1
最后如果
下一个
下一个
输出=中（内容，1，PageArray（0））
输出=取代（输出，CHR（13），
）
响应。
第一段
写输出响应
我pagecount-2 = 1
输出=中（内容、PageArray（i-1）+ 1，PageArray（我）PageArray（i-1））
输出=取代（输出，CHR（13），
）
响应。
节i + 1
写输出响应
下一个
最后一段输出没有写入。
其他的
%>