Jmail POP3 - Haster
hejjeg sidder og arbejder lidt med Jmail og kom til at se at den understøtter læsning af mails, men hvordan pokker får jeg skidtet til at virke.
Jeg har fulgt manualen (Det skal lige siges at jeg ikke er nogen haj indenfor ASP) og har fået nedestående kode ud af det.
*****************************
<%
Set pop3 =Server.CreateObject(“JMail.POP3 ” ))
pop3.Connect “bruger ”,“adgangskode ”,“mail.xxxxxx.dk ”
Response.Write(“You have “ &&pop3.count &_
“ e--mails in your mailbox!<br><br>” ))
if pop3.count >0 then
Set msg =pop3.Messages.item(1)
ReTo =“”
ReCC =“”
Set Recipients =msg.Recipients
separator =“,“
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 &“ ”&re.EMail &”””>” &&_
re.EMail &separator
else
ReCC =ReTo &re.Name &“ ”&re.EMail &”””>” &&_
re.EMail &separator
End If
Next
%>
<%
<html>
<body>
Subject <%=msg.Subject %><br>
From <%=msg.FromName %><br>
Recipients To <%=ReTO %><br>
Recipients CC <%=ReCC %>
<hr>
Body<br>
<pre><%=msg.Body %></pre>
</body>
</html>
%>
<%
pop3.Disconnect
%>
**********************
