Visual Basic - envio mail

alguien me podria enviar algun ejemplo de como puedo enviar un mail con archivos adjuntos en una aplicacion vb, que salgan desde el servidor de correos de la empresa y a cualquier destinatario?, he buscado pero ninguno de los ejemplos que he encontrado me ha servido.. (incluso uno que esta en esta página en la seccion de cidigo fuente), les agradezco la ayuda

Has probado con el Mapi?? aqui un ejemplo que utilizo:

smailito = InputBox(g_Msgbox_Email_Adress, g_pNombreSistema)
If smailito = "" Then
GoTo xx
End If

MAPISession1.SignOn
MAPIMessages1.SessionID = MAPISession1.SessionID

MAPIMessages1.Fetch

MAPIMessages1.MsgIndex = -1
MAPIMessages1.RecipAddress = smailito
MAPIMessages1.MsgSubject = UCase(Me.Caption)
MAPIMessages1.MsgNoteText = " "

MAPIMessages1.AttachmentIndex = 0
MAPIMessages1.AttachmentName = file
MAPIMessages1.AttachmentPathName = ruta
MAPIMessages1.AttachmentPosition = 0
MAPIMessages1.AttachmentType = 0

MAPIMessages1.AddressResolveUI = False
MAPIMessages1.AddressResolveUI = True
MAPIMessages1.AddressResolveUI = False
MAPIMessages1.ResolveName
MAPIMessages1.Send False
MAPISession1.SignOff

Donde AttachmentName contiene el nombre de mi archivo adjunto.

gracias por la respuesta... me podrias enviar algun ejemplo (programa) donde pueda ver como funciona el MAPI?.. gracias

Algo mas quieres???????????

si a tu hermana jojojo