Ciao,
con il seguente script cerco di leggere un file txt:
codice:
Dim strLinea, FileObject, Instream, strFile, intTipo
strFile = fileroot & "admin/aa.txt"
intTipo = 1 ' lettura
' creo l'oggetto
Set FileObject = Server.CreateObject("Scripting.FileSystemObject")
' apro il file
Set InStream = FileObject.OpenTextFile(strFile, intTipo, true) 
' leggo tutte le linee
strLinea = InStream.ReadAll()
Response.Write("<pre>" & strLinea & "</pre>" )
' libero risorse
InStream.Close
Set InStream = Nothing
Set FileObject = Nothing
Quando però lo faccio girare mi dà il seguente errore:
Errore di run-time di Microsoft VBScript (0x800A0046)
Autorizzazione negata
...nella riga di codice evidenziata.
Quale potrebbe essere il problema?
Grazie & Ciao!