Xelupload, limitar tamaño y pixels

[Bluesman74cl]

Yo lo estoy haciendo asi... lo raro es que en el IIS estaba funcionando de perillas... y aqui..en PWS no me hace el upload..y me redirecciona a foto.asp a pesar de que el formato es el correcto????? AYUDA!!!!!!!

<%
dim objUpload, objFich
dim maxtam, strNombreFichero
'definimos el tamaño permitido de la imagen
maxtam= 4000*1024
set objUpload = new xelUpload
objUpload.Upload()
'accedemos al fichero por su nombre en el formulario
set objFich = objUpload.Ficheros("imagen")
if objFich.tamano <= maxtam and objFich.TipoContenido = ("image/gif") or objFich.TipoContenido = ("image/jpg") or objFich.TipoContenido = ("image/pjpeg") then
objFich.guardar Server.MapPath("../horas/imagenes/usuarios")
Response.Flush
response.write("Nombre Archivo: ")
response.write(objFich.Nombre)
session("fichero")= objFich.nombre
response.write"<br>"
response.write("Tipo Archivo&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;: ")
response.write(right(objFich.TipoContenido,4))
response.write"<br>"
response.write("Tamaño Archivo: ")
response.write(objFich.tamano/1024)
response.write(" Kb")


else
response.write("no es un fichero válido")
response.write(objFich.TipoContenido)
session("tipo")= objFich.TipoContenido
response.redirect"foto.asp"
end if



response.buffer="true"
%>