Avatar billede pnr Nybegynder
13. februar 2003 - 14:35 Der er 1 kommentar og
3 løsninger

kan jeg få en asp side til at hente mail og ligge dem på en side?

Jeg kunne godt tænke mig at lave en side som kan hente mails, og ligge sem på siden så de kan downloades, eller man evt kan læse dem på siden. kan det lade sig gøre, og hvordan.
Avatar billede bufferzone Praktikant
13. februar 2003 - 14:38 #1
De fleste mailservere har i dag webmail og det er naturligvis muligt at hendte denne webmail ned på din egen side. Det svære ligger i at lave en asp side der først logger on på din udbyders webmail, det med at få siderne net er ikke svære.
Du kune selvfølgelig bare vælge at bruge udbyderens webmail i stedet, det kan faktisk det samme
Avatar billede Slettet bruger
13. februar 2003 - 14:46 #2
Hvis du har pop3/smtp så kan du jo også bygge din egen webmail oven på det. Det har jeg da set andre steder på nettet.
Avatar billede cesil Nybegynder
13. februar 2003 - 16:29 #3
'pop3.asp
<%
Response.CacheControl = "no-cache"
Response.AddHeader "Pragma", "no-cache"
Response.Expires = -1

Set mailbox = Server.CreateObject("JMail.POP3")
mailbox.connect "mailadresse","password","mail.server.dk"
mailbox.downloadheaders
%>
<html>
<head>
  <title>POP3</title>
</head>
<body>
  <table>
  <tr><td>Subject</td><td>From</td></tr>
  <%
  Set Messages = mailbox.Messages
  For count = 1 to Messages.Count-1
    Set Message = Messages.Item(count)
  %>
  <tr><td><a href="showMessage.asp?UID=<%=mailbox.GetMessageUID(count)%>"><%=message.subject%></a></td><td><a href="mailto:<%=message.from%>"><%If Not message.fromname="" Then response.write message.fromname else response.write message.from%></a></td></tr>
  <%
  Next
  %>
  </table>
</body>
</html>
<%
mailbox.disconnect
Set mailbox = Nothing
%>


'showmessage.asp
<%
Response.CacheControl = "no-cache"
Response.AddHeader "Pragma", "no-cache"
Response.Expires = -1

Set mailbox = Server.CreateObject("JMail.POP3")
mailbox.connect "mailaddresse","password","mail.server.dk"
  For count = 1 to mailbox.Messages.Count-1
        if mailbox.GetMessageUID(count)=Request.QueryString("UID") Then Set Message = mailbox.Messages.Item(count)
  Next
Response.Write Message.BodyText
mailbox.disconnect
Set mailbox = Nothing
%>
Avatar billede pnr Nybegynder
21. februar 2003 - 11:20 #4
Jeg takker for hjælpen
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