Søg
Avatar billede Slettet bruger
22. juli 2003 - 15:15 Der er 3 kommentarer og
1 løsning

Chekke om email findes..

Hej hvordan kan jeg lave så jeg chekke om emails findes? Mit webhotel understøtter ASPmail, ASPemail, Jmail, ASPsmartupload, ASPhttp, ASPping, W3 sockets, Guid maker og Wait for.

Hilsen Kaspar
Avatar billede larsen Nybegynder
22. juli 2003 - 16:26 #1
Kan du ikke bare checke om domænet findes ?
Jeg mener, dog uden at være helt sikker, at ASPHttp kan gøre det
Avatar billede soes Nybegynder
22. juli 2003 - 19:59 #2
Det kommer vel lidt an paa hvad du mener med findes. Hvis du mener om den findes paa email serveren er jeg temmelig sikker paa at der er en funktion i JMail som burde klare den opgave for dig.

Dette eksempel fra www.duplo.se (Jmail hjemmesiden) henter den foerste email ud fra en inbox saa det brude vaere muligt at rode lidt vidre med scriptet. Synes at du skal tage et smut forbi deres hjemmeside og se lidt paa dokumentationen bag JMail

This example pops the first email in a given POP3 mailbox and displays it on the webpage together with it's attachments, which in turn are saved to the servers disc.The use of this example is of course limited, however, it shows how you easily can connect to a POP3 server and retrieve emails from a mailbox and also handles attachments in a clever manner.


  POP3simple.asp

<% @LANGUAGE=VBSCRIPT %>
<%

Set pop3 = Server.CreateObject( "JMail.POP3" )

pop3.Connect "username", "password", "mail.mydomain.com"

Response.Write( "You have " & pop3.count & " emails in your mailbox!<br><br>" )

if pop3.count > 0 then
Set msg = pop3.Messages.item(1)

' Note the first element of this array is 1
' since the POP3 server starts counting at 1
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)
  at.SaveToFile( "c:\attachments\" & at.Name )
  getAttachments = getAttachments & "<a href=""/attachments/" &_
  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><pre><%= msg.Body %></pre></td>
</tr>
</TABLE>
</body>
</html>
<%

end if

pop3.Disconnect

%>
Avatar billede larsen Nybegynder
23. juli 2003 - 10:24 #3
Efter de elementer du nævner der, kunne jeg tro at du var hos Cliche, for deres version af JMail er Freeware og indeholder bla. ikke POP3
Avatar billede Slettet bruger
26. juli 2003 - 22:20 #4
Lukker!
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
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP 10 25/06/202622:20 04/09/202602:30
Tjek alle checkbox i form Af bsn i ASP 4 18/05/202601:57 19/05/202613:33
Lost focus Af bsn i ASP 1 07/11/202415:34 01/01/202514:58
ASP classic Af bsn i ASP 8 28/10/202423:11 30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP 5 23/05/202409:56 24/05/202400:02
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I dag 14:10 Komme ind på : YouSeeMusic" Af Ikke-ekspert i Musik & videoafspillere
I dag 13:27 Send/modtag i Outlook 2024 Af ErikHg i E-mail programmer
10/0915:34 Installer alarmlyd på Samsung Galaxy XCover 7 Pro Af ErikHg i Mobiltelefoner
08/0913:06 Kan ikke starte min pc Af Malm i PC
07/0919:20 DVD program Af dcedata1977 i Andet software
White papers
Flere white papers »