Set Coll = DB.unprocessedDocuments
Set doc = Coll.getfirstDocument
while Note Doc is Nothing
If Doc.Status(0) = 0 then
set MailDoc = db.CreateDocument
MailDoc.SendTo = doc.MailEmpfängeradresse
Maildoc.Subject = "Der Status ist jetzt NULL"
Set DummyItem = MailDoc.CreateRichTextItem( "Body" )
call DummyItem.appendDoclink(Doc,"Hier kommt der link")
call MailDoc.Save(true,false)
call MailDoc.send(false)
End If
Set Doc = Coll.getNextDocument(Doc)
Wend
Das ganze sollest du noch etwas auskleiden, oder kennst du dich mit Script garnicht aus?