Ver Mensaje Individual
  #1 (permalink)  
Antiguo 13/01/2010, 02:09
Avatar de engonga
engonga
Usuario no validado
 
Fecha de Ingreso: marzo-2002
Ubicación: Buenos Aires
Mensajes: 1.300
Antigüedad: 22 años
Puntos: 8
error codificacion aspemail persits

hola tengo este script

Código PHP:
<%
             
' Set Mail = Nothing
'
composo el correu
f_nombre_empresa 
request.form("NombreEmpresa")
f_persona_contacto request.form("PersonaContacto")
f_cargo_contaco request.form("CargoContacto")


f_tel request.form("Telefono")

f_mail request.form("mail")
f_pais request.form("Pais")
f_comentarios request.form("Mensaje")

'//////////////////////////////////// UN SISTEMA ANTI ROBOTS QUE MANDEN EL CORREO EN BLANCO
if f_mail <> "" then

else
response.redirect ("index-4.asp")
end if

'
//////////////////////////////////// FIN SISTEMA ANTI ROBOTS


fcomen_BR Replace(Request.Form("Mensaje"), vbCrLf"<br />")

'&"<meta http-equiv='Content-Type' content='text/htmlcharset=iso-8859-1' />"_

sMessage = "<!DOCTYPE html PUBLIC '
-//W3C//DTD XHTML 1.0 Transitional//EN `http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd'>" _
&"<html xmlns='http://www.w3.org/1999/xhtml'>"_
&"<head>"_

&"<meta http-equiv='Content-Type' content='text/html; charset=utf-8' />"_

&"<title>Formulario Web pipex.es</title>"_
&"<style type='text/css'>"_
&"<!--"_
&"body{"_
&"        margin-left: 0px;"_
&"    margin-top: 0px;"_
&"    margin-right: 0px;"_
&"    margin-bottom: 0px;"_
&"} "_


&".text_10px {"_
&"    font-family: Verdana, Arial, Helvetica, sans-serif;"_
&"    font-size: 12px;"_
&"    font-weight: normal;"_
&"    color: #333333;"_
&"}"_
&".text_titol_preus {"_
&"    font-family: Verdana, Arial, Helvetica, sans-serif;"_
&"    font-size: 14px;"_
&"    font-weight: bold;"_
&"    color: #333333;"_
&"}"_
&".fons_gris {"_
&"    background-color: #CCCCCC;"_
&"}"_






&".text_10px_oblicua {"_
&"    font-family: Verdana, Arial, Helvetica, sans-serif;"_
&"    font-size: 10px;"_
&"    font-weight: normal;"_
&"    color: #333333;"_
&"    font-style: oblique;"_
&"}"_



&".text_text_resaltat {"_

&"    font-family: Verdana, Arial, Helvetica, sans-serif;"_
&"    font-size: 16px;"_
&"    font-weight: bold;"_
&"    color: #716F64;"_
&"}"_
&".text_taula_preus_negreta {"_
&"    font-family: Verdana, Arial, Helvetica, sans-serif;"_
&"    font-size: 10px;"_
&"    font-weight: bold;"_
&"    color: #666666;"_
&"}"_




&"</style>"_
&"</head>"_

&"<body>"_
&"<table width='600' border='0' cellspacing='0' cellpadding='2'><tr>"_

    
&"<td colspan='2' height='30' class='fons_gris'><span class='text_text_resaltat'>"_
    
&"Formulario enviado desde PIPEX.ES </span></td>"_
  
&"</tr>"_
  
&"<tr>"_
    
&"<td colspan='2'><span class='text_titol_preus'>Datos Generales: </span></td>"_
    
&"<tr><td width='100%' height='2' colspan='2' bgcolor='#999999'></td></tr>"_
  
&"</tr>"_
  
&"<tr>"_
    
&"<td width='127' class='text_10px'><b>Nombre Empresa:</b></td>"_
    
