Ver Mensaje Individual
  #1 (permalink)  
Antiguo 21/09/2005, 00:55
Agrey
 
Fecha de Ingreso: octubre-2003
Mensajes: 364
Antigüedad: 21 años, 6 meses
Puntos: 1
Pierdo estilo el Boletin

Hola tengo un problema con el envio de Boletines que paso a comentaros.

Cojo el boletin con FSO y a la hora de recibirlo el boletin aparece pero sin los estilos etc...
Esto pq ocurre??? Pq el boletin lo visualizo bien.

Código:
<%
fName = server.mappath("boletin/boletin_45.html")
Set fs = CreateObject("Scripting.FileSystemObject")
	Set a = fs.openTextFile(fName)
	Mensaje = a.readall
	a.Close
	set a = nothing
	set fs = nothing
	

Set Mail=Server.CreateObject("Persits.MailSender")
Mail.Host = "smtp.xxx.org"
Mail.From = "[email protected]"
Mail.FromName = "xxx"
Mail.AddAddress "[email protected]", "W"
Mail.Subject = "Contacto"
Mail.IsHTML = True
Mail.body = Mensaje 
Mail.Sendtoqueue

if Err <> 0 Then
Response.Write ( "Error: " & Err.Description )
else
%>	<script>
	alert("Tu mensaje se ha enviado correctamente")
var web="index.asp";
window.location.href= web;
	</script>
	
	<%
end if

%>

Espero que me podais echar una mano