Per resettare
<%
Dim objFSO, objTextFile
'Creazione dell'istanza FileSystem
Set objFSO = CreateObject("Scripting.FileSystemObject")
'Apertura del file di testo
'Utilizzare, a seconda della necessità, una delle due righe di codice
'Set objTextFile = objFSO.CreateTextFile("C:\InetPub\prova\freeasp.tx t")
Set objTextFile = objFSO.CreateTextFile(Server.MapPath("/public/verifico.qwe"))
'Scrivo la prima riga di codice in cui resetto
objTextFile.WriteLine "0"
'Chiudo il file e i vari oggetti/istanze
objTextFile.Close
Set objTextFile = Nothing
Set objFSO = Nothing
%>
per studio uno
<%
Dim objFSO, objTextFile
'Creazione dell'istanza FileSystem
Set objFSO = CreateObject("Scripting.FileSystemObject")
'Apertura del file di testo
'Utilizzare, a seconda della necessità, una delle due righe di codice
'Set objTextFile = objFSO.CreateTextFile("C:\InetPub\prova\freeasp.tx t")
Set objTextFile = objFSO.CreateTextFile(Server.MapPath("/public/verifico.qwe"))
'Scrivo la prima riga di codice in stabilisco studio uno
objTextFile.WriteLine "1"
'Chiudo il file e i vari oggetti/istanze
objTextFile.Close
Set objTextFile = Nothing
Set objFSO = Nothing
%>