16 svar · 376 visningar · startad av WebbisNet
jag har den här koden på defaultsidan, när man är inloggad
den ska köras så fort man har loggat in men det gör den inte
vipDate= mainRS("vipTillDatum")
if mainRS("vipTillDatum") < date() then
do until mainRS.EOF
objConn.Execute="update tblUsers set vipTillDatum=null, vip=false where userID="&Session("userID")&""
mainRS.MoveNext
Loop
end if
Jag förstår inte varför du kör en och samma UPDATE i en loop.
Det vore nog bra om du visade mer kod.
mvh
Utifrån den ytterst begränsade infon du gett
vipDate = mainRS("vipTillDatum")
If CDate(vipDate) < Date() Then
objConn.Execute "update tblUsers set vipTillDatum=null, vip=false where userID=" & Session("userID"), , 128
End If
.
Poffe skrev:
Utifrån den ytterst begränsade infon du gett
vipDate = mainRS("vipTillDatum") If CDate(vipDate) < Date() Then objConn.Execute "update tblUsers set vipTillDatum=null, vip=false where userID=" & Session("userID"), , 128 End If
måste koden ligga på nåt specielt ställe, som före eller efter bodyn?
Nej, ASP kod körs på servern innan något skickas till webbläsaren.
koden körs ändå inte med
vipDate = mainRS("vipTillDatum")
If CDate(vipDate) < Date() Then
objConn.Execute "update tblUsers set vipTillDatum=null, vip=false where userID=" & Session("userID"), , 128
End If
jag har en medlem vars vip hade utgångsdatum igår och hon är fortfarande VIP
Har hon loggat in då?
@nders skrev:
Har hon loggat in då?
ska det inte räcka med att jag loggar in eftersom koden ska köras på defaultsidan när man har loggat in
Med tanke på att du har userID=" & Session("userID") i WHERE-satsen så måste väl hon logga in (eller någon logga in med hennes konto).
@nders skrev:
Med tanke på att du har userID=" & Session("userID") i WHERE-satsen så måste väl hon logga in (eller någon logga in med hennes konto).
hur ska jag skriva för att utgångna vip ska försvinna oavsett vem som loggar in?
Jag förstår inte var vipDate kommer ifrån, eftersom du visar så lite kod. Men det borde väl räcka med en enkel UPDATE. Access:
objConn.Execute "update tblUsers set vipTillDatum=null, vip=false where vipTillDatum < now()", , 128
Mysql:
objConn.Execute "update tblUsers set vipTillDatum=null, vip=false where vipTillDatum < current_timestamp", , 128
glömde skriva att vipDate bara är en variabel, vipTillDatum är kolumnnamnet i db
den koden funkar nu, nästa uppgift blir nu att lösa hur man raderar användare som är inaktiva över 90 dagar....har inte fått till det heller :-)
Det är ju också en kakbit att lösa med wFs sökfunktion. :)