I have a question about the Microsoft Outlook 9.0 Object Library. My boss just came up to me and asked me to change my code. Here is my code :

VB Code:
  1. '**************** Sets up and Sends Email to AOPS ******************
  2.         'This will send an email to everyone in the department with the
  3.         'appropriate information.
  4.        
  5.         'Create Outlook object variable
  6.         Dim objOutlook As Object
  7.        
  8.         'Assign Outlook.Application to object variable
  9.         Set objOutlook = CreateObject("Outlook.Application")
  10.        
  11.         'Set objOutlook = GetObject(, "Outlook.Application")
  12.        
  13.         With objOutlook.CreateItem(olMailItem)
  14.             'To: Field of the Email
  15.             .Recipients.Add "[email protected]"
  16.            
  17.             'Subject: Field of the Email
  18.             .Subject = strIssue & ", " & strAlert & ", " & strServer
  19.            
  20.             'Body of the Email
  21.             .Body = strDateTimeStamp & ", " & "Response number: " & strResponse _
  22.                 & Chr$(13) & Chr$(13) & "Comments: " & strComments
  23.            
  24.            
  25.             'Copy message to Outlook Outbox with Send
  26.             .Send
  27.         End With
  28.        
  29.         'Quits Outlook
  30.         'objOutlook.Quit
  31.        
  32.         'Release object variable
  33.         Set objOutlook = Nothing
  34.         '********************************************************************

My question is, is there a way for me to change this so that instead of it automatically sending the email, it brings up the email in outlook, so that the person can make changes to it before it's sent? The only thing that really needs to be changed is in case they need to add another email address. But how can i do this? Thanks.

Eric Garrison
Automated Operations
Union Planters Bank