Tracking Forums, Newsgroups, Maling Lists
Home Scripts Tutorials Tracker Forums
 
  HOME    TRACKER    Visual Basic




Outlook - VBA Send Email But Don't Use .send


Hey again,

With the vb6 plugin for outlook, I can create an email with multiple recipients but I need to send an email to each recipient individually but not have it register as a sent item in the Sent Folder each time the email has been sent out. Is there a way to do this?

Any thoughts?

Is there something that I can use that is similar to .SendMail (excell). I am currently not using the MAPI either.




View Complete Forum Thread with Replies

See Related Forum Messages: Follow the Links Below to View Complete Thread
How Do I Send An Email Thru Outlook 98 Whitout Needing To Have Outlook Running?
Does anyone know how to send an email without needing Outlook running?
I have written this code, which works fine when Outlook is running on my machine, but when Outlook is not running I get a MVB error (see attachment mvberror.jpg). When I hit debug it returns me to; Set ObjOutlookMsg = objOutlook.CreateItem(olMailItem). I cant be having this, please help.

CODE:

Dim response
response = MsgBox("Do you want to send a message to Bev telling her you made a copy of " & lstfiles.FileName, vbYesNo, "STOP")
If response = vbYes Then
Dim objOutlook As New Outlook.Application
Dim ObjOutlookMsg As Outlook.MailItem

Set ObjOutlookMsg = objOutlook.CreateItem(olMailItem)
With ObjOutlookMsg
.To = "user@here.com"
.Subject = "test"
.Body = "Bev, " & vbNewLine
.Body = .Body & "I made a copy of drawing number: ** " & lstfiles.FileName
.Body = .Body & " **, from the Bravo folder. " & vbNewLine & vbNewLine
.Body = .Body & "Thanks"
.Send
End With

Set ObjOutlookMsg = Nothing
Set objOutlook = Nothing




Any help would be greatly appreciated,

Thanks in advance,
el guapo

How Send Email Without Outlook
how send email using vb code, without go through Outlook. pls help. thank you.

How To Send Email With Outlook
hi
i have a problem with my program using vb6 to send email. i need to send attachment too, i can't send email using outlook express.
i have tried but email was sent to microsoft outlook.

thanks

How To Send Email Without Using Outlook
Hello Friends,

I want send emails without using outlook. please help me.

Regards,
Vishalgiri Goswami

Send Email Without Using Outlook
Does anyone know of any freeware code about to allow creation and transmission of an email message for receipt by an Exchange/Outlook client, to report when code encounters an error ?

Send Email W/o Outlook
I need my application to be able to send emails automatically and without any input of a user w/o using Outlook. The messages need to be text formatted, not HTML. I would like to use SMTP, but don't know how. I am on a Win2k system. Any help is appreciated. Thanks.

How To Send Email Using Outlook In Vb?
hi,

 i know sending email using mapi control.but i want to send the email using outlook.thanks in adv.

Jayakumar

VB App Send Email, Not Using Outlook
I want the user of my program to click on a command button and it will automatically email information to me. I don't want to depend on the user having Outlook or any other particuliar email program at all. Is there a way to do this?

thanks,

Xeifrank

Life is one big IF/ESLE statement

How To Send An Email Not Using MS Outlook?
I would like to have in my application the funtionality to send emails to the support group. However, the users who are going to use this application are not allow to connect to an email account using MS Outlook, intead they connect through a web interface. This is because they try to minimize users getting viruses. Is there any way to use visual basic and send emails through a different application other than MS Outlook?

thanks,

Send Email Through Outlook
I am new to using the Visual Basic editor in MS Excel. I am trying to compose and send an email through Outlook not Outlook Express. I have solved everything but the last part of actually sending the email. It just stalls out at this point and I manually have to click "send" in Outlook. Thanks for your help in advance. Jeff

Here is my code:

Private Declare Function ShellExecute Lib "shell32.dll" _
    Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, _
    ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, _
    ByVal nShowCmd As Long) As Long

