Foros del Web » Programando para Internet » ASP Clásico »

Como discriminar el tipo de archivo que están subiendo

Estas en el tema de Como discriminar el tipo de archivo que están subiendo en el foro de ASP Clásico en Foros del Web. mediante Xelupload?? quiero que solo sean JPG, JPEG o GIF.... ahora bien.... estuve leyendo el código pero no doy con la soloución... grax de antemano...
  #1 (permalink)  
Antiguo 03/03/2004, 07:22
 
Fecha de Ingreso: marzo-2003
Ubicación: onde toy?
Mensajes: 1.437
Antigüedad: 21 años, 3 meses
Puntos: 9
Como discriminar el tipo de archivo que están subiendo

mediante Xelupload?? quiero que solo sean JPG, JPEG o GIF.... ahora bien.... estuve leyendo el código pero no doy con la soloución... grax de antemano
__________________
Buena Vida...
Francisco

Última edición por Bluesman74cl; 03/03/2004 a las 07:25
  #2 (permalink)  
Antiguo 03/03/2004, 09:42
Avatar de Ruchu  
Fecha de Ingreso: octubre-2001
Mensajes: 698
Antigüedad: 22 años, 8 meses
Puntos: 2
Pues haces:

if right(objFich.Nombre,3)<>"jpg" or right(objFich.Nombre,3)<>"gif" entonces lo hechas para atras

lo que hace esto es mirar si los 3 ultimos caracteres del nombre del archivo subido son jpg o gif.
  #3 (permalink)  
Antiguo 03/03/2004, 10:04
 
Fecha de Ingreso: marzo-2003
Ubicación: onde toy?
Mensajes: 1.437
Antigüedad: 21 años, 3 meses
Puntos: 9
tengo un error

Falta un objeto "
en uptest linea 51 y la linea 51 es donde hago la comprobación
if right(objFich.Nombre,3)<>"jpg" or right(objFich.Nombre,3)<>"gif" then

response.redirect"foto.asp"
else
__________________
Buena Vida...
Francisco
  #4 (permalink)  
Antiguo 03/03/2004, 12:01
Avatar de meru-kun  
Fecha de Ingreso: noviembre-2002
Ubicación: Madrid
Mensajes: 854
Antigüedad: 21 años, 6 meses
Puntos: 0
Ten en cuenta que donde el pone objFich tu tienes que poner el nombre con el que hayas llamado a tu Object.
Será eso lo que te falla, mira a ver :P
__________________
Tu portal de manga y anime.
  #5 (permalink)  
Antiguo 03/03/2004, 12:38
Avatar de Ruchu  
Fecha de Ingreso: octubre-2001
Mensajes: 698
Antigüedad: 22 años, 8 meses
Puntos: 2
<!--#include file="xelupload.asp"-->
<%
Dim maxtam, strNombreFichero
maxtam = 400 * 1024
set objUpload = new xelUpload
objUpload.Upload()

set objFich = objUpload.Ficheros("file")

if right(objFich.Nombre,3)<>"jpg" or right(objFich.Nombre,3)<>"gif" entonces lo hechas para atras

set objFich = nothing
set objUpload = nothing


aqui esta el codigo "completo", te ha de funcionar por cojones. (supongo), jajajaja
  #6 (permalink)  
Antiguo 03/03/2004, 12:38
 
Fecha de Ingreso: marzo-2003
Ubicación: onde toy?
Mensajes: 1.437
Antigüedad: 21 años, 3 meses
Puntos: 9
si...estuve viendo eso...y estoy tratando de encontrar donde se obtiene el nombre de los archivos a subir
__________________
Buena Vida...
Francisco
  #7 (permalink)  
Antiguo 03/03/2004, 12:40
 
Fecha de Ingreso: marzo-2003
Ubicación: onde toy?
Mensajes: 1.437
Antigüedad: 21 años, 3 meses
Puntos: 9
uff me adelanté a tu segundo comentario...dejame ver si logro darle con eso...grax
__________________
Buena Vida...
Francisco
  #8 (permalink)  
Antiguo 03/03/2004, 14:14
 
Fecha de Ingreso: marzo-2003
Ubicación: onde toy?
Mensajes: 1.437
Antigüedad: 21 años, 3 meses
Puntos: 9
Saben...no funca.... es más..he etado tratando de modificar el codigo en el metodo Guardar(ruta) pero me arroja el error del encabezado y tengo puesto response.buffer ok...y no entiendo que puede pasar
__________________
Buena Vida...
Francisco
  #9 (permalink)  
Antiguo 04/12/2004, 22:45
Avatar de lexus  
Fecha de Ingreso: enero-2002
Ubicación: Cali - Colombia
Mensajes: 2.234
Antigüedad: 22 años, 5 meses
Puntos: 4
hola prueba con este, funciona perfecto


Código:
 
