Indique este site chega desconfigurado!

[Gustav Silv 0]

Olá pessoal!

 

Estou fazendo uma indicação do site onde pego os nomes e emails dos indicados (Está funcionando 100%!) e envia a mensagem, sendo o corpo do html dividido: Primeiro vem o corpo "A", depois a variável do indicado (Tipo: Fulano de tal;), depois vem o corpo "B", depois a variável de quem indicou (Tipo: Cicrano indicou...) e finalmente o body "C".

 

Já tentei colocar no .asp o html, em banco, e sempre acontece o mesmo problema: As imagens, mesmo usando o "spacer" perdem a locação e o bg da celula não aparece, sendo que o bg da página aparece tranquilo...

 

Agradeço a quem puder me socorrer!!!

[Ted k' 126]

podeiria colocar o código para análise?

[hargon 64]

Verifica a configuração do Microsoft Outlook.

[Gustav Silv 0]

podeiria colocar o código para análise?

Como solicitado, segue código...<%'______________________________________________________________________________________________________________________________'REQUISITA DOS DADOS POSTADOS NO FORMULRIO: vNAME = REQUEST ("NAME") 'NOME DE QUEM ESTÁ INDICANDO vEMAIL = REQUEST ("EMAIL") 'EMAIL DE QUEM ESTÁ INDICANDO vNAME1 = REQUEST ("NAME1") 'NOME DO PRIMEIRO INDICADO vEMAIL1 = REQUEST ("EMAIL1") 'EMAIL DO PRIMEIRO INDICADO vNAME2 = REQUEST ("NAME2") 'NOME DO SEGUUNDO INDICADO vEMAIL2 = REQUEST ("EMAIL2") EMAIL DO SEGUNDO INDICADO vNAME3 = REQUEST ("NAME3") 'NOME DO TERCEIRO INDICADO vEMAIL3 = REQUEST ("EMAIL3") 'EMAIL DO TERCEIRO INDICADO vMESSAGE = REQUEST ("MESSAGE")'______________________________________________________________________________________________________________________________'SELECIONA O BODY A SER ENVIADO: vID = "1" SET BODY = DB.EXECUTE ("SELECT * FROM BODYS WHERE ID = "&vID&"") vBODY1 = BODY ("BODY1") vBODY2 = BODY ("BODY2") vBODY3 = BODY ("BODY3") '______________________________________________________________________________________________________________________________'ENVIA EMAIL PARA INDICADOS IF vEMAIL1 <> "" THEN 'CASO SOMENTE HOUVE 1 INDICAÇÃO Set objCDOSYSMail = Server.CreateObject("CDO.Message") Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration") objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost" objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport")= 25 objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 30 objCDOSYSCon.Fields.update Set objCDOSYSMail.Configuration = objCDOSYSCon objCDOSYSMail.From = "Nome da empresa <contato@empresa.com.br>" objCDOSYSMail.To = vEMAIL1 objCDOSYSMail.ReplyTo = "contato@empresa.com.br" objCDOSYSMail.Subject = UCASE(vNAME) & " indica a Empresa - Soluções" objCDOSYSMail.HtmlBody = vBODY1 & vNAME1 & vBODY2 & vNAME & vBODY3 objCDOSYSMail.fields.update objCDOSYSMail.Send Set objCDOSYSMail = Nothing Set objCDOSYSCon = Nothing END IF'______________________________________________________________________________________________________________________________%>E assim por diante, para 2 e 3 indicados...Aguardo um retorno! Valeu!!