en estas dos preguntas que has puesto, es donde limitaras las subidas de los archivos
Cita: 'get prev path if any
path = Request.QueryString("Path")
'if not assign one
if path = "" or isempty(path) then
path = "e:\inetpub" --> que pongo?
end if
'create filesystemobject
Set fso = CreateObject("Scripting.FileSystemObject")
'get a folder object
set f = fso.GetFolder(path)
path = f.path
en esta primera parte, es cuando no le has especificado en los parametros del codigo, en que directorio por default, hara la subida.....
aqui deberas cambiarlo a tu carpeta que hayas creado
un ejemplo
c:\inetpub\sitio\subidas
Cita: 'limit access to hard drive
if lcase(left(path,10)) <> "c:\inetpub" then--> o aqui?
path = "C:\Inetpub"
set f = fso.GetFolder(path)
path = f.path
end if
en esta otra parte del codigo, es donde limitas al codigo, limitar en el sentido de que si te suben un script, no pueda recorrer ningun otro lugar de tu sitio....
espero te ayude