Visual Basic - URGENTE: Enviar archivos por e-mail

En un programa quiero enviar todos los archivosque hay en un directorio con la extensión .dup en un solo e-mail y no me funciona poniendo *.dup Tengo el siguiente código :

Set myOLItem = myOLApp.CreateItem(olMailItem)
With myOLItem
.To = "[email protected]"
.Subject = "Ficheros DUP"
.Body = "Adjuntamos ficherosDUP"
End With

myOLItem.Attachments.Add ("\\Esvwnapac88895\FMMOVI\*.dup")

myOLItem.Send

Alguien me puede ayudar?

solucion a tu problema
mediante un ciclo k recorra el folder vas agregando el archivo de uno por uno
myOLItem.Attachments.Add ("\\Esvwnapac88895\FMMOVI\archivo.dup")
--------------------
si no te sirve, puedes enviar el correo mediante una conexion winsock a un servidor:25