FileSystemObject con win 2000 server????

rucamario
21 de Febrero del 2002
Hola, tengo un problema con un Script que utiliza el FileSystemObject. Me funciona perfectamente en una maquina con Win 2000, pero cuando lo intento poner en win 2000 Server se queda "pensando" y no funciona ni da ningn error. ¿Puede ser problema de permisos? he probado ha todo tipo de permisos a la carpeta en cuestion "fotos" incluidos los de invitado e IUSR_...

El codigo en cuestion es el siguiente:


<%@ Language=VBScript %>

<%
Function MostrarFiles(ruta)
Dim fso, f, f1, fc, s
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder(ruta)
Set fc = f.Files
For Each f1 in fc
s = s & f1.name & "&nbsp;&nbsp;&nbsp;"& f1.size & " bytes."
s = s & "<BR>"
Next
MostrarFiles = s
End Function
%>


<html>
<head>
<title>kk</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#FFFFFF" text="#000000">

<%=MostrarFiles("c:Inetpubwwwrootfotos")%>
</body>
</html>



Sin embargo el sigiente codigo funciona perfectamente en ambas maquinas.



<%@ Language=VBScript %>

<%
Function MostrarListaDeUnidades
Dim fso, d, dc, s, n
Set fso = CreateObject("Scripting.FileSystemObject")
Set dc = fso.Drives
For Each d in dc
s = s & d.DriveLetter & " - "
If d.DriveType = Remote Then
n = d.ShareName
ElseIf d.IsReady Then
n = d.VolumeName
End If
s = s & n & "<BR>"
Next
MostrarListaDeUnidades = s
End Function
%>

<html>
<head>
<title>MostrarListaDeUnidades</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<%=MostrarListaDeUnidades%>
</body>
</html>



Por favor, necesito ayuda urgente.
Un saludo y GRACIAS [:)]

rENTON
21 de Febrero del 2002
Hola amigo, hace poco me paso lo mismo que ty
no sabia que rayos era , hasta que comence a nalizar pasa a paso.

Sorpresa desintale en ANtivirus Norton que tenia
el server y todo volvio a la normalidad, si tienes
instala norton en ese server del que hablas, lo mas problable es que sea el antivirus quien te bloquea.

Motivos ni idea.

Saludos rENTON

rucamario
21 de Febrero del 2002
Pues bien es cierto que tena norton, lo he desintalado pero sigue sin
funcionar. Por favor, aunque no sepas porque dime si a ti te funcionan
los metodos getfiles() o getfolders() del FileSystemObject en un win
2000 server. Toy desesperado...

Mandame aunque sea un script que te funcione en tu server.
Lo mas importante para mi ahora es saber si en otras maquinas con win
2000 server funcionan.

MUCHAS GRACIAS,
saludos, rucamario