Duda sobre un codigo
Publicado por Asp Novato (2 intervenciones) el 24/07/2007 17:53:34
Hola a todos amigos del ASP.
Tengo el siguiente codigo:
formulario.asp
<title>... Gracias por el mensaje ...</title><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
Parte 1
<%
Set Upload = Server.CreateObject("Persits.Upload")
Count = Upload.Save("c:\inetpub\vhosts\midominio.com\httpdocs\upload\")
Response.Write Count & "file uploaded to c:\inetpub\vhosts\midominio.com\httpdocs\upload\"
%>
Parte 2
<%
Response.Buffer=true
'creo el objeto correo
set mail = server.createObject("Persits.MailSender")
'configuro el mensaje
'señalo el servidor de salida para enviar el correo
mail.host = "smtp.midominio.com"
'indico la dirección de correo del remitente
mail.from = "[email protected]"
'indico la dirección del destinatario del mensaje
mail.addAddress "[email protected]"
'Obtengo los datos del formulario
nombre = upload.form("nom")
email = upload.form("email")
titulo = upload.form("titulo")
comentarios = upload.form("comentarios")
fichero = upload.form("fichero") //este es el que me da problema
'compongo el cuerpo del mensaje
cuerpo = "Formulario De Nuestra Página Web"& VBNEWLINE & VBNEWLINE
cuerpo = cuerpo & "Nombre: " & nombre & VBNEWLINE
cuerpo = cuerpo & "Email: " & email & VBNEWLINE
cuerpo = cuerpo & "Titulo: " & titulo & VBNEWLINE
cuerpo = cuerpo & "Comentario: " & comentarios & VBNEWLINE
cuerpo = cuerpo & "Fichero: " & fichero & VBNEWLINE //este es el que me da ploblema
'mando el correo...
ETC ETC ETC...
El problema que tengo es que me sube el fichero al server correctamente (parte 1 del codigo) y me envía el email a mi cuenta correctamente con lo datos del formulario, ecepto el campo fichero que lo que pretendo es que me muestre el nombre del fichero subido o la ruta donde se encuentra en el servidor.
En resumen que tengo los datos del usuario web y su fichero pero no los tengo asociados de ninguna manera lo que me va a generar confucion cuando tenga mas de 1.
Muchas Gracias por adelantado...
Tengo el siguiente codigo:
formulario.asp
<title>... Gracias por el mensaje ...</title><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
Parte 1
<%
Set Upload = Server.CreateObject("Persits.Upload")
Count = Upload.Save("c:\inetpub\vhosts\midominio.com\httpdocs\upload\")
Response.Write Count & "file uploaded to c:\inetpub\vhosts\midominio.com\httpdocs\upload\"
%>
Parte 2
<%
Response.Buffer=true
'creo el objeto correo
set mail = server.createObject("Persits.MailSender")
'configuro el mensaje
'señalo el servidor de salida para enviar el correo
mail.host = "smtp.midominio.com"
'indico la dirección de correo del remitente
mail.from = "[email protected]"
'indico la dirección del destinatario del mensaje
mail.addAddress "[email protected]"
'Obtengo los datos del formulario
nombre = upload.form("nom")
email = upload.form("email")
titulo = upload.form("titulo")
comentarios = upload.form("comentarios")
fichero = upload.form("fichero") //este es el que me da problema
'compongo el cuerpo del mensaje
cuerpo = "Formulario De Nuestra Página Web"& VBNEWLINE & VBNEWLINE
cuerpo = cuerpo & "Nombre: " & nombre & VBNEWLINE
cuerpo = cuerpo & "Email: " & email & VBNEWLINE
cuerpo = cuerpo & "Titulo: " & titulo & VBNEWLINE
cuerpo = cuerpo & "Comentario: " & comentarios & VBNEWLINE
cuerpo = cuerpo & "Fichero: " & fichero & VBNEWLINE //este es el que me da ploblema
'mando el correo...
ETC ETC ETC...
El problema que tengo es que me sube el fichero al server correctamente (parte 1 del codigo) y me envía el email a mi cuenta correctamente con lo datos del formulario, ecepto el campo fichero que lo que pretendo es que me muestre el nombre del fichero subido o la ruta donde se encuentra en el servidor.
En resumen que tengo los datos del usuario web y su fichero pero no los tengo asociados de ninguna manera lo que me va a generar confucion cuando tenga mas de 1.
Muchas Gracias por adelantado...
Valora esta pregunta
0