Eseguire un certo codice x volte al giorno

di Roberto Valentini, in Classic ASP, Coding, Tips,

Lo script che segue permette di eseguire un determinato numero di volteuna pagina asp o parte di essa, nell'arco di tempo di un giorno.

Per fare questo, ad ogni caricamento della pagina viene prelevata la data, per essere poi comparata con un valore numerico memorizzato all'interno di un file di testo.
Inoltre nello stessso file, nel caso della prima esecuzione nella giornata, viene scritto il valore predefinito della variabile add la quale determina il numero massimo di volte che potrà essere eseguito una certa parte di codice.
Questo valore viene decrementato ad ogni richiesta della pagina, fino a raggiungere lo zero: a quel punto il codice in oggetto non verrà più eseguito.

Prima di provare il tutto, si deve creare un file .txt nel quale inserire nelle prime due righe altrettanti valori numerici qualsiasi purchè di tipo integer, che serviranno solo a non causare un errore di runtime durante la prima lettura.

Il file deve essere posizionato in una cartella con permessi di lettura e scrittura.

<SCRIPT LANGUAGE="JScript" RUNAT=Server>
var x
var y
     x = new Date()
    y = (x.getDate())
</SCRIPT>
<%

' esecuzioni massime (x-1)
add = 3

Set fso = CreateObject("Scripting.FileSystemObject")
mgiorno = Server.MapPath("./tuofile.txt")
Set a = fso.OpenTextFile(mgiorno)
ngio = CInt(a.ReadLine)
conta = CInt(a.ReadLine)
a.Close

Set a = fso.CreateTextFile(mgiorno, True)

if y<>ngio  then
  conta = add
  volte = conta
  a.WriteLine(y)
  a.WriteLine(conta)
else
   volte = conta - 1
end if

a.WriteLine(y)
a.WriteLine(volte)
a.close
 Set a = Nothing

if conta > 0 then
  ' Qui mettete il codice che desiderate sia eseguito
  ' max x volte al giorno

  Response.write "questo codice potrà essere eseguito "&_
                 "ancora " & volte & " volte oggi."
else

  ' qui il codice che venga restituito dopo x esecuzioni
  ' al giorno

  Response.write "codice eseguito dopo " & (add+1) &_
                 " reload della pagina nello stesso giorno"

end if

%>

Commenti

Visualizza/aggiungi commenti

| Condividi su: Twitter, Facebook, LinkedIn

Per inserire un commento, devi avere un account.

Fai il login e torna a questa pagina, oppure registrati alla nostra community.

Approfondimenti

Nessuna risorsa collegata

I più letti di oggi