Problema con xelUpload

[fueradejuego]

Hola a todos.

Hace poco que programo en asp, soy programador php, pero necesito hacer una web en asp y tengo un problema al intentar subir archivos al servidor.

Este codigo lo sace de enlaces de este foro,pero cuando pulso el boton aceptar del formulario,que solo tiene un objeto tipo file, que se llama "file", se me bloquea el servidor por completo,teniendo incluso que reiniciar el ordenador para poder ver cualquier pagina en asp.

Al principio parace que funciona pero tremendamente lento,hasta que cuando la barra de progreso de carga del explorer llega algo menos de la mitad y ahi se queda.

Alguien puede hecharme una mano o decirme otra forma de subir archivos al servidor sin tener que instalar programas en el servidor?

Un saludo y gracias de antemano.

Ahi pongo el codigo:


<!--#include file="xelupload.asp"-->
<%
Dim oConn, rs, SQL
Dim objUpload, objFich, strNombre, strEdad
Dim maxtam, strNombreFichero

maxtam = 15 * 1024

set objUpload = new xelUpload
objUpload.Upload()

'si no ha subido ningún fichero, le avisamos
if objUpload.Ficheros.Count = 0 then
Response.Write("¡No has subido ningún fichero!")
else
'accedemos al fichero por su nombre en el formulario
set objFich = objUpload.Ficheros("file")
if objFich.Tamano <= maxtam then
'Es el fichero correcto

'En nuestro directorio imagenes con el nombre que tiene
objFich.Guardar Server.MapPath("imagenes")

Response.Write "Se ha añadido el nuevo usuario <b>" & strNombre & "</b>, " _
& "con el fichero " & objFich.Nombre & " de tamaño " & objFich.Tamano & "."

'Limpiamos nuestro xelUpload y el fichero
set oFich = nothing
set objUpload = nothing

else
'No era un fichero válido
Response.Write("No es un fichero aceptable. ")
end if

end if
%>

[AlZuwaga]

apuesto 100 a 1 a que es el antivirus. desactivale la opción de bloqueo de scripts y fijate si así funciona

[fueradejuego]

Pues si,era el antivirus lo que bloqueaba el servidor. Muchas gracias.

Ahora tengo otro problemilla, aparte del fichero que subo al servidor quiero pasar un campo de texto, lo he puesto en el formulario pero no consigo recoger el valor de la variable.

Al tener el codigo este para subir los archivos he tenido que poner lo siguiente para recoger el valor del campo de texto

strNombre = objUpload.Ficheros("txt")

El campo de texto se llama txt, asi es como se supone que se pone,el caso es que eso no funciona, la variable strNombre se queda vacia.
Hay alguna otra forma de recoger la variable o que tiene mal puesto??

Una vez mas,un saludo y gracias.

[fueradejuego]

Bueno,ya he encontrado el problema. Era una tonteria, me confundi y puse Ficheros en vez de Form,por eso no cogia la variable.

strNombre = objUpload.Ficheros("txt") -> strNombre = objUpload.Form("txt")

Un saludo.

[AlZuwaga]

Claro, todo viene bien detalladito en la propia documentación ;)