Sub Email()
    Dim Email As String, Subj As String
    Dim Msg As String, URL As String
    For r = 5 To 186 'data in rows 5-186
    
    'Get the Email Address
    Email = Cells(r, 53)
    
        
    'Message subject
    Subj = "ZV October P/(L) for Market Segment " & Cells(r, 9)
    
    
       
    'Compose the Message
    Msg = ""
    Msg = Msg & Cells(r, 7) & "," & vbCrLf & vbCrLf
    Msg = Msg & "Listed below is the October 2003 Cost per Available Seat Mile (CASM) and Operating Profit / (Loss) for market segment " & Cells(r, 9) & "." & vbCrLf & vbCrLf
    Msg = Msg & "CASM: " & Cells(r, 50) & vbCrLf & vbCrLf
    Msg = Msg & "Operating Profit / (Loss): " & Cells(r, 51) & vbCrLf & vbCrLf
        
    'Replace spaces with %20 (hex)
    Subj = Application.WorksheetFunction.Substitute(Subj, " ", "%20")
    Msg = Application.WorksheetFunction.Substitute(Msg, " ", "%20")
    
    'Replace carriage returns with %0D%0A (hex)
    Msg = Application.WorksheetFunction.Substitute(Msg, vbCrLf, "%0D%0A")
    
    'Create the URL
    URL = "mailto:" & Email & "?subject=" & Subj & "&body=" & Msg
    
    'Execute the URL (start the email client)
    ShellExecute 0&, vbNullString, URL, vbNullString, vbNullString, vbNormalFocus
    
    'Wait three seconds before sending keystrokes
    Application.Wait (Now + TimeValue("0:00:04"))
    
        
    Next r
        
    End Sub

How Do I Know Who Send Me Email (outlook)
Hi gurus
How Do i know who has send me email from outlook. I want to know email adress not just an sender's name
I try following but every time I am get blank or null string

    Set myolapp = CreateObject("Outlook.Application")
    Set myNameSpace = myolapp.GetNamespace("MAPI")
    Set per_folder = myNameSpace.Folders("Personal Folders")
    Set inb_folder = per_folder.Folders("Inbox")

        For Each myitem In inb_folder.items
            sender = myitem.ReplyRecipientNames
            MsgBox myitem.subject & " " & sender
            ' This display subject but not sender
        Next


Vipul Patel

Can I Send Email Without Outlook On My PC
HI Guys,

I need your help.
I checked a software in which it ask me to enter my email address and it will send me my password to run the software. when i entered my email and click on send button it send an email to the software owner and i got a reply from them uickly at the email address which i entered to get password.
now i wanna know how it could be possible in VB and it doesnt popup any window i.e. of MAPI or Outlook


plz reply me i m in a great need of this code.


bye thnx in advance

How To Send Email Via Outlook Express
Code:
sub sendmail
Dim o As Outlook.Application
Set o = New Outlook.Application
Dim mi As Outlook.MailItem
Set mi = o.CreateItem(olMailItem)
With mi
.Subject = "Correspondence file from " & CurrOffice
.To = recepient
.Body = Body
.Attachments.Add App.Path & "corresp.exe"
.Send
End With
Set mi = Nothing
Set o = Nothing
end sub

with that code i can send mail but i need to install microsoft outlook.
is anybody knows how to send mail using outlook express
thanks

Send An Email Without Opening MS Outlook
How do I send an email in Access without opening MS Outlook? My code is written in button in a form, first it opens the report then it sends the report.
Ex:
Private Sub create_rmr_Click()
DoCmd.OpenReport "rptrmr", acViewPreview
DoCmd.SendObject acSendReport, "rptrmr", acFormatHTML, "alicew@applerubber.com", , , "RMR Report", "Lot # 1111", False

Then MS Outlook window opens up
“A program is trying to automatically send e_mail on your behalf. Do you wnt to allow this?
If this is unexpected, it may be a virus and you should choose “no”.”

How can I get the report send/email without this message popping up


Thanks!!

::resolved::How To Send An Email Without Outlook
Can anybody plz help me? How can i send e-mail using VB(6.0) but without using outlook at all.

