---

Hej NG

Jeg har for en database med en kolonne der hedder "ID" Den er numerisk, så
når der bliver tilføjet noget nyt kommer der en række til og ID bliver 1
højere. Hvordan finder jeg ud af hvor mange rækker der er?

ex
| ID | Navn |
| 1 | Bo |
| 2 | Henrik|
| 3 | Knud |
| 4 | Benny |

Hvordan finder jeg ud af at ID nr. 4 er den sidste ?

// RaDion

---

> ex
> | ID | Navn |
> | 1 | Bo |
> | 2 | Henrik|
> | 3 | Knud |
> | 4 | Benny |
>


<%
Set Con = Server.CreateObject("ADODB.Connection")
DBPath = "DBQ=d:\Stien til databasen og navn.mdb"
Con.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBPath
Sql = "SELECT * FROM TabelNavn"
Set RS = Con.Execute(Sql)
%>
<table border="0">
<%Do While Not RS.EOF%>
<tr>
<td >
<%=RS("navn")%>
</td>
</tr>
<%
RS.MoveNext
Loop
%>
Sidste kort er nummer: <%=RS("ID")%>


Mvh
Peter Jensen

---

"Pelle" <mail@icedesign.dk> skrev i en meddelelse
news:9c7ten$ojv$1@news.inet.tele.dk...
> > ex
> > | ID | Navn |
> > | 1 | Bo |
> > | 2 | Henrik|
> > | 3 | Knud |
> > | 4 | Benny |
> >
>
>
> <%
> Set Con = Server.CreateObject("ADODB.Connection")
> DBPath = "DBQ=d:\Stien til databasen og navn.mdb"
> Con.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBPath
> Sql = "SELECT * FROM TabelNavn"
> Set RS = Con.Execute(Sql)
> %>
> <table border="0">
> <%Do While Not RS.EOF%>
> <tr>
> <td >
> <%=RS("navn")%>
> </td>
> </tr>
> <%
> RS.MoveNext
> Loop
> %>
> Sidste kort er nummer: <%=RS("ID")%>
>
>
> Mvh
> Peter Jensen
>
Der får jeg denne besked:
ADODB.Field error '80020009'

Either BOF or EOF is True, or the current record has been deleted. Requested
operation requires a current record.

/test/gaestebog/test.asp, line 0



Hvad er der galt?

---

Har fixet det med flg. kode:

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.Mappath ("skrive/gbog.mdb")
Conn.Open DSN
Sql = "SELECT * FROM gbog"
Set RS = Conn.Execute(Sql)
Do While Not RS.EOF
t = RS("id")
RS.MoveNext
Loop
Response.Write t
Conn.Close
Set Conn = Nothing
%>

// RaDion

---

RaDion wrote in dk.edb.internet.webdesign.serverside.asp:
> Hvordan finder jeg ud af at ID nr. 4 er den sidste ?

SELECT MAX(ID) AS SidsteID FROM tabelNavn

Og hent den så med:

objRS("SidsteID")


--
Jakob Andersen




--
Dette indlæg er sendt fra http://www.html.dk
* Søg og læs i de danske nyhedsgrupper om webdesign
* Tutorials og artikler om webdesign på dansk

---

"RaDion" <radion@hejboel.dk> skrev i en meddelelse
news:r0IF6.60240$o4.5235074@news010.worldonline.dk...
> Hej NG
>
> Jeg har for en database med en kolonne der hedder "ID" Den er numerisk, så
> når der bliver tilføjet noget nyt kommer der en række til og ID bliver 1
> højere. Hvordan finder jeg ud af hvor mange rækker der er?

De andre ting er der vist svaret på, men du kan tælle antallet af rækker
sådan:

set rs = con.execute("Select count(*) as Found from dintabel")

ved ikke om den sætning kræver et "where", men ellers lave en "where not(id
= 0)"

hent ud via:
antal = rs("Found")

- Kim

---

"Kim Søvø Pedersen" <ksp@diaphoni.dk> wrote in
<u7TF6.55$Vk.42975@news101.telia.com>:
>
>De andre ting er der vist svaret på, men du kan tælle antallet af rækker
>sådan:
>
>set rs = con.execute("Select count(*) as Found from dintabel")
>
>ved ikke om den sætning kræver et "where", men ellers lave en "where
>not(id = 0)"
>
>hent ud via:
>antal = rs("Found")

det kan også fås direkte ud fra ADODB.recordset objectet.


--
Mary had a little key (It's all she could export), and all the email
that she sent was opened at the Fort."
(Ron Rivest)
- Jesper Stocholm - http://stocholm.dk