Dagens udtræk

Kan du forklare dig lidt nærmere.
Hvad mener du med tilfældigt?
Mvh / Mugs

okey, et script som hver dag laver et tilfældigt udtræk fra en accessdatabase.
skal jeg gå dybere ind i sagen??? eller har du forstået

Snakker du lotteri??

lotteri???????????
okey vi tager det helt fra bunden af...
vi siger at jeg har en access database fyldt med vittighedder.
jeg vil gerne have et lille script som hver dag tager en tilfældig vittighed ud fra access databasen, lægger den ud på siden. så jeg har en dagens vittighed, som opdaterer sig selv.

Så nu kan det vel ikke forklares nærmere

knast> is there an autonumber as the primary key, or some other way of finding a unique record?

Her er et link:

http://www.mvps.org/access/queries/qry0011.htm

Niels

ja, men det må gerne være sådan at den laver et tilfældigt udtræk om dagen og ikke hver gang man besøger siden

Du kunne lave den som en tabel oprettelsesforespørgel og lade forespørgslen køre en gang om dagen. Den retter så i destinationstabellen, som skal være grundlaget for dagens vits.
Noget alla:

SELECT TOP 1 tblAlleVitser.*
INTO tblDagensVits
FROM tblAlleVitser
WHERE (((randomizer())=0))
ORDER BY Rnd(IsNull(tblAlleVitser.ID)*0+1);

Hvordan du vil kører forespørgslen én gang om dagen ved jeg ikke.

Niels

I think nih has given you a good answered on how to actually take a random joke from the database but how you do this once a day is another problem!

You obviously want to automate this, so that you can take a holiday once in a while. So I would suggest the following method, ithink its about the esiest!

I have no idea as to how your WEB looks but lets say you have a start page. From there you could make your SELECT TOP ... as nih has explained. In the function randomize() you could also update a table which contains the date and time the tblDagensVits was updated, then you test to see if a day has gone, and if so select the next joke, if not just return.

I think the easiest is to

remove \"I think the easiest is to\"

Du kan gøre det på flere måder. Her er én af dem:

Opret en kolonne mere i din vits-tabel og kald den f.eks \"vitskode\". Nu udfylder du hele denne kolonne ved at oprette følgende funktion:

Public Function MakeRandom(myDate)
    MakeRandom = Rnd(-DateSerial(Year(myDate), Month(myDate), Day(myDate)))
End Function

Og kald den med alle årets dage, som variabel.

Herefter vælger programmet en ny vits hver dag med følgende funktion:

Public Function myRandom()
    myRandom = Rnd(-DateSerial(Year(Now()), Month(Now()), Day(Now())))
End Function