I Want My Project To Use Outlook To Send Email
I want my Project to use Outlook to send email. I am using VB6.0 for a distributed app that will identify and send email to the appropriate people. The addresses and messages will be stored and drawn from an Access 97 db.

I know to reference Outlook in Project -> References but then am not sure how to proceed from there. Any suggestions or redirections would be helpful. Thanks. mm

I Want To Send An Email Using Code Thru Outlook?
I want to create a system where I can email a user. Can I write this in code. Example: the time is 12:00 am. Send Steve and email that says the time is 12:00. I know how to do everything but create and send the email?

Thanks for any help

How To Send Email Form In Outlook
hello everyone
i'm trying to send HTML form in the body of the email.
i have the HTML source in a string and i want to embed that into the body of the mail.
below is the code i used and it displays the html source as it is.
the variable C_form has the HTML source in it.

Private Sub sendMailToContact(email As String, c_form As String)
Dim oOApp As Outlook.Application
Dim oOMail As Outlook.MailItem
Set oOApp = CreateObject("Outlook.Application")
Set oOMail = oOApp.CreateItem(olMailItem)
With oOMail
.To = email
.Subject = "Test Mail"
.Body = c_form
.Send
End With
End Sub
thanks

Send Email Via Outlook Express With VB
Please help me. I am trying to send email using Visual Basic with Outlook Express.
I have used the following code, but only works with Outlook..

Sub Send_via_E()
Dim App As Object
Dim Itm As Object

Set App = CreateObject("Outlook.Application")
Set Itm = App.CreateItem(0)
With Itm
.Subject = "text"
.To = "eg@net.com.au"
.Body = "Please find attached"
.Attachment = "file name"
.Send
End With

End Sub

Can someone please help me with an example of code for Outlook Express.

Levonau

Cannot Send Email Using Outlook Component!
Hi,
I'm working on a VB program which uses a DHTML page to collect a user survey. When the user clicks "Submit" on the survey page, I have code to collect the survey data, create a results file, then email it to a specific recipient.

I'm deploying the application using the VB6 Packaging and Deployment Wizard, and it is linked with the Outlook 9.0 project reference.

This works great, if Outlook is installed on the user's machine. However, if Outlook is not installed, I cannot send the emails, even though the VB-created installer drops a reference to the Outlook object library on the user's PC.

Is this by design, or am I doing something wrong here? The code is posted below.

Thanks in advance
Eric

Dim emailAddr As String, myDate As String, subjLine As String

' format subject line
Dim name As String
name = tbName.Value
' grab the name from the web page.
res = SplitName(name)

myDate = Date
subjLine = "Pilot survey results- " & fName & " " & lName & " - " & myDate
emailAddr = "name@location.com"
Dim olApp As Outlook.Application
Set olApp = CreateObject("Outlook.Application")

Set msg = olApp.CreateItem(olMailItem)
Set myRecipient = msg.Recipients.Add(emailAddr)
Set myAttachments = msg.Attachments
myAttachments.Add "c:surveydata.results", olByValue, 1, "Survey Results"
msg.Subject = subjLine
msg.body = subjLine

'send message
msg.Send

Send Email With OutLook Object
hello all.
when i send email from VB with outlook object, i get a message like "..A program is trying to send email ... do you agree.."
how can i hide all this messages that outlook pop's ?

How Can I Send An Email In VB Without Outlook Express
Does anyone know how to send an email in VB without calling that outlook express code?
Maybe using some API code, Anyone got any ideas? code? tutorials?
My friend made a program that doest use outlook express in c++ and it was very efficiant, Any idea how to do that in c++ either?
He said he made it with API
Thanks,
Bill

How To Auto-send Email Using Outlook Express ??
do any know how to auto-send email using Outlook express ??

here is my problem.

i'm working on a application that will auto-send email to inform the the user when certain condition occur.

is it a possible way to do this ???
please help~!@@ cos this is urgent for me~

Excel: Send Outlook Email With Hyperlink
Hi All,

