Avatar billede koldstar Nybegynder
12. november 2002 - 19:25 Der er 5 kommentarer og
1 løsning

html mails??

hej.
Jeg har forsøgt tidligere med dette spg: http://www.eksperten.dk/spm/281597

Nu har jeg skiftet komponent til jmail.
Her kan jeg godt læse html mails, men der er 10-12 blanke linie når jeg åbner en html mail skrevet i outlook... Hvordan kan det være???
Avatar billede medions Nybegynder
12. november 2002 - 19:40 #1
Må jeg prøve at se din kode?

//>Rune
Avatar billede koldstar Nybegynder
12. november 2002 - 19:41 #2
jep.. 2 sek
Avatar billede koldstar Nybegynder
12. november 2002 - 19:44 #3
<% @LANGUAGE=VBSCRIPT %>
<%

Set pop3 = Server.CreateObject( "JMail.POP3" )
pop3.Connect "test@domæne.dk", "koden", "nail.minudbyder.dk

msgno = request.querystring("id") +1
Set msg = pop3.Messages.item(msgno)
ReTo = ""
ReCC = ""

Set Recipients = msg.Recipients
separator = ", "

' We now need to get all the recipients,
' both normal and Carbon Copy (CC) recipients
' and store them in a variabel

For i = 0 To Recipients.Count - 1
  If i = Recipients.Count - 1 Then
    separator = ""
  End If

  Set re = Recipients.item(i)
  If re.ReType = 0 Then
    ReTo = ReTo & re.Name & "&nbsp;(" & re.EMail & ")" & separator
  else
    ReCC = ReTo & re.Name & "&nbsp;(" & re.EMail & ")" & separator
  End If
Next

' This function iterates through the Attachments object,
' and saves the attachment to the server's disk.
' It also returns a nicely formatted string with a
' link to the attachment.
Function getAttachments()
  Set Attachments = msg.Attachments
  separator = ", "

  For i = 0 To Attachments.Count - 1
    If i = Attachments.Count - 1 Then
      separator = ""
    End If

  Set at = Attachments(i)
  //undersøg om filen eksisterer
  dir = server.mappath("../email/att/") & "\" & at.Name
  at.SaveToFile(dir)
  getAttachments = getAttachments & "<a href=""/log/email/att/" &_
  at.Name &""">" & at.Name & "(" & at.Size & " bytes)" &_
  "</a>" & separator
  Next
End Function

%>
<html>
<body>
<TABLE>
<tr>
  <td>Subject</td>
  <td><%= msg.Subject %></td>
</tr>
<tr>
  <td>From</td>
  <td><%= msg.FromName %></td>
</tr>
<tr>
  <td>Recipients To</td>
  <td><%= ReTO %></td>
</tr>
<tr>
  <td>Recipients CC</td>
  <td><%= ReCC %></td>
</tr>
<tr>
  <td>Attachments</td>
  <td><%= getAttachments %></td>
</tr>
<tr>
  <td>Body</td>
  <td valign="top"><pre>
        <%
        if len(msg.HTMLBody) > 10 then
            %>start_HTML:::<%=msg.HTMLBody%><%
        else
            %>start_ALM:::<%=msg.Body%><%
        end if
        %>
       
    </pre></td>
</tr>
</TABLE>
</body>
</html>
<%



pop3.Disconnect

%>
Avatar billede koldstar Nybegynder
12. november 2002 - 19:45 #4
det er bare det eksempel som man kan finde på deres hjememside med msg.htmlbody som udviddelse
Avatar billede koldstar Nybegynder
26. november 2002 - 19:30 #5
jeg har fundet løsningen... en html mail indeholder selvfølgelig også head og body... derfor vil der komme dobbelt head og body. jeg åbner den derfor i en iframe.... (hvis nogen skulle være interreserede)
Avatar billede koldstar Nybegynder
26. november 2002 - 19:30 #6
dsg
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester