Errore script per scrittura file

[massimo_pt]

Posto questo script:

<SCRIPT LANGUAGE=vbscript>
<!--
function scrivi(){
Set fso = CreateObject("Scripting.FileSystemObject")
contatore="contatore.txt"
if not fso.FileExists (contatore)then
fso.CreateTextFile (contatore)
Set OggFile = fso.GetFile (contatore)
Set OggTextStream = OggFile.OpenAsTextStream(2)
OggTextStream.WriteLine "0"
OggTextStream.Close
end if
Set OggFile = fso.GetFile (contatore)

Set OggTextStream1 = OggFile.OpenAsTextStream(1)
valore=OggTextStream1.ReadLine
OggTextStream1.Close

Set OggTextStream = OggFile.OpenAsTextStream(2)
OggTextStream.WriteLine cstr(cint(valore)+1)
OggTextStream.Close

}
//-->
</SCRIPT>

Richiamo la funzione scrivi con un link tipo: scrivi
E' tratto da un articolo trovato su questo sito ma non riesco a farlo funzionare e non trovo l'errore. Qualcuno può aiutarmi?

[cavicchiandrea]

Hai mescolato due linguaggi javascript (linguaggio lato client) e Vbscript Asp (linguaggio lato server) Quello script così come non funzionera mai.
Se l'hosting (spazio web del sito) supporta il linguaggio Asp fatti spostare sul forum asp chiedendo ad un mod di questo forum.
Altrimenti informati con l'host che linguaggio supporta poi apri un thread sul forum appropriato.
Ricordati comunque che per salvare/scrivere file è possibile solo con linguaggi la server ASP PHP JSP etc...

[massimo_pt]

Ti ringrazio per la risposta.
Quello che vorrei fare è scrivere dal browser un testo su un file che si trova sul client.
Secondo te è possibile?

[cavicchiandrea]

Rileggi con + attenzione la mia risposta, ho gia risposto alla tua domanda.

[massimo_pt]

Credo di aver trovato quel che cercavo, ma ti chiedo ancora un po\' di pazienza...
Il codice qui sotto funziona perfettamente. Scrive e rilegge il file. Che tu sappia è normale che funzioni solo con IE? Se sì, sono del gatto ...

<script language="Javascript" type="text/javascript" >

<!--
var nome="Mario";
var cognome="Rossi";

var filename = "c:/mieidati.txt";

function WriteToFile()
{
var fso = new ActiveXObject("Scripting.FileSystemObject");
// se il file esiste aggiunge due righe
// con il contenuto delle variabili nome/cognome
if (fso.FileExists(filename))
{
var a, ForAppending, file;
ForAppending = 8;
file = fso.OpenTextFile(filename, ForAppending, false);
file.WriteLine(nome);
file.WriteLine(cognome);
}
//Se non esiste crea il file e
// aggiunge due righe
// con il contenuto delle variabili nome/cognome
else
{
var file = fso.CreateTextFile(filename, true);
file.WriteLine(cognome);
file.WriteLine(cognome);
}
file.Close();
}
//-------------------------------------------------------
function ReadFromFile(){
var fso, a, ForReading;
ForReading = 1;
fso = new ActiveXObject("Scripting.FileSystemObject");
file = fso.OpenTextFile(filename, ForReading, false);
var nome = file.readline();
var cognome = file.readline();
document.all.myarea.innerHTML = nome + "-" + cognome;
file.Close();
}

//-->
</script>

[cavicchiandrea]

Si lo script postato utilizza ActiveXObject funzionante solo su IE 6 o versioni inferiori.
Inoltre non credo che funzioni con IE 7 più rivolto alla sicrezza e agli standard corss-browser, ma di questo non sono sicuro.