In Excel Im trying to send an email via Outlook, with a Hyperlink in the body.
Would you be able to complete this code?


Code:
Sub Email()
Dim objOL As New Outlook.Application
Set objOL = New Outlook.Application
Dim s As Object
Dim objMail As MailItem
Set objMail = objOL.CreateItem(olMailItem)
With objMail
Application.ScreenUpdating = False
.To = "vyeung@indigo.ca"
.Subject = "Top 25"
.Body = "Hi Everyone," & vbCrLf & _
"Here is a link to the file"
.Display
End With
Set objMail = Nothing
Set objOL = Nothing
End Sub
Im not sure about the syntax on how to fit this code in for the hyperlink.


Code:
.Hyperlinks.Add Anchor:=Selection, Address:= "C:FILENAME.xls", TextToDisplay:="CLICK ME"

Send Email To Outlook Distribution List Using VB
Hi everyone,
i am new here and my first post. i'd like to send email from excel using vbcript. how i code it so that the email are sent to the distribution list in my outlook 2003 contacts. below is the codes for sending mail to indivual email addresses. Any help would be appriciated:

Code:

Code:
Sub Sendmail()
Dim objOutlook As Object
Dim objOutlookMsg As Object
Set objOutlook = CreateObject("Outlook.Application")
Set objOutlookMsg = objOutlook.CreateItem(0)
With objOutlookMsg
.To = "name@email.com"
.Cc = "name@email.com"
.Subject = "Hello World (one more time)..."
.Body = "This is the body of message"
.HTMLBody = "HTML version of message"
.Attachments.Add ("f:Test.txt")
.Send 'Let´s go!
End With
Set objOutlookMsg = Nothing
Set objOutlook = Nothing
End Sub
Edit by Moderator: Welcome. Please use vb tags when posting code, it makes it much easier to read. Tags are [ vb ] and [ /vb ] without the spaces
Thanks
Bulleye

Send Email Attachment In Outlook Express
Hello,

I am trying to send an email using outlook express. This part works fine, but I am having problems attaching a log file (or multiple files) to send as well.

The code so far is:

Code:
Public Sub Send_Log_Files(sDate As String, sSendfiles As String)

Dim objMsg As Object

Set objMsg = CreateObject("CDO.Message")
objMsg.From = "IRLS Log Files"
objMsg.To = "email@hotmail.com"
objMsg.Subject = "IRLS Log files for " & sDate
objMsg.TextBody = "Please find attached the IRLS log files for " & sDate
With objMsg.attachments
.Add
.name = "c:log1.log"
.ReadFromFile "c:log1.log"
End With
objMsg.Update
objMsg.send
Set objMsg = Nothing

End Sub

I need to be able to send multiple attachments as well.

Thanks in advance!

How To Send An Email, Using The Settings In Outlook Express?
Anyone know how to send a email with VB though outlook express?

Send Email Via Outlook With Different Reply Address
In Outlook 2000 you can change the reply email address when sending email - I am trying to create a VB mail forwarding app. Can I change the reply to : email address when sending emails from VB via Outlook/Exchange?

Thanks in advance.


C:O)

Compiler Error On Send Email With Outlook
Hello,
I am getting "user-defined type not defined" from the compiler. What and where do I have to do in order for me to get rid of the error on this command :
Dim olApp As Outlook.Application

thanks

Sherry

HOW TO COPY EMAIL IN OUTLOOK FROM DRAFT AND SEND IT
In the topics there is how to send email thru vb.
I wood like to have an custom made email with HTML format sending.

One of two options.
1. How to set the HTML including INSERTING PICTURES inside the message (Not Attachment).
2. How to send Email from the DRAFT Folder of the outlook.



Edited by - isaac789 on 8/5/2004 11:50:40 AM

Question (How To Send Email Via Outlook Express)
Visual Basic 5.00 + Windows 98

How can I send de text included is a list box direct to a messagem and sent it via outlook express ?





Edited by - DaVBMan on 1/24/2004 3:32:18 PM