<!--#include file="xelupload.asp"-->
<%
Dim up, fich, ExtPermitidas, NombreFichero, Extension, nombreimagen, Maxtam
set up = new xelUpload
up.Upload()
%>
<%
For each fich in up.Ficheros.Items
'Response.Write("<li>Tamaño: <b>" & fich.Tamano & "</b> bytes (" & FormatNumber(fich.Tamano / (1024)) & " Kb)</li>")
' no deja subir archivos ke pesen mas que maxtam
Maxtam = 150  ' en Kb
If fich.Tamano > (Maxtam*1024) then
response.write "No puede subir un que pese mas de "& Maxtam & "Kb."
else
'impedir subir archivos diferentes a imagenes
ExtPermitidas = "|gif|jpg|jpeg|"
NombreFichero = Split(fich.Nombre, ".")
Extension = NombreFichero(1)
If InStr(ExtPermitidas, "|" & Extension & "|") = 0 Then
Response.Write "No puede subir archivos con extenciones ." & Extension
Response.End
Else
'Para guardarlo con otro nombre:
Response.Write "Ha subido correctamente la imagen llamada "& fich.Nombre 
	nombreimagen = "juanc."& Extension
' carpeta donde se guardara el archivo
 fich.GuardarComo nombreimagen, Server.MapPath("fotos/")
'----------------------------------------------------------------
end if
end if
Next
'Limpiamos objeto
set up = nothing
%>
__________________
Control de Visitantes, Control de Accesos, Minutas digitales, Manejo de Correspondencia
http://www.controldevisitantes.com
  #10 (permalink)  
Antiguo 29/12/2004, 14:33
 
Fecha de Ingreso: enero-2002
Ubicación: Callao - Perú
Mensajes: 1.127
Antigüedad: 22 años, 5 meses
Puntos: 0
Como se puede agregar 3 caracteres aleatorios a las imagenes para no tener duplicados y como se puede rescatar estos nombres para tenerlos en variables?
__________________
SaLuDoS dE:
PePeLuChO dEl PeRú PaRa El MuNdO
  #11 (permalink)  
Antiguo 02/01/2005, 19:01
 
Fecha de Ingreso: enero-2005
Mensajes: 8
Antigüedad: 19 años, 5 meses
Puntos: 0
Hola Señores, he estado navegando en estos foros, soy nuevo de hecho me acabo de registrar y cuando vi la pregunta que estaban haciendo acerca de la discriminacion de subir ciertos archivos con solo la extesion deseada me interese en entrar a ver cual ha sido su respuesta. Estoy en busca de realizar el mismo proceso y tengo algo que igual les puede ser de utilidad a mi me ha servido pero yo estoy en busca de algo un poco mas alla de esta solucion con la finalidad de q un usuario no pierda tiempo en buscar cula es el archivo q va a subir si de antemano se le limita a que solo puedad usbir un tipo de extension, bueno dejando todo el choro atras le mando el codigo para delimitar las extensiones antes de usar el xelUpload
<script type="text/javascript" language="JavaScript"><!--
function check() {
var ext = document.f.pic.value;
ext = ext.substring(ext.length-3,ext.length);
ext = ext.toLowerCase();
if(ext != 'jpg') {
alert('You selected a .'+ext+
' file; please select a .jpg file instead!');
return false; }
else
return true;
}
//--></script>

<form method="post" name=f
enctype="multipart/form-data"
onsubmit="return check();"
action="mipagina.asp">
<p>
Please select a JPEG (.jpg) file to be sent:
<br>
<input type="file" name="pic" size="40">

<p>
<input type="submit" value="Send">
</form>

Como veran antes de mandar llamara a la pagina q procesa el archivo si este no tiene una extension valida no permite el envio.
Realmete espero q les sea d utilidad. Y si llegara a encontrar una forma mas rapida se le hare llegar.

Saludos.
arma
  #12 (permalink)  
Antiguo 03/01/2005, 06:29
Avatar de Muzztein  
Fecha de Ingreso: agosto-2002
Ubicación: Hangar 18
Mensajes: 1.703
Antigüedad: 21 años, 9 meses
Puntos: 16
ESTAN TODOS EQUIVOCADOS !!!!



jejejeje....

la verdad es que xelupload es una maravilla hecha codigo y me da pena no haberla hubicado antes,ya que me hubiera ahorrrado muchisimos dolores de cabeza.

asi que desde aqui le mando las gracias por compartir su genialidad al creador de este codigo que es tan bueno y tan bien documentado.

y todo gratis !!!


en fin... en respuesta a la pregunta.
creo que la manera de reconocer el verdadero tipo de dato que el archivo tiene es usando la propiedad de tipo de dato del objeto xelupload.

y que es fich.TipoContenido.


hagan unas pruebas y vean que es lo que arroja al tratar de subir un archivo.

luego utilizan esto como para aplicar filtros y checar si es que estan realmente subiendo lo que tu desean que suban.


saludos
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 23:17.