---
title: "script som visar ett slumpvis utvalt ordspråk"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/40861-script-som-visar-ett-slumpvis-utvalt-ordspråk"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "carbon.nu"
published: "2002-04-04T12:36:04.000Z"
updated: "2002-04-04T15:33:26.000Z"
replies: 8
views: 257
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/40861-script-som-visar-ett-slumpvis-utvalt-ordspråk"
---

# script som visar ett slumpvis utvalt ordspråk

## #1 — carbon.nu, 2002-04-04T12:36Z

Nån som har ett script som visar ett slumpvis utvalt ordspråk ur en databas eller liknadnde, inte en mySQL databas

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

## #2 — andreas_lindh, 2002-04-04T12:46Z

Så här gör jag

```
<% 
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=sökväg till databasen"

SQL = "Select * FROM citat"
RStemp = UBOUND(oConn.Execute(SQL).GetRows(),2)+1 

Randomize
post = Int(RND*RStemp)
Set RS = oConn.Execute(SQL)
For s = 1 to post
RS.MoveNext
Next
%>
<% =RS("Citat") %>
<% Rs.Close
Set Rs = Nothing %>
```

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

## #3 — erka, 2002-04-04T12:47Z

gör det själv så lär du dig samtidigt

en databas i access kan se ut så här

CITATCOLL
\-Pk_CitatId (räknare, primärnyckel)
\-InsertDate (datum)
\-CitatFrom (text, vem som sa det)
\-CitatContent (pm, vad han/hon sa)

sen är det bara att söka på slumpa i detta forum så hjälper vi dig :)

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

## #4 — carbon.nu, 2002-04-04T12:50Z

du råkar inte ha databasen åxå , så jag slipper göra en egen??hehe

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

## #5 — erka, 2002-04-04T12:51Z

är du lat :e

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

## #6 — carbon.nu, 2002-04-04T12:51Z

ERKA**erka:** OK, ska försöka

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

## #7 — carbon.nu, 2002-04-04T12:52Z

**erka** jag höll på att skriva svar til andreas_lindh, så jag såg inte ditt inlägg

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

## #8 — carbon.nu, 2002-04-04T12:55Z

ok, nu har jag gjort databasen med de olika kolumnerna...

ska jag bara avnända att ta fram dom då lr??

```
<% 
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=sökväg till databasen"

SQL = "Select * FROM citat"
RStemp = UBOUND(oConn.Execute(SQL).GetRows(),2)+1 

Randomize
post = Int(RND*RStemp)
Set RS = oConn.Execute(SQL)
For s = 1 to post
RS.MoveNext
Next
%>
<% =RS("Citat") %>
<% Rs.Close
Set Rs = Nothing %>
```

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

## #9 — eas, 2002-04-04T15:33Z

Ja,
du måste ange sökvägen till databasen.
Om den ligger i samma mapp kan du använda:

```
"driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("filnamn.mdb")&";"
```

Om du gjorde som erka skrev måste du också ändra RS("Citat") till RS("CitatContent")  :)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/40861-script-som-visar-ett-slumpvis-utvalt-ordspråk