veriyi kelimelere ayırmak ?

<%
Set haberler = Server.CreateObject("ADODB.Recordset")
sor = "Select * from kaynaklar order by hit desc"
haberler.Open sor,Sur,1,3

for i = 1 to 10
if haberler.eof then exit for
%>

<a href="x"><%=haberler("isim")%></a>

<%
haberler.movenext
Next
haberler.close()
set haberler = nothing %>

Yukarıdaki bir kaynak kod var ve <%=haberler("isim")%> ile sayfaya başlık ismini yazdırıyorum 3-4-5 kelimeden oluşan bir başlık olabiliyor (xxx yyyy zzzz qqq gibi )

<%=haberler("isim")%> den çıkan başlığı nasıl , (virgül) ile ayırıp yazdırabilirim ? (xxx, yyyy, zzzz, qqq gibi ) şeklinde parçalancak

<%
kelime = "xxx yyyy zzzz qqq"
ayir = split(kelime, " ")
for each kelime in ayir
response.write ""&kelime&", "
next
%>

yada


<%
'bu fonksiyon ile boşluk olan kısımları virgül ile değiştirdik, eğer kelime içinde nokta soru işareti ünlem vs. varsa kalın olan sıradakilerin başlarındaki ' işaretini kaldırın.
Function Ayirici(veri)
veri=replace(veri," ",","1,-1,1)
'veri=replace(veri,".",","1,-1,1)
'veri=replace(veri,"'",","1,-1,1)
'veri=replace(veri,"!",","1,-1,1)
'veri=replace(veri,"?",","1,-1,1)
Ayirici=veri
End Function


Set haberler = Server.CreateObject("ADODB.Recordset")
sor = "Select * from kaynaklar order by hit desc"
haberler.Open sor,Sur,1,3

for i = 1 to 10
if haberler.eof then exit for
%>

<a href="x"><%=Ayirici(haberler("isim"))%></a>

<%
haberler.movenext
Next
haberler.close()
set haberler = nothing %>

amacım boşluklara , koymak değil <%=haberler("isim")%> dan çıkan cümleyi parçalamak etiket bulutu gibi kullanıp parçanalananlara ayrı ayrı link vermek

<%=haberler("isim")%> çıkan cümle qqq xxx yyy zzz ise bunu
<a href="">qqq</a>
<a href="">xxx</a>
<a href="">yyy</a>
<a href="">zzz</a> şeklinde yazdırmak ne kadar kelime çıkıosa her kelime için link

;
İstediğinizi daha detaylı anlatmanız gerek o zaman, aklınızdan geçeni okuyamayız sonuçta.
Aşağıdaki gibi sanırım istediğiniz.

<%
kelime = "xxx yyyy zzzz qqq"
ayir = split(kelime, " ")
for each kelime in ayir
%>
<a href="etiket.asp?etiket=<%=kelime%>"><%=kelime%></a>, 
<%
next
%>

teşekkürler