字符串转复选框，数据丢失问题，如何实现显示

假如 SJGuZang 字段里有内容：请根据提|通过指定分|现在页面想| 速度更快|天内没有回答自动|在思考实践|源码的问题 等等。。中间都是 | 隔开的。

现在页面想读取字段字符串转换为复选框该如何实现。
想达到的效果为：

img

4框一换行。该如何实现。

现有代码如下，不能换行，且1,3,5,7 等数据丢失，不知该如何写，才能达到效果，请指点。


 <%
if instr(str,"|")<>"" Then 
    ArrayInfo = Split(str, "|")
total=Ubound(ArrayInfo)

For i=0 To total 
  
   i=i+1
   if i = 4 then 
   response.write "<br>"
   end if
   response.Write "<label><input type=""checkbox""  value="""&ArrayInfo(i)&""" class=""week"" style=""vertical-align:middle;"" />  "
   response.write " "&ArrayInfo(i)&" "
   response.write "&nbsp;&nbsp;</label>"
   response.Flush()
  
Next  


%>

浏览器访问，看看你输出的html是什么样的，SJGuZang有没有值，html有没有出错