&"<td width='465' class='text_10px'>"&    f_nombre_empresa &"</td>"_
  
&"</tr>"_
  
&"<tr>"_
    
&"<td class='text_10px'><b>Persona Contacto</b></td>"_
    
&"<td class='text_10px'>"f_persona_contacto &"</td>"_
  
&"</tr>"_
  
&"<tr>"_
    
&"<td class='text_10px'><b>Cargo Contacto</b></td>"_
    
&"<td class='text_10px'>"f_cargo_contaco&"</td>"_
  
&"</tr>"_
  
&"<tr>"_
    
&"<td class='text_10px'><b>Tel&eacute;fono:</b></td>"_
    
&"<td class='text_10px'>"&f_tel&"</td>"_
  
&"</tr>"_
  
&"<tr>"_
    
&"<td class='text_10px'><b>E-Mail:</b></td>"_
    
&"<td class='text_10px'><a href='mailto:"&f_mail&"'>"&f_mail&"</a></td>"_
  
&"</tr>"_
   
&"<tr>"_
    
&"<td class='text_10px'><b>Pais:</b></td>"_
    
&"<td class='text_10px'>"&f_pais&"</td>"_
  
&"</tr>"_
  
&"tr>"_
    
&"<td class='text_10px'>&nbsp;</td>"_
    
&"<td class='text_10px'>&nbsp;</td>"_
  
&"</tr>"_
  
&"<tr>"_
    
&"<td class='text_10px'>&nbsp;</td>"_
    
&"<td class='text_10px'>&nbsp;</td>"_
  
&"</tr>"_
  
&"<tr>"_
    
&"<td class='text_10px' valign='top'><b>Mensaje:</b></td>"_
    
&"<td class='text_10px'>"&fcomen_BR&"</td>"_
  
&"</tr>"_
&"</table>"_
&"</body>"_
&"</html>"






'"<b>DATOS GENERALES </B><BR>"_
'
&"<b>Nombre:</b><br> " f_nombre "<br><br>"_
'&"<b>Direccion:</b><br>" & f_direccion& "<br><br>" _
'
&"<b>Población:</b><br>" f_poblacion"<br><br><br><br>" _
'&"<b>Teléfono:</b><br>" & f_tel& "<br><br>" _
'
&"<b>Mail:</b><br><a href=mailto:"&f_mail&">" &f_mail &"</a><br><br><br>" _
'&"<B>RESERVA</B><br>" _
'
&"<b>Número adultos:</b>" f_adultos &"<br>" _
'&"<b>Número niños:</b>" & f_ninos &"<br><br>" _
'
&"<b>Fecha entrada:</b>" f_entrada "<br>" _
'&"<b>Fecha salidaa:</b>" & f_salida & "<br><br><br>" _
'
&"<b>Comentarios: </b><br>" fcomen_BR "<br>"



de f_mail
asunto 
"FORMULARIO WEB PIPEX.ES"


mensaje sMessage


&mensaje"</BODY></HTML>" 






Set Mail Server.CreateObject("Persits.MailSender")
Mail.Username "[email protected]" 'para ser validado
Mail.Password = "pipicaca"



Mail.Host = "mail.iberwall.net"

Mail.From = "[email protected]"

Mail.FromName = "[email protected]" ' 
Specify sender's name
'
Mail.FromName asunto ' Specify sender's name

'///////////////////// DIRECCION A LA QUE SE ENVIA

Mail.AddAddress "[email protected]" ' 
a la direccion donde se envia




Mail
.Subject asunto

     


Mail
.Body =sMessage
Mail
.IsHTML true    

Mail
.Send
Mail
.Sendtoqueue 
lo que me pasa es que la pagina donde esta el forumulario esta en UTF-8 y cuando me mandan el formulario
no me respta los caracteres raros (€ ñ à é...)

he mirado y he probado diferentes cosas pero ninguna funciona