<% Function arasinda(yazi,bas,son) adet=0 dim dondur(88) for nn=0 to 88:dondur(nn)="HATAVAR:bu dizi boş,Kaçtane sonuç döndüğünü görek için 0.diziyi açınız":next parca=split(yazi,bas) if ubound(parca)>0 then parcasay=ubound(parca) for i=1 to parcasay parca2=split(parca(i),son) if ubound(parca)>0 then adet=adet+1 'bulunduu dondur(adet)=parca2(0) end if next end if dondur(0)=adet arasinda=dondur end Function %>arada hata çıkabilir bildiren olursa geliştirmeye çalşırız.
kullanımı için örneğin texetimiz "şehir:kastamaonu,şehir:istanbul,şehir:ankara olsun" olsun
sonuc=arasında(text,"şehir:",",")(0)şeklidende girersek sonuç olarak bu kritere uyan kaç dönüş oldunu verir burada 3 çıkacaktır.
0 yerine 1 yazarsak kastamonu,2 yazarsan istanbul çıkacaktır