番号の配列の合計を古典的なasp

Question

私は配列を持っている=配列（1,2,3,4,5,6,7,8,9,10）

私は1 +第2アイテム+第3アイテム+第3アイテム+第4アイテム+第2アイテム+第3アイテム+第2アイテム+第3アイテム+第3アイテム+第5アイテムso on

私は古典的なASPでこれを行うことができます、ここで私の試みです。または1つの試み。

  Dim p, m, a, t 
      a = array(0,1,2,3,4,5,6,7,8,9,10,11,12,12,13,14) 
      t = 0 
      p = 0  
      m = 0  
      For x = m To 14          
       p = p + 1      
       if p < 4 then 
        t = t + a(x) 
       end if 
       if p = 3 then 
        m = 0 
        p = 0 
        ReDim Preserve arr(UBound(a) - 1) 
        response.Write t & "<br />" 
       end if 
      Next 

私の計画は、この時点で、アレイからの最初のアイテムを取り除くようとき（M = 0つまり）が4番目の項目を打つときに開始インデックスをリセットし、その後、4つの項目を追加することでした2番目の項目が最初の項目になります。

Answer 1

あなたは、必要以上に複雑なものになっていると思います。 （詳細を特定するために質問を単純化しすぎてしまった）

For i = 0 to UBound(a) - 2 
    t = a(i) + a(i+1) + a(i+2) 
    Response.Write a(i) & " + " & a(i+1) & " + " & a(i+2) & " = " & t & "<br>" 
Next