Vedhæfte fil i Notes automatisk

Jeg kan få VB-scipt til at oprette
et Notes-mail ved hjælp af 

Set oSess = CreateObject("Notes.NotesSession")
    Set oDB = oSess.GETDATABASE("", "")
    Call oDB.OPENMAIL
    Set oDoc = oDB.CREATEDOCUMENT
    Set oItem = oDoc.CREATERICHTEXTITEM("BODY")
    oDoc.Form = "Memo"
    oDoc.Subject = "Blå mappe"
    oDoc.sendto = "nrs"
    oDoc.Body = txt
    oDoc.postdate = Date
    oDoc.SEND False
Call odoc.save (True, False)
    Set oSess = Nothing
    Set oDB = Nothing
    Set oDoc = Nothing
    Set oItem = Nothing
    oDoc.visable = True

men jeg mangler teknikken til at vedhæfte en fil til mailen.