Update access rækker HELP

Jeg antager at du bruger en autonummerering som ID. I så fald er det ikke muligt.

Hvis du f.eks har nr 1,2,3 og 4 og sletter nr. 4, vil den næste post få nr. 5. Men du kan komprimere efter at have slettet nr. 4, så vil næste post få nr. 4.

Hvis du sletter nr. 2 er der ingen mulighed for at genbruge dette nr.

Det skulle være tilstrækkeligt for dig at sige

  SELECT ... ORDER BY id

ja det gør jeg.

Men hvordan løser jeg så det problem for jeg vil gerne kune slette indlæg når der er over 150 i databasen. det vil sige de ældre indlæg.

Hvis du f.eks vil slette de 5 poster med de laveste numrer, kan du køre en forespørgsel som denne:

SELECT TOP 5 Tabel1.nr, Tabel1.felt1
FROM Tabel1
ORDER BY Tabel1.nr;

Og derefter en slette forespørgsel på den første forespørgsel:


DELETE Forespørgsel1.nr, Forespørgsel1.felt1
FROM Forespørgsel1;

se lige her.
Min tilføj database side:

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("database.mdb")
Conn.Open DSN


strSQL = "Insert into tabel ("

strSQL = strSQL & "Navn, "
og en masse flere felter.

strSQL = strSQL & "values( "
strSQL = strSQL & "'" & Request("Navn") & "', "
og en masse flere felter.

Conn.Execute(strSQL)
Conn.Close
Set Conn = Nothing

Kan jeg ikke gøre nået ved denne side her så jeg kan indlægge ID som nummer 1 i databasen??
eller skal jeg lave nået helt om i databasen for at få det til at fungere.

Har intet forstand på internettet. Beklager.

Men igen: Hvis det er et autonummereringsfelt, kan du ikke genbruge numrer, der "ligger nede i rækken".

En anden mulighed for at slette gamle poster er, at du laver et datofelt der som standardværdi har dags dato. Du kan herefter køre en Delete SQL, der f.eks sletter alle poster der er ældre end Date()-14.

Ja super
det ville være rigtigt godt hvis jeg kunne slette indlæg som er:
1 måned gamle. og så med en sletknap af en eller anden art.
Men hvordan laver jeg så det??

Her er min nuværende slette side:

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("database.mdb")
Conn.Open DSN
strSQL = "Delete * From tabel Where ID >= 150"
Conn.Execute(strSQL)
Conn.Close
Set Conn = Nothing
%>

Hvis du omtaler "ren Access" kan jeg hjælpe dig, men hvis knappen skal ligge på en internetside og programmeres i PHP, ASP eller hvad ved jeg kan jeg ikke.

Jamen dette her er jo kun om access?
jeg skal bare vide hvordan jeg kan slette alle indlæg som så er 1 måned gamle
og alle dem som ikke er skal ikke slettes

I en Access database kan det se således ud:

Docmd.RunSql "DELETE Tabel1.dato FROM Tabel1 WHERE (((Tabel1.dato)<Date()-30))"

okay min tabel hedder geast og min tabel database ligenu
det vil så sige at det skal se sådan ud:
Docmd.RunSql "DELETE gaest.Dato FROM gaest WHERE (((gaest.Dato)<Date()-30))"

er det rigtigt??
og hvor kan jeg indsætte dette i access databasen.
eller jeg kan måske bare indsætte det i min delete side:
strSQL = "DELETE gaest.Dato FROM gaest WHERE (((gaest.Dato)<Date()-30))"

Din SQL ser rigtig ud.

Du kan f.eks indsætte koden i en kommandoknap. Hvis det skal gøres hver gang en ny post oprettes, kan du indsætte flg. i formularens VedAktuel:

If Mr.NewRecord = True Then
Docmd.RunSql "DELETE gaest.Dato FROM gaest WHERE (((gaest.Dato)<Date()-30))"
End If

Så vil du altid slette en post der opfylder kriteriet, hver gang du opretter en ny post.

En lille rettelse:

If Mr.NewRecord = True Then

Skal være:

If Me.NewRecord = True Then

hvad er: Mr.NewRecord hvad skal jeg skrive der??
og hvad er: Docmd.RunSql
skal der ikke bare stå strSQL =
---------------------------------
Jeg er ny i det her håber du bære over med mig.

Jeg har en formular som hedder slette
--------------------------------------
<form action="deletemange.asp" method="post">
<input type="submit" value="slet gamle indlæg som er 30 dage gamle" name="slette">
</form>
Den knap skal jeg så bruge til at slette dem der er 30 dage gamle.
Da jeg ikke kan finde ud af at gøre det sådan at den sletter indlæg hver eneste gang der bliver oprettet et nyt, altså at den checker om der er nogen som er over 30 dage gamle samtidigt med at der bliver oprettet et nyt indlæg.

Nu er du igen ovre i noget internet, og det har jeg som tidligere nævnt intet forstand på. Kl 17:46:33 sagde du:

"Jamen dette her er jo kun om access?"

Og mit forslag fungerer i en Accessdatabase. Men om du kan få det implementeret via internettet ved jeg ikke.

koden kan indsættes i en formular's VedAktuel hændelse (Current). Me.NewRecord checker om der er tale om en ny post. Hvis denne betingelse er opfyldt køres SQL og sletter de poster der opfylder betingelsen, ellers ikke:

If Me.NewRecord = True Then
Docmd.RunSql "DELETE gaest.Dato FROM gaest WHERE (((gaest.Dato)<Date()-30))"
End If

hvor indsætter jeg det i access databasen??
jeg ved det ikke.

Har du en formular?

Nej jeg har ingen formular kun en tabel som hedder gaest.

Når du programmerer i VBA, skal du have en formular.
Det at du kun har en tabel viser, at du stadig går ud fra en internetløsning. Og det kan jeg som før nævnt ikke hjælpe dig med.

okay.
Jeg kommer til at oprette et nyt spørgsmål under asp kategorien
vi du have point alligevel??
så sig lige til.

Det er nok det bedste du kan gøre.
Ingen point - Jeg har rigeligt. Men læg selv et svar og accepter det, så bliver spørgsmålet fjernet fra listen med ubesvarede spørgsmål.

Fint nok det gør jeg så lige.
Men tak for hjælpen ellers

Selv tak.