---
title: "Slumpa (min kod)"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/53899-slumpa-min-kod"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "sin_adec"
published: "2002-09-22T08:54:22.000Z"
updated: "2002-09-22T09:22:14.000Z"
replies: 2
views: 198
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/53899-slumpa-min-kod"
---

# Slumpa (min kod)

## #1 — sin_adec, 2002-09-22T08:54Z

Tjenare...
angående min kod.. man kan slumpa poster ur databasen, men problemet med koden är att om du slumpar igen så kan samma post dyka upp igen...
jag vet inte hur jag ska lösa det..

så här ser min kod ut

```
<% 
Set Connect = Server.CreateObject("ADODB.Connection") 
Connect.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("d.mdb") &";pwd=l"
SQL = "SELECT Count(*) AS strKL FROM medlemmar" 
Set RecSet = connect.execute(SQL) 

Randomize 
Set strRecSet = Server.Createobject("ADODB.Recordset") 
SQL = "Select * from medlemmar" 
strRecSet.cursorlocation = 1 
strRecSet.cachesize = 1
strRecSet.open SQL, "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("d.mdb") &";pwd=l"
strRecSet.move Int(Rnd*RecSet("strKL")) 
%>
```

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

## #2 — Denniz PoP, 2002-09-22T09:17Z

Du får helt enkelt spara ID-numret på alla poster som du har slumpat fram i en array (eller på något annat vis). Sedan får du kontrollera med arrayen om du redan har slumpat fram posten.

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

## #3 — sin_adec, 2002-09-22T09:22Z

oh.. hur skulle det se ut??...

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/53899-slumpa-min-kod