Veritabanından çektiğiniz keywords'ler eğer "araba, ferrari, hacı murat, serçe" şeklindeyse yani ,(virgül) ile ayrılmışsa, veritabanından çektiğiniz keywordsleri aşağıdaki kodla manuel girdiğiniz keywords'leri replace ederseniz olur sanırım.

<%
veritabanindan_gelen_keywords = "araba, ferrari, hacı murat, serçe"
parcala_behcet = split(veritabanindan_gelen_keywords, ",")
sag_bastan_say = ubound(parcala_behcet)

function hallet(neymis)
for sira = 0 to sag_bastan_say
neymis = replace(neymis, ""& parcala_behcet(sira) &"", "")
next
hallet = neymis
end function

kelime = "peksoft, araba, r10, en kral asp"

response.write ""& hallet(kelime) &""
%>

Yukardaki kodla replace ettikten sonra ", ," şeklinde olabiliyor, onun içinde onlarıda replace edersiniz olur biter.
Eğer veritabanından çektiğiniz keywords'ler virgül ile ayrılmamışsa manuel girdikleriniz öyledir tam tersini yapın, eğer oda öyle değilse ben bu mesajı yazmadım sizde görmediniz.