Scadenza password

[Enrique_Rojas]

Buongiorno.

Vorrei chiedervi un consiglio sulla seguente questione:

ho realizzato un'area ad accessi riservati per utenti abilitati, ma la devo implementare facendo in modo che la password scada periodicamente ogni 90 giorni e che dopo sei mesi consecutivi di inattività dopo l'ultimo accesso registrato l'utente venga bloccato.

la mia tabella è così composta:

id, username, usercode, dataregistrazione, datascadenzatrimestrale, datascadenza semestrale, dataultimoaccesso ed ho proceduto così:

myDate = date()
DataOdierna = convertDate(myDate)

DataScadenzatrimestrale = convertDate(objRS("DataScadenzatrimestrale")) 
DataRegistrazione = convertDate(objRS("DataRegistrazione"))
DataScadenzaSemestrale = convertDate(objRS("DataScadenzaSemestrale"))
DataUltimoAccesso = convertDate(objRS("DataUltimoAccesso"))

'NUOVO CODICE
DataVariabile = (DateDiff("d",DataOdierna,DataScadenzaUserCode)) 
DataVariabileSem = (DateDiff("d",DataScadenzaSemestrale,DataUltimoAccesso)) 

if DataVariabile =< 0 OR DataVariabileSem <> -180 then

response.write "problemi"

else 

response.write "tutto ok!"

end if

Ma in questo caso non funziona:

Data di oggi:2006/08/01

Data di registrazione:2006/08/01
Data di scadenza password:2006/10/30
Data di scadenza semestrale (inattività):2007/01/28

Data ultimo accesso:2006/07/31

Variabile Scadenza = 2006/10/30 - 2006/08/01 = 90
Variabile Inattività = 2007/01/28 - 2006/07/31 = -181

Anche se in realtà l'ultimo accesso è di ieri... sono confuso... grazie

[Roby_72]

Questo controllo a che ti serve?
Variabile Inattività = 2007/01/28 - 2006/07/31 = -181


Roby

[Enrique_Rojas]

Originariamente inviato da Roby_72
Questo controllo a che ti serve?
Variabile Inattività = 2007/01/28 - 2006/07/31 = -181


Roby

In teoria a sapere se l'utente è rimasto inattivo per 6 mesi.

[optime]

per l'inattività usa la logica oggi-dataultimoaccesso

[Roby_72]

Dovresti confrontare la data di ultimo accesso con la data di oggi non con la scadenza semestrale.

Roby

[Enrique_Rojas]

Correggetemi se sbaglio, grazie:

myDate = date()
DataOdierna = convertDate(myDate)

DataScadenzatrimestrale = convertDate(objRS("DataScadenzatrimestrale")) 
DataRegistrazione = convertDate(objRS("DataRegistrazione"))
DataScadenzaSemestrale = convertDate(objRS("DataScadenzaSemestrale"))
DataUltimoAccesso = convertDate(objRS("DataUltimoAccesso"))

'NUOVO CODICE
DataVariabile = (DateDiff("d",DataOdierna,DataScadenzaUserCode)) 
DataVariabileSem = (DateDiff("d",DataUltimoAccesso,DataOdierna))  

if DataVariabile =< 0 OR DataVariabileSem > 180 then
   response.write "problemi"
else 
   response.write "tutto ok!"
end if

[Roby_72]

Prova no? Anche se questa

DataRegistrazione

non capisco a cosa ti serva, e questa

DataScadenzaUserCode

da dove esca...

Roby

[Enrique_Rojas]

Errore di copia/incolla, codice corretto:

myDate = date()
DataOdierna = convertDate(myDate)

DataScadenzatrimestrale = convertDate(objRS("DataScadenzatrimestrale")) 
DataRegistrazione = convertDate(objRS("DataRegistrazione"))
DataScadenzaSemestrale = convertDate(objRS("DataScadenzaSemestrale"))
DataUltimoAccesso = convertDate(objRS("DataUltimoAccesso"))

'NUOVO CODICE
DataVariabile = (DateDiff("d",DataOdierna,DataScadenzatrimestrale)) 
DataVariabileSem = (DateDiff("d",DataUltimoAccesso,DataOdierna))  

if DataVariabile =< 0 OR DataVariabileSem > 180 then
   response.write "problemi"
else 
   response.write "tutto ok!"
end if

Nelle prove sembra essere tutto OK... ma sei d'accordo anche sulla scadenza di DataVariabile?

[Roby_72]

Mi pare di sì ma senza numeri... fai qualche tentativo "estremo".

Roby