oggetto file attivo

[SickNabar]

Ragazzi,
in un mio programma

creo due oggetti file :

Set newFs1 = Server.CreateObject("Scripting.FileSystemObject")
Set newFs2 = Server.CreateObject("Scripting.FileSystemObject")

....

alla fine del programma li devo chiudere, ma non sò se li ho aperti tutti e due e quindi:


if newFile1 then
newFile1.Close
set oldFile = nothing
end if

if newFile2 then
newFile2.Close
set newFile2 = nothing
end if

però così non funziona non c'è un metodo che mi permetta di sapere se l'oggetto newFs1 e attivo o meno?

[SickNabar]

forse non c'è...

[Santino83_02]

chiudili indipendentemente dal fatto se sono aperti o meno (in effetti magari darebbe errore)

oppure ti fai due variabili

dim open1,open2
open1=false
open2=false

quando apri il file setti a TRUE la varibile corrispondente e poi fai

if open1 then
FIle1.close
....
end if

if open2 then
file2.close
....
end if

[SickNabar]

si hai ragione che stupido a non averci pensato subito....

[SickNabar]

ma adesso in un altra pagina asp ho un nuovo problema:

mi creo l'oggetto:

Set newFs = Server.CreateObject("Scripting.FileSystemObject")

e poi

Set newFile = newFs.CreateTextFile(Server.MapPath("expo\prova.tx t"), True)

ma mi genera il solito errore:

Autorizzazione negata
/salati/expo_mida3.asp, line 227


i diritti di lettura e scrittura sono ok anche perchè le altre pagine asp con lo stesso codice funzionano.... aiutatemi

[Santino83_02]

sicuro che siano ok? fatti stampare il mappath e controlla che sia un percorso corretto...sicuro che non dovesse essere:
Server.MapPath("/expo/prova.txt") ?

[SickNabar]

risolto!!!

Set newFile = newFs.CreateTextFile(Server.MapPath("expo\prova.tx t"), True)


questa riga era accidentalmente finita in un loop...

[Santino83_02]

Originariamente inviato da SickNabar
risolto!!!

Set newFile = newFs.CreateTextFile(Server.MapPath("expo\prova.tx t"), True)


questa riga era accidentalmente finita in un loop...

:berto: