#62 Attachment not send

[Anonymous]

This code dosen't work. The attachment is not send.
----- start code ----
Dim ZipAdjuntoFullPath As String = Somefilepath
msg.AddAttachment(ZipAdjuntoFullPath)

Dim pasarelaSmtp As New Smtp(_server, _port)

pasarelaSmtp.SendMail(msg)
--- end code ---

But this code works ok:
----- start code ----
Dim attch As New Attachment(somefilepath)
msg.AddAttachment(attch)

Dim pasarelaSmtp As New Smtp(_server, _port)

pasarelaSmtp.SendMail(msg)
--- end code ---

I don't know how fix this bug