[eWreck]

how do you do mailto and send within a macro?
receiver, subject and body would all be static.

Thanks in advance,
Eric

[Rollin_Again]

Which email client are you using?


Rollin

[eWreck]

Outlook Express

[Rollin_Again]

Here is one way using CDO:

    Public Sub CDOMail()
    
    Dim iMsg As Object
    Dim iConf As Object
    Set iMsg = CreateObject("CDO.Message")
    Set iConf = CreateObject("CDO.Configuration")
 
    With iMsg
        Set .Configuration = iConf
        .To = "eWreck@techguy.com"
        .CC = ""
        .BCC = ""
        .From = """John Doe"" <JohnDoe@hotmail.com>"
        .Subject = "This is a test"
        .TextBody = "This is the body text"
        .AddAttachment "C:/YourAttachment.txt"
        .send
        End With
    
    End Sub

Rollin

[eWreck]

That Works Perfectly Thanks

Eric

[Rollin_Again]

Glad to help out! Mark this thread as solved


Rollin

[eWreck]

Sorry for the noob Question
but how?

[Rollin_Again]

There should be a link under Thread Tools near the top of the first post.

Rollin