Har nu lagt till LEFT, får se om det fungerar när servern har återhämtat sig...
strx = Left(request.form("text"), 500)
strx = replace(strx, "–", " ")
strx = replace(strx, "·", " ")
strx = replace(strx, ".", " ")
strx = replace(strx, ",", " ")
strx = replace(strx, "´", " ")
strx = replace(strx, "’", " ")
strx = replace(strx, ";", " ")
strx = replace(strx, "«", " ")
strx = replace(strx, "»", " ")
strx = replace(strx, ":", " ")
strx = replace(strx, "`", " ")
strx = replace(strx, "*", " ")
strx = replace(strx, "'", " ")
strx = replace(strx, """", " ")
strx = replace(strx, "'", " ")
strx = replace(strx, "+", " ")
strx = replace(strx, "…", " ")
strx = replace(strx, "°", " ")
strx = replace(strx, "•", " ")
strx = replace(strx, "=", " ")
strx = replace(strx, "|", " ")
strx = replace(strx, ">", " ")
strx = replace(strx, "<", " ")
strx = replace(strx, "/", " ")
strx = replace(strx, "\", " ")
strx = replace(strx, "_", " ")
strx = replace(strx, ")", " ")
strx = replace(strx, "(", " ")
strx = replace(strx, "@", " ")
strx = replace(strx, "&", " ")
strx = replace(strx, "%", " ")
strx = replace(strx, "1", " ")
strx = replace(strx, "2", " ")
strx = replace(strx, "3", " ")
strx = replace(strx, "4", " ")
strx = replace(strx, "5", " ")
strx = replace(strx, "6", " ")
strx = replace(strx, "7", " ")
strx = replace(strx, "8", " ")
strx = replace(strx, "9", " ")
strx = replace(strx, "0", " ")
strx = replace(strx, "*", " ")
strx = replace(strx, "~", " ")
strx = replace(strx, "[", " ")
strx = replace(strx, "]", " ")
strx = replace(strx, "{", " ")
strx = replace(strx, "}", " ")
strx = replace(strx, "?", " ")
strx = replace(strx, "!", " ")
strx = replace(strx, "é", "e")
strx = replace(strx, "è", "e")
strx = replace(strx, "”", "")
strx = replace(strx, "“", "")
strx = replace(strx, vbCrLf, " ")
strx = LCase(strx)
sedan kör jag en split där jag kollar om ordet redan finns i databasen
(Jag vet att replace inte är det bästa sättet...)