I Got A Message Every Time I Want To Send An Email With Outlook
hi,

I am using outlook object in my code to send an email. but every time it comes to Send command. it gives this message:

A program is trying to automatically send email on your behalf. Do you want to allow this? if this is unexpected it maybe a virus and you should choose no

then I choose yes and then the message is send. how can I remove this message so every time the code wants to send a mail does not have to Ok this message.


thanks for any help in advance.
roseta.

Send An Email Via A Specfic Account In MS Outlook
How do you send an email in outlook 2002 via a specific email account?
How do you programmatically create a Email Account in MS Outlook?



Edited by - kolo83 on 3/7/2003 1:07:20 PM

Send Email With Outlook With Automatic Login
How can I send an email with Outlook via Visual Basic automaticaly without the Outlook asks for the password?

Send And Receive Email Using Ms-Access And Outlook
Hai, Am Tamilvanan. Am a New to Access.

In my Access Application i need to Send and Receive Email with Attachment. But i have the Problem in Attachment.

I need the attachment function is work as follows. Need one Browse Button. If we click that Browse Button, the file open Dialog Box will be open, then we select a particular file and click open.

Then the selected file path will be stored into a textbox. I know the Common Dialog Control was do this. But when i go to my Access Form Design view and try to put the Common Dialog Control the following Error Message will be raised.

you don't have the license required to use this ActiveX control.
You tried to open a form containing an OLE object or an ActiveX control or you tried to create an ActiveX control. To obtain the appropriate license, contact the company that provides the licensed OLE object or ActiveX control.

Then i try to Register the Control, like comcat.dll, comctl32.dll, comdlg32.dll, COMDLG32.OCX.

The COMDLG32.OCX only was Registered Successfully. But i have the another problem.

The error is:


c:windowssystem32comctl32.dll was loaded, but the DllRegisterServer entry point was not found.

This file can not be registered.

So, still i am stuck. Pls help me. How to put the Common Dialog Control into my Ms-Access Form.


Am using the Code for Send Email as follows:
Private Sub Command20_Click()

Dim mess_body As String
Dim appOutLook As Outlook.Application
Dim MailOutLook As Outlook.MailItem
Set appOutLook = CreateObject("Outlook.Application")
Set MailOutLook = appOutLook.CreateItem(olMailItem)

Set appOutLook = CreateObject("Outlook.Application")
Set MailOutLook = appOutLook.CreateItem(olMailItem)
With MailOutLook
.BodyFormat = olFormatRichText
.to = Me.Email_Address
.cc = Me.Cc_Address
.bcc = Me.Bcc_Address
.Subject = Me.Mess_Subject
.HTMLBody = Me.mess_text
If Left(Me.Mail_Attachment_Path, 1) <> "<" Then
.Attachments.Add (Me.Mail_Attachment_Path)
End If
'.DeleteAfterSubmit = True 'This would let Outlook send th note without storing it in your sent bin
.send
End With
'MsgBox MailOutLook.Body
Exit Sub
email_error:
MsgBox "An error was encountered." & vbCrLf & "The error message is: " & Err.Description
Resume Error_out
Error_out:
End Sub

and also i need to do the another Task, Receive Email using Ms-Access and Outlook.

The Receive Email will be work as.

On the receiving end, the user receives the email at the Outlook. When they opens the Email, the message box should have a button called "Save to Access".

When this button is pressed, a dialog box should pop up where the user can choose a contact name and a job name and click on SAVE

Here contact name and job name are in the access table fields. We go to select any one contact and any one job for the particular Email. Then the Email details are stored into a Access table.


Am Trying to solve this using many of Forum's. But still i can't. So if u know how to solve the above problems and also how to Receive Email using Ms-Access and Outlook, Please intimate me.

I am waiting for your Reply.



Thanks & Regards

Tamilvanan

Send Email Through Outlook Express To Yahoo Webmail
hi all, it is possible to send email through outlook express to yahoo webmail accounts/ hotmail accounts? How to configure outlook express to do that?? i need help on dat... thx..

