28/04/2003, 16:17
|
 | | | Fecha de Ingreso: abril-2003
Mensajes: 278
Antigüedad: 22 años Puntos: 1 | |
| Upload de .doc y .xls / máx. 20 kbs. ¿Es posible?
Estimados amigos:
Dispongo del siguiente código para hacer un Upload. Quisiera que los usuarios sólo pudieran enviar documentos de menos de 20 kbs y con extensión .doc / .xls, exclusivamente
¿Es posible indicarlo en el código?
Gracias,
Emajesus
<HTML>
<BODY BGCOLOR="#FFFFFF">
<%
t = lcase(left(Request.ServerVariables("CONTENT_TYPE") , 19))
if t = "multipart/form-data" then
Set Upload = Server.CreateObject("Persits.Upload.1")
pathname = "attachfile"
Upload.save pathname
response.write "¡Upload sin errores!"
end if
%>
<FORM METHOD="POST" ENCTYPE="multipart/form-data">
<INPUT TYPE="FILE" SIZE="40" NAME="FILE1"><BR>
<INPUT TYPE=SUBMIT VALUE="Upload!">
</FORM>
</BODY>
</HTML> |