Slet i en streng

Kan det her bruges?

<%
strOrd = "Bryggers,etellerandet,Bryggers,Bryggers,nogetheltandet,Bryggers"
arrOrd = Split(strOrd,",")

For t = 0 to UBound(arrOrd)
strOrdet = arrOrd(t)

For n = t + 1 to UBound(arrOrd)
If strOrdet = arrOrd(n) Then
arrOrd(n) = ""
End If
Next

Next

strOrd = ""
For t = 0 to UBound(arrOrd)
If t = LBound(arrOrd) OR arrOrd(t) = "" Then
strOrd = strOrd & arrOrd(t)
Else
strOrd = strOrd & "," & arrOrd(t)
End If
Next

Response.Write "strOrd = " & strOrd
%>

- Nu skulle alle ord der gentager sig selv være fjernet.
Resultat:
http://frip.dk/serverside/fjernensord.asp