ciao,
sto usando IIS di Windows XP Pro, lo sto facendo da diversi anni... tutto bene fino a 3 giorni fa...
di solito cambio la directory nell'IIS per cambiare sito da gestire, ma adesso non mi funziona più come dovrebbe.
In pratica mi restituisce l'errore quando cerco di scrivere un file di testo (lo uso come contatore), per il resto va bene, elaborazione codice asp, connessione a database... ho ricontrollato i permessi e sono come li avevo settati:


ho anche rimosso e reinstallato l'IIS...
l'errore prodotto è il seguente:


ecco anche il codice della pagina bottom.asp

<%
data = date()
data_anno = year(date)
data_mese = month(date)
if len(data_mese) = 1 then data_mese= "0" & data_mese
data_giorno=day(date)
if len(data_giorno) = 1 then data_giorno = "0" & data_giorno
dataodierna = data_anno & "." & data_mese & "." & data_giorno

'inizio codice contatore generale
Response.Expires = 0
Set fs = CreateObject("Scripting.FileSystemObject") <<<=== RIGA DELL'ERRORE
Path = server.mappath("/public/counter/counter.txt")
Set a = fs.OpenTextFile(path)
contatoretotale = a.ReadLine
'Controllo gli aggiornamenti di pagina
If Session("contatoretotale") = "" then
Session("contatoretotale") = contatoretotale
'Incremento di 1 il valore presente nel file di testo
contatoretotale = contatoretotale + 1
a.close
'Scrivo sul file di testo il nuovo valore
Set a = fs.CreateTextFile(path, True)
a.WriteLine(contatoretotale)
End If
a.Close
'fine codice contatore generale

'inizio codice contatore giornaliero
Response.Expires = 0
Set fs2 = CreateObject("Scripting.FileSystemObject")
Path = server.mappath("/public/counter/giorno/" & dataodierna & ".txt")

'controllo esistenza file sul server
Dim FileObject
Set FileObject=CreateObject("Scripting.FileSystemObjec t")
esiste=FileObject.FileExists(path)
Set FileObject=Nothing
'fine controllo esistenza file sul server

'se non esiste creo il file con il nome della data odierna
if esiste = False or Falso then
Set FileObject=Server.CreateObject("Scripting.FileSyst emObject")
Set OutStream=FileObject.CreateTextFile(Server.MapPath ("/public/counter/giorno/" & dataodierna & ".txt"),true,0)
Outstream.WriteLine 1
OutStream.Close
Set OutStream=Nothing
Set FileObject=Nothing
end if

Set b = fs2.OpenTextFile(path)
contatoregiorno = b.ReadLine
'Controllo gli aggiornamenti di pagina
If Session("contatoregiorno") = "" then
Session("contatoregiorno") = contatoregiorno
'Incremento di 1 il valore presente nel file di testo
contatoregiorno = contatoregiorno + 1
b.close
'Scrivo sul file di testo il nuovo valore
Set b = fs2.CreateTextFile(path, True)
b.WriteLine(contatoregiorno)
End If
b.Close
'fine codice contatore giornaliero
%>
avete idea di cosa fare ?
grazie

p.s.
dimenticavo...
sul web reale tutto funziona correttamente, il problema è solo in locale.
testato con IE e con FF...