Notifikationer

Markér alle som læst Log ud

w13 Novice

03. april 2004 - 14:46 Der er 11 kommentarer og
1 løsning

Tilfædlig data

-Hej Eksperter... Jeg er netop ved at arbjede på noget ASP og mangler nu bare en lille kode;

-Hvordan henter man en tilfældig oplysning fra databasen?
(Jeg har 2 felter... Et 'autoId' og et 'tip', som er et notat-felt!)

-På forhånd tak...
W13

Synes godt om

phineas_phreak Nybegynder

03. april 2004 - 18:28 #1

nedenstående genererer et tilfældigt tal mellem 1 og 12
Du kan evt. indsætte en SQL inden der hiver antal poster ud i din DB og bruge den.

<%
randomize
randompost = int((12*rnd)+1)
%>

dit ouput vil så se sådan ud og skifter hvergang du reloader din browser:

<%= ramdompost %>

Det kan du så indsætte som kald til din db på følgende måde:
<a href="side1.asp?id="<%= ramdompost %>">Link til post <%= ramdompost %>"> her</a>

Synes godt om

w13 Novice

03. april 2004 - 18:42 #2

Mit problem er så bare at den springer meget i de postede autoId's... Så det ville desværre ikke virke... Er der ikke en enkel SQL-string som henter alle poster ud fra et tilfældigt autoId?

Synes godt om

eagleeye Praktikant

03. april 2004 - 21:06 #3

Hvilken database bruger du?
man kan lave en sql sætning som tager en tilfældig post. Men selve sql sætningen vil afhænge af databasen.

Synes godt om

w13 Novice

04. april 2004 - 10:59 #4

-Jeg bruger Access...

Synes godt om

nozio Nybegynder

04. april 2004 - 19:37 #5

Jeg bruger denne på en SQl-server - måske kan du bruge den:

select top 1 *
from tabel
order by newid()

Synes godt om

w13 Novice

05. april 2004 - 11:26 #6

Men den vælger bare den nyeste, ikke?

Synes godt om

eagleeye Praktikant

05. april 2004 - 11:31 #7

Access har ikke indbygget en function som MySQL og MSSQL har så man må lave det sådan her. Du skal lige rette sql sætnignen sådan det passer med dit.:

<%
randomize
R=clng(100000*rnd)
SQL = "SELECT TOP 1 * FROM tabelnavn ORDER BY rnd(-(autoID)*" & R & ")"
%>

Synes godt om

w13 Novice

06. april 2004 - 11:04 #8

-Nu ser min kode således ud:
____________________________

<html>
<meta http-equiv="Content-Language" content="da">

<body bgcolor="#008080" link="#FFFFFF" vlink="#FFFFFF" alink="#FFFFFF" text="#FFFFFF" leftmargin="0" topmargin="0" rightmargin="0" bottommargin="0">


<%
Set rs = Server.CreateObject("ADODB.RecordSet")
Set Conn = Server.CreateObject("ADODB.Connection")
strDSN = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("datbas/what.mdb")

randomize
R=clng(100000*rnd)
SQL = "SELECT TOP 1 * FROM tips ORDER BY rnd(-(ID)*" & R & ")"
%>
<%=rs("tip")%> 
Dette er et tip!

</body>
</html>
____________________________

ADODB.Recordset error '800a0cc1'

Item cannot be found in the collection corresponding to the requested name or ordinal.

/tip.asp, line 16
____________________________

(Linje 16 er '<%=rs("tip")%> '!)

-Hvad gør jeg galt?

Synes godt om

eagleeye Praktikant

26. august 2004 - 20:14 #9

Har du en kolonne som hedder tip i din tabel?

Synes godt om

w13 Novice

26. august 2004 - 20:59 #10

Ja...

Synes godt om

eagleeye Praktikant

26. august 2004 - 21:02 #11

Hov ser lige noget, umddelbart har du ikke en Set rs=Conn.Execute og en Conn.Open så prøv at rette dette:

<%
Set rs = Server.CreateObject("ADODB.RecordSet")
Set Conn = Server.CreateObject("ADODB.Connection")
strDSN = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("datbas/what.mdb")

randomize
R=clng(100000*rnd)
SQL = "SELECT TOP 1 * FROM tips ORDER BY rnd(-(ID)*" & R & ")"
%>
<%=rs("tip")%> 
Dette er et tip!

Til dette:

<%
Set rs = Server.CreateObject("ADODB.RecordSet")
Set Conn = Server.CreateObject("ADODB.Connection")
strDSN = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("datbas/what.mdb")
conn.Open strDSN

randomize
R=clng(100000*rnd)
SQL = "SELECT TOP 1 * FROM tips ORDER BY rnd(-(ID)*" & R & ")"
set rs=conn.execute(SQL)
%>
<%=rs("tip")%> 
Dette er et tip!

Synes godt om

w13 Novice

26. august 2004 - 22:03 #12

Hurraaa... Det virker... (Taktaktaktak...:-) Har længe haft problemet... (Er ikke just særlig stærk i ASP, men kan simpelthen ikke lade det være!)

W13 : )

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP	9	25/06/202622:20	29/06/202621:55
Tjek alle checkbox i form Af bsn i ASP	4	18/05/202601:57	19/05/202613:33
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS