---
title: "Sök Script"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/94672-sök-script"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Biasse"
published: "2004-01-13T08:58:07.000Z"
updated: "2004-01-13T09:47:48.000Z"
replies: 8
views: 284
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/94672-sök-script"
---

# Sök Script

## #1 — Biasse, 2004-01-13T08:58Z

Hej. Jag har en databas för min musik och har en sök funktion för artister där.  När jag söker på tex. abba så visar den äver sabbath...
Hur ska man göra för att bara visa det bestämda sök ordet?
\__________________________________________________\_-

```
<%
Dim Con
Dim SQL
Dim RS

Set Con = Server.CreateObject("ADODB.Connection") 
Con.Open "DBQ=" & Server.MapPath("db/pitt.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};" 
%>
```

\<html\>
\<head\>
\<title\>\</title\>
\<style fprolloverstyle\>A:hover {color: red; font-weight: bold}
\</style\>
\</head\>

\<body bgcolor="#55BEFD" style="border: 1 solid #000000"\>

\<hr\>

\<p align="left"\>
	\<form action="sokartist.asp" method="post"\>
        \<p align="left"\>
\<u\>
\<br\>
\</u\>
\<font color="#FF0000"\>\<b\>
        \<font face="Verdana" size="1"\>&nbsp;&nbsp;&nbsp;
\</font\>\</b\>\</font\>\<font size="4" color="#000080"\>Sök Artist:&nbsp;\</font\>\<font color="#FF0000"\>\<b\>&nbsp;\</b\>\</font\>&nbsp;&nbsp;&nbsp;
\<font face="Verdana" size="1"\>\<input type="text" name="sokord"\> 
		\<input type="submit" value="sök"\>
        
	\</form\>
  \<font face="Verdana" size="1"\>

 

```
<%
If Request.Form("sokord") <> "" Then
	Response.Write "Din sökning på <b>" & Request.Form("sokord") & "</b> gav följande träffar.<br>" & vbCrLf
	SQL = "Select * from musik Where Artist Like '%" & Request.Form("sokord") & "%' "
	SET RS = Con.Execute(SQL)
		While Not RS.EOF

       Response.Write "<BR>"
		Response.Write "<b>ID: </b>" & RS("ID") & "<b> - Artist: </b>" & RS("artist") & "<br>" & vbCrLf
		Response.Write "<b>ID: </b>" & RS("ID") & "<b> - Album: </b>" & RS("album") & "<br>" & vbCrLf
		Response.Write "<b>ID: </b>" & RS("ID") & "<b> - Omslag: </b>" & RS("omslag") & "<br>" & vbCrLf
		Response.Write "<b>ID: </b>" & RS("ID") & "<b> - Mapp: </b>" & RS("mapp") & "<br>" & vbCrLf
		Response.Write "<b>ID: </b>" & RS("ID") & "<b> - Profil: </b>" & RS("profil") & "<br>" & vbCrLf
		Response.Write "<BR>"
		
	RS.MoveNext
	Wend
	RS.Close
	Set RS = Nothing
End If
%>
```

  \<p align="center"\>&nbsp;\</p\>
        \</font\>
  \<center\>
        \<hr\>
\</font\>\</center\>

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

## #2 — @nders, 2004-01-13T08:58Z

Snälla, använd \[kod\]-taggar, så är det lättare att läsa koden, och därmed också lättare att hjälpa.

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

## #3 — Biasse, 2004-01-13T09:06Z

Det är bara koden det här nu.

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

## #4 — @nders, 2004-01-13T09:07Z

Eh, va?

Går det inte att lägga den koden i \[kod\]-taggar?

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

## #5 — Biasse, 2004-01-13T09:10Z

Jo det är jag som inte förstår hur du menar.    Jag vet inte vad  du menar av det jag ska lägga in i taggar.

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

## #6 — @nders, 2004-01-13T09:19Z

<http://www.webforum.nu/misc.php?s=&action=bbcode>

Titta på avsnittet "Infoga kod"

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

## #7 — Biasse, 2004-01-13T09:29Z

Hoppas jag fattat det här rätt nu  hehe   :-)

Redigerade det översta.

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

## #8 — LarsG, 2004-01-13T09:38Z

```
SQL = "Select * from musik Where Artist = '" & Request.Form("sokord") & "'"
```

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

## #9 — Biasse, 2004-01-13T09:47Z

Tack..     Gick direkt  :-)

mvh  Biasse

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/94672-sök-script
