To Michael B. Help

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Michael, sorry but I coun't made work the code you send me the 24th, It is to
complex and I'm not that expert in VB. Do you have an easier idea so I can
get in VB all the context in a folder and send them by mail. The trigger
bottom is in an acces menu, that is where I have to place the code. Please,
help me to find out the answer becouse I have expended two weeks looking for
it. Thanks a lot.

the code i have know is this
Sub Mail_workbooks_Outlook()
Dim OutApp As Object
Dim OutMail As Object
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)
With OutMail
.To = "(e-mail address removed)"
.CC = "(e-mail address removed)"
.BCC = "(e-mail address removed)"
.Subject = "Trasnmision"
.Body = "Adjunto envío de datos de NOTAS "
'.Attachments.Add ("Z:\ViaEx\*.*")
.display 'or use .Display
End With
Set OutMail = Nothing
Set OutApp = Nothing
End Sub
 
Hi Maria,

sorry, but I haven´t sent you anything. I just gave you the hint at the
Scripting Runtime and the FileSystemObject.GetFolder method.

Please show me what you have so far, regarding to the GetFolder method,
then I´ll know better where the problem is.
 
Back
Top