ASPEmail / vedhæftet fil kommer ikke med

Hej!

Jeg har nedenstående kode, som sender en e-mail og også gerne skulle vedhæfte en fil. Mailen sendes og modtages, men det gør den vedhæftede fil ikke. Filen er til stede i den samme folder som koden.

Jeg har prøvet at skrive "strPath = "d:\inetpub\wwwroot\www.firma-navn.com\docs\maillist\"
men det flytter ikke noget.

Hjælp!

-- start kode --

    Do While Not RS.eof
        Set mailObj = Server.CreateObject("Persits.MailSender")
        mailObj.Host = RSBODY("SMTP")
        mailObj.From = RSBODY("From_Email")
        mailObj.AddAddress RS("Email")
        mailObj.Subject = Request("Subject")
        mailObj.Body = Request("Body")
        ' Attachment start
        strPath = Server.MapPath(".")
          mailObj.AddAttachment strPath & "Test-dokument.txt"

        If (Request("Format") = "Text") Then
            mailObj.IsHTML = False
        Else
            mailObj.IsHTML = True
        End If
        mailObj.Send
        RS.movenext
    Loop

-- slut kode --