INTERNET EXPLORER? Ti consiglio di navigare questo sito con Mozilla Firefox oppure con Google Chrome.

Aggiornare un file di testo da pannello di controllo con Asp

Autore: Luca Ruggiero | Tell a Friend

eBook ASP base
Impara a creare siti dinamici con ASP e VBScript da zero!

Corso ASP
Impara a creare siti dinamici professionali con ASP!

E-Commerce con ASP
Impara a creare un sito di E-Commerce con carrello della spesa!

Creiamo un piccolo pannello di controllo per aggiornare online un file di testo, file che magari utilizziamo in un'inclusione da qualche parte nel nostro sito.

Le operazioni da compiere sono abbastanza semplici, ragion per cui tenterò di non dirvi parole inutili, ma commenterò abbastanza dettagliatamente l'applicazione.

Ecco il codice del file pannello.asp:

<%@LANGUAGE = JScript%>
<%
   // Memorizzo in una QueryString l'azione di aggiornamento
   var azione = new String(Request.QueryString("azione"));
%>
<html>
 <head>
  <title>Pannello di controllo</title>
 </head>
<body>

<%
   /*
        L'input generato dal form fa riferimento alla QueryString inizializzata
        Quindi, se il suo valore è quello stabilito all'invio dei dati dal form
        procedo con l'esecuzione della routine di aggiornamento del file
   */
   if (azione == "modifica")
   {
      var testo = new String(Request.Form("testo"));

      // Creo l'oggetto FSO
      var FSO = new ActiveXObject("Scripting.FileSystemObject");
      // Apro il file
      var APRI = FSO.OpenTextFile(Server.MapPath("nomefile.txt"));
      // Rigenero il file, ci scrivo dentro e lo chiudo
      var SCRIVI = FSO.CreateTextFile(Server.MapPath("nomefile.txt"));
          SCRIVI.WriteLine(testo);
          SCRIVI.Close();
         
      Response.Write("<p>Aggiornamento effettuato!</p>");
   }
   else
   {
%>

<form method="post" action="pannello.asp?azione=modifica">
   <textarea name="testo" rows="10" cols="30">
   <!--#include file="nomefile.txt"-->
   </textarea>
   <input type="submit" value="Aggiorna">
</form>

<%
   }
%>

</body>
</html>

IN EVIDENZA
HOT LINKS