webForumDet fria alternativet

Fel på ifsats?

ASP

2 svar · 204 visningar · startad av Asa

Medlem sedan dec. 20011 860 inlägg
Frågan#1

Har en kod där jag ska loopa igenom databasen och kolla ifall fältet senast är tomt (senast är datetime) och ifall det var 60 dagar sen de blev medlem. Har man alltså inte loggat in ska man raderas. Men mion kod funkar ej! Har testat med RS("senast") = "" , RS("senast") = Null och RS("senast") = '' och inget funkar. DateDiffgrejjen funkar för jag testade utan senaste i If satsen.

Nån som ser mina fel??!?

<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("dbase/databas.mdb")

DT = Now()
Set RS=Conn.Execute("Select * From users")
x=1
Do Until RS.EOF
  If RS("senast") = "" And DateDiff("d", RS("date"), DT) > 60 Then
    Response.Write x & ". Delete From users Where userid=" & RS("userid") & "<br>"
  End If
RS.MoveNext
x=x+1
Loop	
RS.Close
Set RS=Nothing
%>
Medlem sedan jan. 20011 140 inlägg
#2

Prova

If isNull(rs("senast")) And DateDiff("d", RS("date"), DT) > 60 Then
Medlem sedan dec. 20011 860 inlägg
#3

Funkar prima! Tackar :)

253 ms totalt · 4 externa anrop · v20260731065814-full.a51de22e
122 ms — deklarationer (db)
0 ms — hämta statistik (cache)
128 ms — hämta tråd, inlägg och bilagor (db)
122 ms — ändringar (db)