Scrivere nella cartella public.

[laugher]

<%

Dim anyVariable
anyVariable = Request.ServerVariables("REMOTE_ADDR")

%>

Con questa istruzione ottengo il numero IP dei visitatori del mio sito.
Ora si tratta di scrivere questo numero nel file di testo che sta nella cartella public (l'unica dove si può scrivere) di Aruba che ha questo indirizzo:

D:\Inetpub\webs\laugherit\public\indirizzoip.txt

E' un po' che ci smanetto senza trovare la soluzione.

[Vincent.Zeno]

vedi qui la guida
http://www.w3schools.com/asp/asp_ref_textstream.asp

[laugher]

Perfetto. Grazie mille.

Ho tirato fuori questo codice

---code---
<%

Dim anyVariable
anyVariable = Request.ServerVariables("REMOTE_ADDR")

dim fs,f
set fs=Server.CreateObject("Scripting.FileSystemObject ")
set f=fs.CreateTextFile("D:\Inetpub\webs\laugherit\pub lic\text.txt",true)
f.WriteLine(anyVariable)
f.Close
set f=nothing
set fs=nothing
%>
---end code ---

Ora continuo a leggere il manuale. Devo trovare di aggiungere la riga che creo a quelle esistenti.

[maxmix80]

Originariamente inviato da laugher
Perfetto. Grazie mille.

Ho tirato fuori questo codice

---code---
<%

Dim anyVariable
anyVariable = Request.ServerVariables("REMOTE_ADDR")

dim fs,f
set fs=Server.CreateObject("Scripting.FileSystemObject ")
set f=fs.CreateTextFile("D:\Inetpub\webs\laugherit\pub lic\text.txt",true)
f.WriteLine(anyVariable)
f.Close
set f=nothing
set fs=nothing
%>
---end code ---

Ora continuo a leggere il manuale. Devo trovare di aggiungere la riga che creo a quelle esistenti.

Ciao,
Apri il file in Append mode:

set f=fs.OpenTextFile(Server.MapPath("testread.txt"),8 ,true)
f.WriteLine("This text will be added to the end of file")

http://www.w3schools.com/asp/met_opentextfile.asp