Getrows, visst värde skrivs inte ut

Använder denna kod för sökning:

Dim Connect, RecSet, ArrRecSet, i, p(3)
Set RecSet = Connect.Execute("Select TOP 20 A,B,C from XYZ WHERE A LIKE '%"&FixaTecken(Request.form("A"))&"%' ")

If RecSet.EOF Then 
RecSet.Close : Set RecSet = Nothing 
Connect.Close : Set Connect = Nothing
Response.Write "Inga poster matchade din sökning.." 
 
Else ArrRecSet = RecSet.GetRows() 
RecSet.Close : Set RecSet = Nothing 
Connect.Close : Set Connect = Nothing 

For i = 0 To UBound(ArrRecSet,2)

p(0) = ArrRecSet(0,i) 'A
p(1) = ArrRecSet(1,i) 'B
p(2) = ArrRecSet(2,i) 'C

Response.write "<br>"& p(0) &","& p(1) &","& p(2) &""

Problemet är att p(2) alltid är tomt, fast jag vet att det finns värde ibland.