---
title: "Slumpa fram ett tal utifrån element i databasen"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/56880-slumpa-fram-ett-tal-utifrån-element-i-databasen"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Thorsander"
published: "2002-10-23T15:13:47.000Z"
updated: "2002-10-23T16:19:14.000Z"
replies: 5
views: 259
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/56880-slumpa-fram-ett-tal-utifrån-element-i-databasen"
---

# Slumpa fram ett tal utifrån element i databasen

## #1 — Thorsander, 2002-10-23T15:13Z

Hej!

Jag sitter för första gången och skall använda mig av Randomize funktionen i ASP...

Jag har en access-databas.
Jag vill få fram ett slumpat värde baserat på antalet poster jag har i databasen.
Alltså om jag har 5 poster så vill jag slumpa fram ett tal mellan 1-5.
Detta tal skall jag sedan använda för att hämta värden ur posten x (värdet/platsen som har slumpats fram).

Hur gör jag!?
Vore himla gosigt om någon ville ta sig tid och hjälpa mig... :)

Jag vet alltså inte hur jag loopar igenom tabellen och kollar hur många poster som finns...
Jag vet inte heller hur jag sedan slumpar fram ett tal ur det värde jag fått fram genom loopen.

Något i still med koden nedan hade jag tänkt att använda när jag väl fått mitt slumpade värde...

Hjälp!!! :OO 

\<%
	Response.Buffer = True
	Dim connStr
		connStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=F:\\xxx\\xxx\\xxx\\xxx\\xxxxxxx.mdb"
  
	Dim con
		Set con = Server.CreateObject("ADODB.Connection")
			con.Open connStr
	Dim rs
		Set rs = Server.CreateObject("ADODB.Recordset")
		
		' opening connection
		rs.Open "select xxxxx from xxxxx where id=**Värdet som slumpats fram** ", con, 3, 4
		
		myVariable = rs("xxxxx")

		rs.Close
		Set rs = Nothing

		con.Close
		Set con = Nothing

	%\>

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

## #2 — Jesper T, 2002-10-23T15:21Z

Det du gör är att klicka på sök, och söka på RND ;)

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

## #3 — Thorsander, 2002-10-23T15:43Z

Jag har gjort det :(
Men inget tycks passa in på mig.

Vore mycket tacksam om någon hade tid!

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

## #4 — Jesper T, 2002-10-23T15:59Z

Kanske detta kan vara ngt?

```
<% 
Response.Buffer = True 
Dim connStr 
connStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=F:\xxx\xxx\xxx\xxx\xxxxxxx.mdb" 

Dim con 
Set con = Server.CreateObject("ADODB.Connection") 
con.Open connStr 
Dim rs 
Set rs = Server.CreateObject("ADODB.Recordset")

totexp=350 -1'Antal idnummer -1 
randomize
slump = cint(rnd * totexp)+1

' opening connection 
rs.Open "select xxxxx from xxxxx where id="& slump &"", con, 3, 4 

myVariable = rs("xxxxx") 

rs.Close 
Set rs = Nothing 

con.Close 
Set con = Nothing 

%>
```

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

## #5 — Thorsander, 2002-10-23T16:13Z

Kanon!
Precis vad jag behövde.
Resten fixar jag själv.

Tackar!!!

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

## #6 — Ekström, 2002-10-23T16:19Z

Det där sättet är inte det bästa om du t.ex. saknar post nr 249. Det är bättre att plocka ut med getrows och sedan slumpa bland dem.

Kolla [här](http://www.webforum.nu/showthread.php?s=&postid=86465#post86465) t.ex.. Gjorde en sökning

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/56880-slumpa-fram-ett-tal-utifrån-element-i-databasen