Problemas con FileSystemObject

CABEZOTA · #1 (**permalink**) 06/05/2002, 14:42

set FSO = Server.CreateObject("Scripting.FileSystemObje ct")
set oFich = FSO.OpenTextFile("C:\Documentos\pruebas.txt&q uot;, 1)

Al tratar de hacer esto la página no se carga. Estoy utilizando Win 2000 con IIS 5.0, anteriormente el sistema de archivos que utilizaba era FAT32 y ahora lo reinstale utilizando NTFS y comenzaron los problemas. Lei el siguiente artículo al respecto pero a pesar de que en la seguridad de todas la carpetas de mi disco esta definido TODOS (los usuarios) con todos los permisos no se soluciona mi problema. Si alguien sabe que debo hacer le agradecería su ayuda. :(

ARTÍCULO:
---------
Si probáis a utilizar FSO en vuestro servidor local (por ejemplo PWS), probablemente no tendréis problema ninguno. Ahora bien, tenéis que tener en cuenta que para realizar multitud de operaciones, el usuario web (la cuenta IUSR de IIS) necesita tener permisos de lectura, escritura, etc. en los directorios. Por ejemplo, no podréis escribir en un directorio si ese directorio no tiene permiso de escritura para los usuarios anónimos de vuestro web, ni podréis borrar un fichero o carpeta si no tenéis permiso para ello.

Desde ya muchas gracias.

CABEZOTA ;)

DARIOI · #2 (**permalink**) 06/05/2002, 16:27

ola prueba este:
<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY bgcolor='#ffcc00'>
Propiedad FileSystem
<%
'Descripción
'Devuelve el tipo de sistema de archivos que se está usando en la unidad
'especificada.Sintaxisobjeto.FileSystem objeto siempre es un objeto Drive.
'Comentarios
'Los tipos devueltos disponibles son FAT, NTFS y CDFS.
'El siguiente código muestra el uso de la propiedad FileSystem:
'original
'Function MostrarTipoDeSistemaDeArchivos(especificaciondeuni dad)
'Dim fso,d
'Set fso = CreateObject("Scripting.FileSystemObject&quot ;)
'Set d = fso.GetDrive(especificaciondeunidad)
'MostrarTipoDeSistemaDeArchivos = d.FileSystem
'End Function
%>

<%
'01
SUB MostrarTipoDeSistemaDeArchivos(especificaciondeuni dad)
Dim fso,d
Set fso = CreateObject("Scripting.FileSystemObject&quot ;)
Set d = fso.GetDrive(especificaciondeunidad)
'MostrarTipoDeSistemaDeArchivos = d.FileSystem
response.write "Se encontro : "
response.write "" & d.FileSystem
End sub
MostrarTipoDeSistemaDeArchivos ("C:")
%>
 <center><a href='javascript:window.close()'>Cerrar Ventana</a></center> 
<center><HR>CRIMAKETEMPLATE HOSTING</center> 
<center>Versión.1.0</center> 
</BODY>
</HTML>

DARIOI · #3 (**permalink**) 06/05/2002, 16:29

prueba este otro pero antes crear el archivo en el disco duro:

<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY bgcolor='#ffcc00'>
Propiedad Path 
<%
'Descripción
'Devuelve la ruta para un archivo, carpeta o unidad especificados.
'Sintaxis
'objeto.Path
'objeto siempre es un objeto File, Folder o Drive.

'Comentarios
'Para letras de unidades, la unidad raíz no está incluida. Por ejemplo,
'la ruta para la unidad C es C:, no C:\.
'El siguiente código muestra el uso de la propiedad Path con un objeto File:

Function MostrarInformacionDeAccesoDeArchivo(especificacion dearchivo)
Dim fso, d, f, s
Set fso = CreateObject("Scripting.FileSystemObject&quot ;)
Set f = fso.GetFile(especificaciondearchivo)
s = UCase(f.Path) & " "
s = s & "Creado: " & f.DateCreated & " "
s = s & "Último acceso: " & f.DateLastAccessed & " "
s = s & "Última modificación: " & f.DateLastModified
MostrarInformacionDeAccesoDeArchivo = s
End Function

%>

<%
sub MostrarInformacionDeAccesoDeArchivo(especificacion dearchivo)
Dim fso, d, f, s
Set fso = CreateObject("Scripting.FileSystemObject&quot ;)
Set f = fso.GetFile(especificaciondearchivo)
s = UCase(f.Path) & " "
s = s & "Creado: " & f.DateCreated & " "
s = s & "Último acceso: " & f.DateLastAccessed & " "
s = s & "Última modificación: " & f.DateLastModified
'MostrarInformacionDeAccesoDeArchivo = s
response.write "Se encontro : "
response.write "" & s
End sub
MostrarInformacionDeAccesoDeArchivo ("C:\critestfsys.txt")
%>
 <center><a href='javascript:window.close()'>Cerrar Ventana</a></center> 
<center><HR>CRIMAKETEMPLATE HOSTING</center> 
<center>Versión.1.0</center> 
</BODY>
</HTML>

suerte

galindox · #4 (**permalink**) 07/05/2002, 02:59

Probaste asignandole a la carpeta el atributo compartido?
ese que uno le pone a las carpetas cuando las quiere compartir en una red local?

bajo NTFS lo pide para permitirte escribir en la carpeta dado que para el un usuario internet es un usuario definido como anonimo y debe compartirse el recurso para que pueda accederlo

suerte ;)

jgg · #5 (**permalink**) 07/05/2002, 03:40

Tienes instalado el Norton Antivirus?

Un saludo!!

[email protected]

CABEZOTA · #6 (**permalink**) 07/05/2002, 11:54

Si tengo instalado el norton antivirus 2002

pcarvajal · #7 (**permalink**) 07/05/2002, 14:21

Hola,
Deshabilita el bloqueo automatico de scripts (scripts blocking) del Antivirus y listo

Saludos ;)