Avatar billede hojben Novice
18. januar 2002 - 07:52 Der er 7 kommentarer og
1 løsning

hent de sidste 5 i tabellen ?

Hvordan henter man de sidste 5 i en tabel ved navn fx tilmeld ?

den skal vælge fra feltet tilmeld-ID som er af typen autonumbering..

fx hvis der er 10 poster i tabellen skal den tage de 5 sidst indtastede..
Avatar billede p_johansen Nybegynder
18. januar 2002 - 08:16 #1
sql=\"SELECT TOP 5 * FROM din_tabel ORDER BY dit_felt desc\"
Avatar billede hojben Novice
18. januar 2002 - 08:26 #2
får denne fejl:

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

Command text was not set for the command object.

/right.asp, line 19


<html>
<head>
<title>Untitled Document</title>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=iso-8859-1\">

</head>

<body bgcolor=\"#003366\" text=\"#FFFFFF\" link=\"#FFFFFF\" vlink=\"#FFFFFF\" alink=\"#FFFFFF\">
Fundne klaverstemmere:
<table width=\"100%\" border=\"1\"  cellpadding=\"1\" bordercolor=\"#FFFFFF\" align=\"center\"><div align=\"center\">
<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
DSN = DSN & \"DBQ=\" & Server.MapPath(\"/minfil.mdb\")
Conn.Open DSN
\' SQL forespørgsel
sql=\"SELECT TOP 5 * FROM firma ORDER BY stemmer-id desc\"
\' 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
  \' Udskriv værdien af kolonnen
notatfelt = rs(\"lokalt\")
Response.write(\"<tr align=\"\"center\"\"><td align=\"\"center\"\">\")
Response.write(\"<a href=\"\"\" & notatfelt & \"\"\">\" & rs(\"firma\") & \" </td></tr>\")
  \' Gå til næste Record i rs
  rs.MoveNext
Loop
\' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%></div>
</table>
</body>
</html>
Avatar billede p_johansen Nybegynder
18. januar 2002 - 08:35 #3
Set rs = Conn.Execute(strSQL)

Du kan jo ikke eksekvere strSQL når din SQL hedder sql

ret et af stederne....
Avatar billede p_johansen Nybegynder
18. januar 2002 - 08:36 #4
ret f.eks til
Set rs = Conn.Execute(sql)
Avatar billede hojben Novice
18. januar 2002 - 08:43 #5
Microsoft OLE DB Provider for ODBC Drivers error \'80040e10\'

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

/right.asp, line 19

<html>
<head>
<title>Untitled Document</title>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=iso-8859-1\">

</head>

<body bgcolor=\"#003366\" text=\"#FFFFFF\" link=\"#FFFFFF\" vlink=\"#FFFFFF\" alink=\"#FFFFFF\">
Fundne klaverstemmere:
<table width=\"100%\" border=\"1\"  cellpadding=\"1\" bordercolor=\"#FFFFFF\" align=\"center\"><div align=\"center\">
<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
DSN = DSN & \"DBQ=\" & Server.MapPath(\"/minfil.mdb\")
Conn.Open DSN
\' SQL forespørgsel
strsql=\"SELECT TOP 5 * FROM firma ORDER BY stemmer-id desc\"
\' 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
  \' Udskriv værdien af kolonnen
notatfelt = rs(\"lokalt\")
Response.write(\"<tr align=\"\"center\"\"><td align=\"\"center\"\">\")
Response.write(\"<a href=\"\"\" & notatfelt & \"\"\">\" & rs(\"firma\") & \" </td></tr>\")
  \' Gå til næste Record i rs
  rs.MoveNext
Loop
\' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%></div>
</table>
</body>
</html>
Avatar billede p_johansen Nybegynder
18. januar 2002 - 09:23 #6
der går åbenbart noget galt med feltnavnet stemmer-id - jeg har prøvet og det virke hvis du omdøber feltet til f.eks id

<html>
<head>
<title>Untitled Document</title>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=iso-8859-1\">

</head>

<body bgcolor=\"#003366\" text=\"#FFFFFF\" link=\"#FFFFFF\" vlink=\"#FFFFFF\" alink=\"#FFFFFF\">
Fundne klaverstemmere:
<table width=\"100%\" border=\"1\"  cellpadding=\"1\" bordercolor=\"#FFFFFF\" align=\"center\"><div align=\"center\">
<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
DSN = DSN & \"DBQ=\" & Server.MapPath(\"min_fil.mdb\")
Conn.Open DSN
\' SQL forespørgsel
strsql=\"SELECT TOP 5 * FROM firma ORDER BY ID desc\"
\' 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
  \' Udskriv værdien af kolonnen
notatfelt = rs(\"lokalt\")
Response.write(\"<tr align=\"\"center\"\"><td align=\"\"center\"\">\")
Response.write(\"<a href=\"\"\" & notatfelt & \"\"\">\" & rs(\"firma\") & \" </td></tr>\")
  \' Gå til næste Record i rs
  rs.MoveNext
Loop
\' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%></div>
</table>
</body>
</html>
Avatar billede hojben Novice
18. januar 2002 - 09:27 #7
TAK !!!!! det var det.... underligt at den ikke ville acceptere - i feltets navn...
Avatar billede -mundi- Nybegynder
18. januar 2002 - 12:55 #8
Skal bare skrive navnene sådan her:  [test-1] så kan du kalde dem hvad du vil, stort set
Avatar billede 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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

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