Tidsbegrænset indlæg i Access database

du laver bare en \"clear\" funktion, der hurtig gennemgår alle posterne og sletter dem som er over 30 dage gamle....

Det er pisse let...

DELETE FROM tabel WHERE datofelt>date-30

OK - det er pisse let - men hvordan laver man en clear funktion?

sone>> hvor skal koden skrives?

Det er et alm. database-kald.

Gider sq ikke til at lave det for 8 point...

for 8 point kan du få en vejledning...

Jeg har nu afsat 30 point

Er det ok

SQL=\"DELETE FROM tabel WHERE datofelt>date-30\"
call Conn.Execute(SQL)

sone... skal man ikke hen og have fat i en dateadd() funktion først !?

dna

e30 >> Jeg kan lave det i aften, hvis ikke der er andre der har gjort det inden !!!

I Access man man lave date()-x så trækker den x dage fra - alt andet end dage, så skal man bruge DateAdd.

Ok

Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"PROVIDER=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"db.mdb\") & \";UID=admin;PWD=;\"
conn.execute (\"DELETE FROM tabel WHERE datofelt < #\" & date - 30 & \"#\")
conn.close
set conn = nothing

Udskift:
db.mdb -> navnet på din database
tabel -> Navnet på din tabel
datofelt -> navnet på dit datofelt.

netsrac>> Hvor i asp-dokumentet skal koden sættes ind???


Her er koden - du kan bare markerer stedet det skal sættes ind ved at lave en række XXXXXXXXX\'er - OK.

Her er koden:

<!--webbot bot=\"DatabaseRegionStart\" startspan
  s-columnnames=\"ID,dddato,Dato,Navn,Tlf,Email,emne,Pris,sk,Navn_på_fjerncomputer,Brugernavn,Web-browsertype\"
  s-columntypes=\"3,135,135,200,200,200,201,200,200,200,200,200\"
  s-dataconnection=\"Annonce\" b-tableformat=\"FALSE\" b-menuformat=\"FALSE\"
  s-menuchoice s-menuvalue b-tableborder=\"TRUE\" b-tableexpand=\"TRUE\"
  b-tableheader=\"TRUE\" b-listlabels=\"TRUE\" b-listseparator=\"TRUE\"
  i-ListFormat=\"0\" b-makeform=\"FALSE\" s-recordsource=\"annonce\"
  s-displaycolumns=\"dddato,Dato,Navn,Tlf,Email,emne,sk,Pris\"
  s-criteria=\"[Navn] CNT {Navn} +\" s-order=\"[dddato] -\"
  s-sql=\"SELECT * FROM annonce WHERE (Navn LIKE \'%::Navn::%\') ORDER BY dddato DESC\"
  b-procedure=\"FALSE\" clientside SuggestedExt=\"asp\" s-DefaultFields=\"Navn=\"
  s-NoRecordsFound=\"Der er ikke blevet returneret nogen poster.\"
  i-MaxRecords=\"0\" i-GroupSize=\"0\" BOTID=\"0\" u-dblib=\"_fpclass/fpdblib.inc\"
  u-dbrgn1=\"_fpclass/fpdbrgn1.inc\" u-dbrgn2=\"_fpclass/fpdbrgn2.inc\" tag=\"BODY\"
  local_preview=\"&lt;table border=0 width=&quot;100%&quot;&gt;&lt;tr&gt;&lt;td bgcolor=&quot;#FFFF00&quot; align=&quot;left&quot;&gt;&lt;font color=&quot;#000000&quot;&gt;Områderne med databaseresultater kan kun vises, hvis siden hentes fra en Web-server med en Web-browser. Det afsnit på siden, der indeholder databaseresultater, gentages én gang for hver post, som returneres af forespørgslen.&lt;/font&gt;&lt;/td&gt;&lt;/tr&gt;&lt;/table&gt;\"
  preview=\"&lt;table border=0 width=&quot;100%&quot;&gt;&lt;tr&gt;&lt;td bgcolor=&quot;#FFFF00&quot; align=&quot;left&quot;&gt;&lt;font color=&quot;#000000&quot;&gt;Dette er begyndelsen af området med databaseresultater. Denne side kan kun vises korrekt, hvis den hentes fra en Web-server med en Web-browser. Det aktuelle Web-sted er gemt på din harddisk eller på det lokale netværk.&lt;/font&gt;&lt;/td&gt;&lt;/tr&gt;&lt;/table&gt;\" --><!--#include file=\"_fpclass/fpdblib.inc\"-->
<%
fp_sQry=\"SELECT * FROM annonce WHERE (Navn LIKE \'%::Navn::%\') ORDER BY dddato DESC\"
fp_sDefault=\"Navn=\"
fp_sNoRecords=\"Der er ikke blevet returneret nogen poster.\"
fp_sDataConn=\"Annonce\"
fp_iMaxRecords=0
fp_iCommandType=1
fp_iPageSize=0
fp_fTableFormat=False
fp_fMenuFormat=False
fp_sMenuChoice=\"\"
fp_sMenuValue=\"\"
fp_iDisplayCols=8
fp_fCustomQuery=False
BOTID=0
fp_iRegion=BOTID
%>
<!--#include file=\"_fpclass/fpdbrgn1.inc\"-->
<!--webbot bot=\"DatabaseRegionStart\" i-CheckSum=\"20378\" endspan -->
      <table border=\"0\" width=\"591\" cellspacing=\"0\" cellpadding=\"0\">
        <tr>
          <td width=\"89\"><b><font size=\"1\" face=\"Verdana, arial\">Navn:</font></b>
          </td>
          <td width=\"248\"><font size=\"1\" face=\"Arial\"><!--webbot
      bot=\"DatabaseResultColumn\" startspan
      s-columnnames=\"ID,dddato,Dato,Navn,Tlf,Email,emne,Pris,sk,Navn_på_fjerncomputer,Brugernavn,Web-browsertype\" s-column=\"Navn\"
      b-tableformat=\"FALSE\" b-hasHTML=\"FALSE\" clientside
      local_preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Navn&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\"
      preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Navn&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\" --><%=FP_FieldVal(fp_rs,\"Navn\")%><!--webbot
      bot=\"DatabaseResultColumn\" i-CheckSum=\"3927\" endspan -->
      </font>
          </td>
          <td width=\"238\">
            <p align=\"right\"><font size=\"1\" face=\"Arial\"><b>Annoncedato:</b>&nbsp;<!--webbot
            bot=\"DatabaseResultColumn\" startspan
            s-columnnames=\"ID,dddato,Dato,Navn,Tlf,Email,emne,Pris,sk,Navn_på_fjerncomputer,Brugernavn,Web-browsertype\"
            s-column=\"dddato\" b-tableformat=\"FALSE\" b-hasHTML=\"FALSE\" clientside
            local_preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;dddato&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\"
            preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;dddato&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\" --><%=FP_FieldVal(fp_rs,\"dddato\")%><!--webbot
            bot=\"DatabaseResultColumn\" i-CheckSum=\"16147\" endspan -->
            </font>
          </td>
        </tr>
        <tr>
          <td width=\"89\">
      <b><font size=\"1\" face=\"Verdana, arial\">Tlf:</font></b>
          </td>
          <td width=\"486\" colspan=\"2\"><font size=\"1\" face=\"Arial\"><!--webbot bot=\"DatabaseResultColumn\"
      startspan s-columnnames=\"ID,dddato,Dato,Navn,Tlf,Email,emne,Pris,sk,Navn_på_fjerncomputer,Brugernavn,Web-browsertype\" s-column=\"Tlf\"
      b-tableformat=\"FALSE\" b-hasHTML=\"FALSE\" clientside
      local_preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Tlf&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\"
      preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Tlf&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\" --><%=FP_FieldVal(fp_rs,\"Tlf\")%><!--webbot
      bot=\"DatabaseResultColumn\" i-CheckSum=\"3963\" endspan -->
      </font>
          </td>
        </tr>
        <tr>
          <td width=\"89\"><font face=\"Verdana, arial\">
      <b><font size=\"1\">Email:</font></b><font size=\"1\">&nbsp;</font></font>
          </td>
          <td width=\"486\" colspan=\"2\"><font size=\"1\" face=\"Arial\"><!--webbot bot=\"DatabaseResultColumn\"
      startspan s-columnnames=\"ID,dddato,Dato,Navn,Tlf,Email,emne,Pris,sk,Navn_på_fjerncomputer,Brugernavn,Web-browsertype\"
      s-column=\"Email\" b-tableformat=\"FALSE\" b-hasHTML=\"FALSE\" clientside
      local_preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Email&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\"
      preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Email&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\" --><%=FP_FieldVal(fp_rs,\"Email\")%><!--webbot
      bot=\"DatabaseResultColumn\" i-CheckSum=\"8328\" endspan -->
      </font>
          </td>
        </tr>
      </table>
  <table border=\"0\" width=\"600\" cellpadding=\"0\" cellspacing=\"0\">
    <tr>
      <td>
      <p><font face=\"Arial\"><b><font size=\"1\">&nbsp;</font><br>
      </b></font>
      <b><font size=\"3\" face=\"Arial\"><!--webbot bot=\"DatabaseResultColumn\"
      startspan
      s-columnnames=\"ID,dddato,Dato,Navn,Tlf,Email,emne,Pris,sk,Navn_på_fjerncomputer,Brugernavn,Web-browsertype\"
      s-column=\"sk\" b-tableformat=\"FALSE\" b-hasHTML=\"FALSE\" clientside
      local_preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;sk&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\"
      preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;sk&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\" --><%=FP_FieldVal(fp_rs,\"sk\")%><!--webbot
      bot=\"DatabaseResultColumn\" i-CheckSum=\"4957\" endspan -->
      </font></b>
      </p>
      <p><font face=\"Arial\"><b>
      Emne:</b>&nbsp;<font size=\"1\"><br>
      <!--webbot bot=\"DatabaseResultColumn\" startspan
      s-columnnames=\"ID,dddato,Dato,Navn,Tlf,Email,emne,Pris,sk,Navn_på_fjerncomputer,Brugernavn,Web-browsertype\" s-column=\"emne\"
      b-tableformat=\"FALSE\" b-hasHTML=\"FALSE\" clientside
      local_preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;emne&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\"
      preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;emne&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\" --><%=FP_FieldVal(fp_rs,\"emne\")%><!--webbot
      bot=\"DatabaseResultColumn\" i-CheckSum=\"6909\" endspan -->
      </font></font>
      </p>
      <p><font face=\"Arial\"><b>Pris:</b>&nbsp;&nbsp;&nbsp; <b>kr. <!--webbot
      bot=\"DatabaseResultColumn\" startspan
      s-columnnames=\"ID,dddato,Dato,Navn,Tlf,Email,emne,Pris,sk,Navn_på_fjerncomputer,Brugernavn,Web-browsertype\" s-column=\"Pris\"
      b-tableformat=\"FALSE\" b-hasHTML=\"FALSE\" clientside
      local_preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Pris&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\"
      preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Pris&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\" --><%=FP_FieldVal(fp_rs,\"Pris\")%><!--webbot
      bot=\"DatabaseResultColumn\" i-CheckSum=\"6228\" endspan -->
</b></font></p>
      </td>
    </tr>
  </table>
  <hr align=\"left\" width=\"600\" size=\"1\" color=\"#0000FF\">
  <!--webbot bot=\"DatabaseRegionEnd\" startspan b-tableformat=\"FALSE\"
  b-menuformat=\"FALSE\" u-dbrgn2=\"_fpclass/fpdbrgn2.inc\" i-groupsize=\"0\"
  clientside tag=\"BODY\"
  local_preview=\"&lt;table border=0 width=&quot;100%&quot;&gt;&lt;tr&gt;&lt;td bgcolor=&quot;#FFFF00&quot; align=&quot;center&quot;&gt;&lt;font color=&quot;#000000&quot;&gt;Slut på området med databaseresultater.&lt;/font&gt;&lt;/td&gt;&lt;/tr&gt;&lt;/table&gt;\"
  preview=\"&lt;table border=0 width=&quot;100%&quot;&gt;&lt;tr&gt;&lt;td bgcolor=&quot;#FFFF00&quot; align=&quot;left&quot;&gt;&lt;font color=&quot;#000000&quot;&gt;Dette er slutningen af området med databaseresultater.&lt;/font&gt;&lt;/td&gt;&lt;/tr&gt;&lt;/table&gt;\" --><!--#include file=\"_fpclass/fpdbrgn2.inc\"-->
<!--webbot bot=\"DatabaseRegionEnd\" i-CheckSum=\"62730\" endspan -->

Du kan bare sætte det ind i toppen med <% som start og %> som slut