Detecting Outlook Closing And Auto Send Email
Hi all,I have a program that i need to send an email automatically. At the moment i can call up outlook and the user has to literally press 'send' to send the message. Is there a way i can do this automatically or can i send a an alt and 's' keypress, so that it sends striaght away?

Also if the user exits out of the mail message is there a way i detect if the mail message has been closed,i.e if the click the cross?Ive been tring to get round thgis for ages and im not getting anywhere.. Thanks in advance...Davie


Code:
Function sendMail()
On Error GoTo Err_Email
If MAPISession1.NewSession Then
MsgBox "Session already established"
End If
With MAPIMessages1
MAPISession1.DownLoadMail = False
MAPISession1.SignOn ' Signon method.
.SessionID = MAPISession1.SessionID
.Compose
.MsgSubject = "Hello world"
.RecipAddress = "someone@Email.com"
.ResolveName
.MsgNoteText = "hello world test"
.Send True
MAPISession1.SignOff
End With
Exit Function

Outlook 2002 - Choice Of Email Address To Send FROM
I am using Outlook 2002 which has a Microsoft patch that pops up a message box whenever you try to send an Email by using a VB program to control it. I have overcome this by using the Redemption COM.

http://www.dimastr.com/redemption/

BUT does anybody know how to choose the Email address I send from ( I have several different Email addresses set up ) whether using Redemption or by straightforward Outlook?

Many thanks

Bob

PS IS this forum screwed up? I have twice posted a reply to an earlier thread which has come up and then disappeared ( ie my reply has gone - but when I search against my user name the thread comes up )

Send Email From Within Excel 2000 Using Outlook Express 6
I have a need to mail an Excel spreadsheet from within excel using outlook express 6.0.

I am downloading the data from an As/400, and now need to email it in an excel spreadsheet format using outlook express 6.0.

Can anyone point me in the right direction.

Thank you.

Nick

Sending Email Via Outlook (emptying Send Queue)
Hello to you all...

You all know you can send an email in VB6 using code like the following:

VB Code:
Public Sub SendEmail()    ' Comments  :    ' Parameters:    ' Modified  :    '    ' --------------------------------------------------    On Error GoTo PROC_ERR    Dim intI        As Integer    Dim Ol          As New Outlook.Application    Dim Olmail      As MailItem    Me.MousePointer = vbHourglass    Set Ol = New Outlook.Application    Set Olmail = Ol.CreateItem(olMailItem)    With Olmail        .To = "WhatEver@mail.com"        .CC = "anemailaddress@email.com"        .ReadReceiptRequested = True        .Subject = "Some subject line"        .Body = RichText1.text        .Send    End With    Set Olmail = Nothing    Ol.Quit    Set Ol = Nothing    Me.MousePointer = vbNormalPROC_EXIT:    Exit SubPROC_ERR:    MsgBox Err.Number & " " & Err.Description    Resume NextEnd Sub

This is working without a glitch when Outlook is already open. When it's not, I'm having a little problem. If I send 2 messages using this Sub, the first one will be sent and the second one will remain in the "Send Box" until another message comes in and kick it out or I open Outlook manually and click on "Send/Receive" button. How can I prevent that from happening ?

TIA for any replies that might help...

Outlook Won't Send Email With Out Being Opened... Here Is My Code. PLEASE HELP URGENT &gt;&gt;
What do I have to do tell outlook to send the email with being opened by the user? I am simply trying to send some backup files to an email address when the program is closed.... thanks...

Justin

Dim myEmail As Object
    Dim myEmailNS As Object
    Dim myEmailMessage As Object
    Set myEmail = CreateObject("Outlook.Application")
    Set myEmailNS = myEmail.GetNamespace("MAPI")
         
      
    Set myEmailMessage = myEmail.CreateItem(0)
    myEmailMessage.To = "letstalkwireless@cox.net"
    myEmailMessage.Subject = "BACKUP PROGRAM FILES"
    myEmailMessage.Body = "ATTACHED"
    myEmailMessage.Attachments.Add "C:1.txt"
     
    myEmailMessage.Send
    myEmail.Quit
      
    
      
    Set myEmail = Nothing
    Set myEmailNS = Nothing
    Set myEmailMessage = Nothing

