ASP - FSO EN MI PROPIO IIS

 
Vista:

FSO EN MI PROPIO IIS

Publicado por EMANUEL (17 intervenciones) el 27/02/2005 11:04:55
EL PROBLEMA QUE TENGO ES QUE ESTE CODIGO FUNCIONA PERFECTAMENTE EN MI SERVIDOR DE PAGO DE INTERNET, DONDE TENGO MI WEB, PERO EN MI PROPIO IIS DE MI PC NO ME FUNCIONA...

If Request.QueryString("fold")<>"" then
pthFolder=pthFolder&"/"&Request.QueryString("fold")
else
pthFolder="/"
end if
Set fso=Server.CreateObject("Scripting.FileSystemObject")
If not fso.FolderExists(server.mappath(pthFolder)) then
Response.Write("<p align=center>")
response.write("La carpeta seleccionada no puede ser mostrada porque ha cambiado de ubicación o no está disponible</p>")
response.write("<p align=center><a href=files.asp class=menu>Regresar</a></p>")
'aqui vendría la seccion de cerrar sesion, por el momento solo muestro un mensaje
Response.End()
end if

'get all required info
sParentFolder=fso.GetParentFolderName(pthFolder)
If sParentFolder="" then sParentFolder="/"
If left(sParentFolder,1)="/" or left(sParentFolder,1)="\" then sParentFolder=Mid(sParentFolder,2)
sBackURL="files.asp?fold="&sParentFolder
dim FolderSize
FolderSize=0

'ES EN LA LINEA QUE VIENE A CONTINUACION DONDE SE JODE TODO, SI ESA LINEA LA "COMENTO" YA FUNCIONA

'ESTO ES SOLO UNA FRACCION DEL PRINCIPIO DEL CODIGO, PERO YA VALE PARA PODER VER EL PROBLEMA QUE TENGO

Set Folder=fso.GetFolder(Server.MapPath(pthFolder))
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder