Asp bir değişken yaratmaya çalışyorum

<%

Set anasayfakategori = Connect.Execute("Select * from kategori where anasayfa=1 order by anasayfasira asc limit 5")
If (anasayfakategori.eof) then
else
ak=0
response.write "<section class=""box-news""> <div class=""row"">"
do while (not  anasayfakategori.eof)
ak=ak+1
adi=anasayfakategori("kategori")
kat=anasayfakategori("id")

anaid(""&ak&") = "kat"  ' tam burada anaid1,anaid2,3 4 5 oluşturup döngüdeki kat idlerini yazmak istiyorum 

anasayfakategori.movenext
loop
end if
close(anasayfakategori)
%>

Kodda anlattıgım gibi bir şey yapmak istiyorum döngüden gelen id değişken olarak tanıtmak istiyorum bir türlü istedigim kdoları yapamadım .

orada 5 tanesini çagırıyorum bunları anaid1 anaid2 anaid3 anaid4 anaid5 değişkenleri nasıl yapa bilirim.