Send Email From VB To Outlook - How To Code - Address A Copy To ...
Hi - here I post a new question

I'm now able to export a dokument out of VB to outlook.

On my VB form there is a field to enter a complete email address "copy to: ......".

Question: What is the RDC command to copy a recipient ?

Report.ExportOptions.MailCcList = "Lupo Mai" does not work - I suppose, the given name(s)
must be stored in "Outlook - Contacs" ???

Who can easely answer this question ?

Thanks - Lupo Mai - Germany

Send A Email (with Optional Attachment) To Everybody In Outlook Address Book
Hi im trying to program an app for my office to simpilize sending emails to everybody in our address book (with optional attachment) to everybody in outlook address book.
Ive looked around for source code but cant find any thing that works.

(Note: I know you can do it in Outlook but not everybody in our office is bight )

Any source code or links would be great.

Thanks

How To Make Lable Of Address And How To Connect Vb To Outlook For Send Email
hi all
i m making a address book software but problem occuring
after searching any person i want want to make a label as a address it save in my database as address,city,pincode
next i want to send email to all person using outlook
when i click on selected email they all come back in out look
how it is possible..........
help me.....
thanks..........

How To DISABLE/avoid The Outlook Warning Message When I Try To Send Email Via VB?
I wrote a function to send email with attachment. that codes work fines. But there is a annoying problem. everytime i try to run the function to send out email, the outlook popup a windows " A program is tryin to access email address you have stored in out. Do you want to allow this" AND another windows " A program is trying to access email address you have stored in outlook"
How do I resolve this problem? Thanks for help !

the following is the codes
-------------


 Dim mFolder As outlook.MAPIFolder
    Dim mItem As outlook.MailItem
    Dim pRecip As Recipient
    Dim pAttachments As Attachments
    Dim mailHeader As String
    Dim mailBody As String
    Dim mailFooter As String
    Dim mailAddress As String
    
    
    rptDanAlert.Show
    rptDanAlert.ExportReport rptKeyUnicodeHTML_UTF8, "c:gsn
eportalert", True, False, rptRangeAllPages
    
    mailAddress = "me@yahoo.com"
    mailHeader = "The enclosed attachment is Danger Level Alert Report. " & vbCrLf
    'to send the report using email
    Set mOutlookApp = CreateObject("outlook.Application")
    Set mItem = mOutlookApp.CreateItem(olMailItem)
    Set pRecip = mItem.Recipients.Add(mailAddress)
    Set pAttachments = mItem.Attachments
    mItem.Subject = " Stock Level Alert Email"
    pAttachments.Add "C:GSN
eportalert.htm", olByValue
    mItem.Body = mItem.Body & mailHeader
    mItem.Send

Launch Outlook&#039;s Send Msg Dialog, But No Send
Thank you Lafor & HeSaidJoe for helping me out on my last Outlook question. Here's another one for you or any one of you children out there...

Without using an API call (anyone know if we're privy to one?) how can you get the Send-to dialog displayed so the user can have control to edit/send/save/cancel?

Automate A Email Send By Dropping An Email Into A Specific Folder
Microsoft Outlook 2000 is the application I wish to try and complete the task in.

I want to be able to drop an email from a general folder into a folder e.g "Allowed" or "Blocked" and it sends an email to the recipent or sender of the email saying that the email was blocked or allowed, depending on which folder it was dropped into respectivly.

I have no idea were to start.

Send The Contents Of A Text Box (via Email) To An Email Address
I want to send the words of text1 to my email address using 1 command button.
Please explain step by step how to do this. As i have no idea.

Thanks

Open Default Email Program To Send Email
I have searched the forum for code to open the default email program so I can send an email but with no luck. Can anyone help me out?

Thanks.
Lintz.

Copyright © 2005-08 www.BigResource.com, All rights reserved