---
title: "Kolla om besökaren skriver fula ord.."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/88937-kolla-om-besökaren-skriver-fula-ord"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "jlee"
published: "2003-10-19T20:24:32.000Z"
updated: "2003-10-20T04:39:41.000Z"
replies: 7
views: 509
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/88937-kolla-om-besökaren-skriver-fula-ord"
---

# Kolla om besökaren skriver fula ord..

## #1 — jlee, 2003-10-19T20:24Z

Någon som  vet hur man spärrar fula ord i tex gästbok.....och om det är bäst med javascript eller asp för detta?

Permalänk: https://www.webforum.nu/p/88937

## #2 — Sebbe, 2003-10-19T20:27Z

Du kan ju göra så här med ASP:

```
strFult = "fan,jävlar,skit"
arrFult = Split(strFult, ",")

For i = 0 To UBound(arrFult)
  If InStr(Request.Form("inlagg"), arrFult(i)) > 0 Then
    Response.Redirect("gastbok.asp?fult=" & arrFult(i))
  End If
Next
```

Permalänk: https://www.webforum.nu/p/1190079

## #3 — jlee, 2003-10-19T21:04Z

verkar bra men hur och var lägger jag detta i gboken?

Permalänk: https://www.webforum.nu/p/1190115

## #4 — Fredde Mannen, 2003-10-19T21:08Z

> **jlee skrev:**
>
> verkar bra men hur och var lägger jag detta i gboken?

förmodligen innan information läggs in i databasen, men iofs, finns ett fult ord med i inläggt så skickas de till ex en sida där det står:

Du får inte använda fula ord!

Permalänk: https://www.webforum.nu/p/1190121

## #5 — jlee, 2003-10-19T21:38Z

Skrev så här i sidan som skickar till db´n:

\<%
strDSN = "DRIVER={Microsoft Access Driver (\*.mdb)};DBQ="&Server.MapPath("guestbook.mdb")
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open strDSN
%\>

\<% 

strFult = "fan,jävlar,skit"
arrFult = Split(strFult, ",")

For i = 0 To UBound(arrFult)
  If InStr(Request.Form("kommentar"), arrFult(i)) \> 0 Then
    Response.Redirect("inte.asp?fult=" & arrFult(i))
  End If
Next

sql = "Insert Into Guestbook (Namn,Email,Datum,Kommentar) Values('"
   sql = sql & Request.Form("Namn") & "','"
    sql = sql & Request.Form("Email") & "','"
	sql = sql & Request.Form("Datum") & "','"
		sql = sql & Request.Form("Kommentar") & "')"
			
  Conn.Execute(sql)
Conn.Close
%\>

\<% response.redirect ("Guest.asp")%\>

men detta funkade inte..ska jag ändra på fler ställen?

Permalänk: https://www.webforum.nu/p/1190135

## #6 — jlee, 2003-10-19T21:45Z

He he....tog fel, det funkade visst det....tackar!!

Permalänk: https://www.webforum.nu/p/1190141

## #7 — Fredde Mannen, 2003-10-19T22:12Z

> **jlee skrev:**
>
> He he....tog fel, det funkade visst det....tackar!!

Vad bra! :)

Permalänk: https://www.webforum.nu/p/1190159

## #8 — @nders, 2003-10-20T04:39Z

Förenklingsförslag:

```
strFult = "fan,jävlar,skit"
arrFult = Split(strFult, ",")
```

kan bytas mot

```
arrFult = Array("fan", "jävlar", "skit")
```

Mvh

Permalänk: https://www.webforum.nu/p/1190199

---

Tråden på webben: https://www.webforum.nu/amne/asp/88937-kolla-om-besökaren-skriver-fula-ord