Avatar billede hjaelp Nybegynder
24. januar 2003 - 01:02 Der er 1 kommentar og
1 løsning

Slet efter 10 dage

'Sletter alle indlæg, der er over 10 dage gamle
strSQL = "SELECT Dato FROM News"
RS.Open strSQL, objConn, 2, 2
AutoSlet = DateDiff("d", RS("Dato"), Now)
If AutoSlet < 10 Then
RS.Delete
RS.Update
End if
RS.Close

Hvad er der galt her?

HJAELP ! ! !
Avatar billede kichian Nybegynder
24. januar 2003 - 01:34 #1
Tja... Er det kun den første række du vil kontrollere?
Iøvrigt så prøver du at slette indlæg som er MINDRE end 10 dage gamle.

Prøv en:
strSQL = "DELETE FROM News WHERE DateDiff(""d"", Dato, Now()) > 10"
Conn.Execute strSQL

Så er det klaret i et hug
Avatar billede hjaelp Nybegynder
24. januar 2003 - 11:18 #2
Thanx
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