Visning af bestemte records

Prøv at se her: http://www.html.dk/tutorials/asp/lektion19.asp

//Claus

Hvis du stadig er i tvivl så spørg bare løs.

skal det være de seneste 8 eller hvordan skal udvælgelsen foregår?

Hvis du har et id felt kan du

  select * from tabelnavn where id=7 or id=8 or id=116 or id=16 or id=2 or id=1023

erikjacobsen...  Så foretrækker jeg nu:

SELECT * FROM tabelnavn WHERE id IN (1,2,6,1023)

er det muligt i Access er det meget bedre. I MySql bliver der lavet binær søgning
på tallene, og det er hurtigere end en masse OR

Jeg har lige været inde og teste det i access. Den er helt i vinkel :-)

Så lærte jeg det ;)  Også i Access 97 ? (ja, nu strammer vi den ....)

Det har jeg desværre ikke lige mulighed for at teste :-(

Jeg får denne fejl
select * from PRODUKTER where ID in (1,2,3)
-------^

Følgende er taget og rettet fra: http://www.html.dk/tutorials/asp/lektion19.asp

Kopier alt under stregen ind i et dokument, og gem det som f.eks. hent_produktnavn.asp

Husk at rettet din_database.mdb til navnet på din database. Ligeledes skal du rette Produktnavn til et feltnavn fra din tabel produkter.

//Claus
-------------------------------------------------

<html>
<title>Hente data fra database</title>
<head>
</head>
<body>
<%
\' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
DSN = DSN & \"DBQ=\" & Server.MapPath (\"din_database.mdb\")
Conn.Open DSN

\' SQL forespørgsel, hent alle kolonner fra tabellen
strSQL = \"select * from PRODUKTER where ID in (1,2,3)\"
\' Udfør forespørgsel (rs indeholder nu resultatet)
Set rs = Conn.Execute(strSQL)

\' Gennemløb Recordset (rs) med en løkke
Do

  \' Udskriv værdien af kolonnen Produktnavn
  Response.Write rs(\"Produktnavn\") & \"<br>\"

  \' Gå til næste Record i rs
  rs.MoveNext

\' Fortsæt indtil rs er gennemløbet (EOF = End Of File)
Loop While Not rs.EOF

\' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>
</body>
</html>

Her ser jeg umiddelbart ét problem. Du looper før du ved om der er noget i recordsettet. Sæt hellere klausulen ind oppe hvor du skriver do.

Do While Not rs.EOF
  Response.Write rs(\"Produktnavn\") & \"<br>\"
  rs.MoveNext
Loop

Det er ikke nogen fejl, men det er en god måde at gøre det på :-)

runesoft>> Du har da ret - tak :o)

Jeg fik samme fejl men når jeg fjernede \"where ID in (3010,3011,3012)\" lavede siden en lang liste.
Hvordan kan det være at den ikke kan når det er skrevet i linien.
Jeg har tjekket ID numrene og de er ok

ID er numerisk i basen ikke?

I ID rækken er tale om hele tal uden automatisk nummerering og uden dubletter

paster du ikke lidt af din kode?

<%
\' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
DSN = DSN & \"DBQ=\" & Server.MapPath (\"../Log/Produkter.mdb\")
Conn.Open DSN

\' SQL forespørgsel, hent alle kolonner fra tabellen
strSQL = \"select * from produkter \"
\' where ID in (3110,3111,3112) ...Der er ingen fejl når dette er fjernet
\' Udfør forespørgsel (rs indeholder nu resultatet)
Set rs = Conn.Execute(strSQL)

\' Gennemløb Recordset (rs) med en løkke
Do While Not rs.EOF
  Response.Write rs(\"Nr\") & \"<br>\" \'Nr er rækkens navn
  rs.MoveNext
Loop

\' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>

Så prøv da erikjakobsens svar

Jge får denne fejl. Kan det være fordi denne opstilling af ID\'s ikke understøttes?

Microsoft OLE DB Provider for ODBC Drivers error \'80040e10\'

[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.

/new_version/Tilbud1.asp, line 39

Jeg fik det til at virke og har valgt at give nordclc de 30 points da han kom med lektion Nr 19 og viste hvordan tingene hang sammen. Runesoft burde dog også have lidt da han kom med gode rettelser
Hilsen RAF

Hvad fik det til at virke?