Ciao a tutti,
in un'applicazione asp l'utente puà scegliere fra varie voci di un menu, tutte portano alla scrittura (di cose diverese)sullo stesso file.txt che si trova sul server.
Come posso gestire questa situazione?Se un utente sta scrivendo sul file e un altro prova ad entrare contemporaneamente per scrivere dovrebbe essere bloccato da un errore?
Possono essere conflitti?
Non me ne intendo assolutamente dei comportamenti in questi casi...
Per accedere al file uso:
Set FileObject=Server.CreateObject("Scripting.FileSystemObject")
Set OutStream=FileObject.OpenTextFile("percorsofile.txt",2,true)
Outstream.WriteLine(stringasd)
OutStream.Close
Set OutStream=Nothing
Set FileObject=Nothing

Giustissimo, imposta una variabile application che indichi se qualcuno sta scrivendo. Quando il processo di scrittura è finito, la variabile si svuota.

while Application("scrittura") = "1"
'ripetiamo il ciclo finchè la variabile è = 1
'se cambia, vuol dire che chi stava scrivendo sul file, ha finito
a=1
wend

'Ora eseguiamo il tuo codice
Application.Lock
Application("scrittura")="1"
Application.Unlock
Set FileObject=Server.CreateObject("Scripting.FileSystemObject")
Set OutStream=FileObject.OpenTextFile("percorsofile.txt",2,true)
Outstream.WriteLine(stringasd)
OutStream.Close
Set OutStream=Nothing
Set FileObject=Nothing
Application.Lock
Application("scrittura")=""
Application.Unlock

-----------------------
Da una perla dal saggio:
Quando non hai capito, devi dire "non ho capito", no che dici che hai capito e invece non hai capito un cavolo. Hai capito?
-----------------------

Si si tutto il codice va riportato nella stessa pagina, e in tutte le pagine in cui intendi implementare la scrittura sul file (magari mettilo in un file incluso, così se devi far delle modifiche dovrai aggiornare solo un file).

Sinceramente non so dirti che cosa succede se si prova a scrivere una variabile application mentre è locked (si tratta di un millessimo di secondo... non sono mai riuscito a sperimentarlo) però credo che non succeda niente... semplicemente penso che la pagina continui a provare a scrivere quella variabile finchè non ci riesce, non credo che ti dia errore.

Immaginati questo codice come la fila che si fa davanti al bagno degli autogrill, quando il cosetto sulla maniglia dice "occupato" lo script non può far altro che aspettare che torni a "libero".

Anche un'altra cosa: se due o più pagine si mettono in attesa non so poi chi ha la precedenza nell'eseguire lo script... boh, comunque si tratta di frazioni di secondo, tutto funzionerà alla grande sta tranquilla.


-----------------------
Da una perla dal saggio:
Quando non hai capito, devi dire "non ho capito", no che dici che hai capito e invece non hai capito un cavolo. Hai capito?
-----------------------

Si si è così, lo script sembrerà solo un po' più lento, ma perchè è in attesa (si parla sempre di frazioni di secondo...).

Ma ora che mi ci fai pensare:
"L'altro giorno è successo, ma per fortuna mi sono accorta in tempo per cancellare e riscrivere tutto."

quando usi questa stringa:
Set OutStream=FileObject.OpenTextFile("percorsofile.txt",2,true)

non importa se il file "percorsofile.txt" esista o no, sia pieno o vuoto, viene comunque cancellato del tutto e riscritto da capo.
Quindi quando fai:
Outstream.WriteLine(stringasd)
vedrai che il file di testo conterrà solo quest'ultima riga, e non tutto quello che conteneva prima.

Prima di adesso dovevo aprire il file in lettura, copiarmi il contenuto, riaprire il file in scrittura e scrivere tutto compresi gli aggiornamenti. Ma facendo una ricerca e ho scoperto che si può aprire il file "for appending", per cui quello che devi modificare è solamente questa riga:
Set OutStream=FileObject.OpenTextFile("percorsofile.txt",2,true)
con
Set OutStream=FileObject.OpenTextFile("percorsofile.txt",8,true)

quel ,8 indica che dovranno essere aggiunte informazioni a quelle pre esistenti, fammi sapere se funziona...


-----------------------
Da una perla dal saggio:
Quando non hai capito, devi dire "non ho capito", no che dici che hai capito e invece non hai capito un cavolo. Hai capito?
-----------------------