ich habe abgerufene emails in eine datenbank gespeichert. wichtig ist, dass
ich ihre unic IDs von der mailbox mitspeichere.
wenn ich diese mails nun l�sche, schaut mein delete-script auf der mailbox
nach, ob sich dort noch mails mit der ids befinden
und l�scht diese gegebenenfalls auch von der mailbox.
damit sind die mails sowohl in der datenbank als auch auf dem mailserver
einf�rallemal gel�scht.

folgendes script soll dies realisieren (bekommt ein array aus den mailIDs
mitgeliefert):

**********************************************************************
set pop3 = Server.CreateObject( "JMail.POP3" )
pop3.Connect Session("mailAdresse"), Session("passwort"),
Session("mailServer")

ID = Split(Request("ID"),", ")
for j = 0 to Ubound(ID)
idMail = ID(j)

 sql = "DELETE * FROM mails WHERE id ='"&idMail&"' AND user ='"&user&"'"
 conn.Execute(sql)

 sql = "DELETE * FROM mailIDs WHERE mailID ='"&idMail&"' AND user
='"&user&"'"
 conn.Execute(sql)

 sql = "SELECT * FROM attachments WHERE id ='"&idMail&"' AND user
='"&user&"'"
 set RSATTACH = conn.Execute(sql)

 if (NOT RSATTACH.EOF) then
  newPfad = Session("Pfad") & idMail
    Datei.DeleteFolder ( newPfad )
 end if

 RSATTACH.close

 sql = "DELETE * FROM attachments WHERE id ='"&idMail&"' AND user
='"&user&"'"
 conn.Execute(sql)

 if (pop3.count > 0) then

  loopcontrol = 1
  allMessages=pop3.Count
  do while(loopcontrol <= allMessages)
   idDerMail = pop3.GetMessageUID(loopcontrol)
   if(idDerMail = idMail) then
    mailToKill = loopcontrol
    response.write("L�sche Mail mit ID "&mailToKill&"<br>")
    pop3.DeleteSingleMessage(mailToKill)
   end if
   loopcontrol = loopcontrol+1

  loop

 end if
 next
pop3.Disconnect
 set pop3 = nothing
**********************************************************************

der fehler ist nun, dass er die ersten zwei mails l�scht und dann irgendwann
einen fehler bringt, dass die
mail mit der id nicht existiert ... aber rein logisch sollte das doch gehen
oder steh ich irgendwie auf dem
schlauch???


| [aspdecoffeehouse] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdecoffeehouse/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdecoffeehouse.asp

Antwort per Email an