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

Problema al cargar archivo

Estas en el tema de Problema al cargar archivo en el foro de ASP Clásico en Foros del Web. Saludos queridos amigos aqui estoy denuvo con un pequeño problema. Tengo un formulario que carga un archivo, el problema es que el codigo que sirve ...
  #1 (permalink)  
Antiguo 19/01/2007, 08:26
Avatar de karmish  
Fecha de Ingreso: mayo-2006
Mensajes: 272
Antigüedad: 18 años, 11 meses
Puntos: 1
Problema al cargar archivo

Saludos queridos amigos aqui estoy denuvo con un pequeño problema.
Tengo un formulario que carga un archivo, el problema es que el codigo que sirve para enviarlo me dice que no detecta la ruta.
el codigo es
Código:
<%
Set Upload = Server.CreateObject("Persits.Upload.1")
    Upload.OverwriteFiles = False 
    Upload.SetMaxSize 1048576 
    Upload.SaveVirtual "/uploads"

	Set File = Upload.Files("file")
    If Not File Is Nothing Then
	   archivo = File.FileName

       sTo = "[email protected]"
      ' sCC = "[email protected]"
       sFrom = Upload.Form("Editbox4")
       sMailServer = "127.0.0.1"

      Set objMail = Server.CreateObject("CDO.Message")
      Set objConf = Server.CreateObject("CDO.Configuration")
      Set objFields = objConf.Fields
        With objFields
          .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
          .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")  = sMailServer
          .Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 10
          .Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
          .Update
        End With

        With objMail
        Set .Configuration = objConf
           .From = sFrom
           .To = sTo
           .CC = sCC
           .Subject = "Recepcion de Relatos e historias sobre la vida y la muerte"
           .HTMLBody = "<b>Nombre: </b>"&Upload.Form("Editbox3")&"<br><b>Apellido: </b>"&Upload.Form("Editbox1")&"<br><b>E-mail :</b>"&Upload.Form("Editbox4")&"<br><b>Titulo del relato: </b>"&Upload.Form("Editbox2")&""
	       .AddAttachment Server.MapPath("/uploads/"&archivo&"")
        objMail.Send
        End With
Sinceramente no se que podria ser, ya que la carpeta esta echa, todo lo demas funciona exepto el almacenamiento del archivo.
  #2 (permalink)  
Antiguo 19/01/2007, 08:27
Avatar de karmish  
Fecha de Ingreso: mayo-2006
Mensajes: 272
Antigüedad: 18 años, 11 meses
Puntos: 1
Re: Problema al cargar archivo

el problema es que este mismo codigo si funciona con otros formularios, podria ser el formulario????
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 14:28.