¿Cómo guardar en una variable el nombre de un fichero de un campo file?

ciberpata · #1 (**permalink**) 17/08/2004, 01:40

Saludos:
Necesito pasar el contenido de un campo file en una variable a otro formulario, entre otras cosas para poder validarlo (para saber si está vacio), pero no hay manera.
Lo hago sin ningún problema excepto con un campo file.
Gracias

mtr9 · #2 (**permalink**) 17/08/2004, 01:49

Public Function getFileName(name)
If dict.Exists(name) Then
Dim temp, tempPos
temp = dict(name).Item("FileName")
tempPos = 1 + InStrRev(temp, "\")
getFileName = Mid(temp, tempPos)
Else
getFileName = ""
End If
End Function

mtr9 · #3 (**permalink**) 17/08/2004, 01:52

visita esta pagina donde encontraras la clase para tratamiento de ficheros en asp

http://www.asptutor.com/asp/vartprint.asp?id=129

ciberpata · #4 (**permalink**) 10/09/2004, 11:20

Saludos:
No hay forma de sacar la historia pa'lante

A ver soy relativamente novato en esto, por lo que no me entero de mucho con el tema de la dirección web que me has facilitado. De todas maneras he intentado validar si el campo file está vacio o lleno aplicando la funcion que me has pasado y no hay forma. Por lo que te paso lo que hice y si tienes a bien, corrigeme aunque sea a base de ho....

Por si yo no me había explicado bien lo que quiero es validar si el campo file pasa vacio o lleno. Obviamente si pasa vacio le mandaré al usuario que busque un fichero para subir al servidor.
El problema es que tal como tengo los dos ficheros siguientes siempre me dice que está vacio.

A ver hice lo siguiente en un par de ficheros de prueba.

Codigo página prueba1.asp

Código:

 
<<A href="mailto:%@LANGUAGE="VBSCRIPT">%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Documento sin t&iacute;tulo</title>
</head>
<body>
<form action="prueba1_result.asp" method="post" enctype="multipart/form-data" name="form1">
  <p>
	<input name="name" type="file" id="name">
</p>
  <p>
	<input type="submit" name="Submit" value="Enviar">
</p>
</form>
</body>
</html>

Código pagina prueba1_result.asp

Código:

 
<<A href="mailto:%@LANGUAGE="VBSCRIPT">%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Documento sin t&iacute;tulo</title>
</head>
<%
Set dict = Server.CreateObject("Scripting.Dictionary")
Public Function getFileName(name)
If dict.Exists(name) Then
Dim temp, tempPos
temp = dict(name).Item("FileName")
tempPos = 1 + InStrRev(temp, "\")
getFileName = Mid(temp, tempPos)
response.Write("el campo está lleno")
Else
getFileName = ""
response.Write("el campo está vacio")
End If
End Function
getfilename(name)
%>
<body>
</body>
</html>

Gracias