hi all,

currently i am creating a macro in Excel 2003 which will create an
Outlook Task which is assigned and send to the recipient. the issue is
that Outlook 2003 displays a dialog box asking if this access is
allowed. my question is it at all possible to have this dialog box
either suppressed or have it automatically acknowledged by line of
code.

the code so far:
Sub CreateTask()

Dim olApp As Outlook.Application
Dim olTsk As TaskItem
Dim objRecipient As Outlook.Recipient

Set olApp = New Outlook.Application
Set olTsk = olApp.CreateItem(olTaskItem)

With olTsk
.Assign
Set objRecipient = ")
.Subject = "Test Task1"
'.Status = olTaskInProgress
.Importance = olImportanceHigh
.DueDate = DateValue("06/26/03")
.TotalWork = 40
.ActualWork = 20
.Save
.Send
End With

Set olTsk = Nothing
Set olApp = Nothing

End Sub

any help is mostly appreciated - cheers....


.....jurgenC!

Hi
This cannot be got around within VBA I think. The virus risk is to
great to allow outlook items to be sent without verification. I think
it can be done using a library that is not part of the standard
Outlook installation. I forget what that is called though - try the
Outlook group

microsoft.public.outlook.program_VBA

in Google and search on "sending email without warning messages" or
some such.

regards
Paul


(jC!) wrote in message . com...
hi all,

currently i am creating a macro in Excel 2003 which will create an
Outlook Task which is assigned and send to the recipient. the issue is
that Outlook 2003 displays a dialog box asking if this access is
allowed. my question is it at all possible to have this dialog box
either suppressed or have it automatically acknowledged by line of
code.

the code so far:
Sub CreateTask()

Dim olApp As Outlook.Application
Dim olTsk As TaskItem
Dim objRecipient As Outlook.Recipient

Set olApp = New Outlook.Application
Set olTsk = olApp.CreateItem(olTaskItem)

With olTsk
.Assign
Set objRecipient = ")
.Subject = "Test Task1"
'.Status = olTaskInProgress
.Importance = olImportanceHigh
.DueDate = DateValue("06/26/03")
.TotalWork = 40
.ActualWork = 20
.Save
.Send
End With

Set olTsk = Nothing
Set olApp = Nothing

End Sub

any help is mostly appreciated - cheers....


....jurgenC!

wrote ...

currently i am creating a macro in Excel 2003 which will create an
Outlook Task which is assigned and send to the recipient. the issue is
that Outlook 2003 displays a dialog box asking if this access is
allowed. my question is it at all possible to have this dialog box
either suppressed or have it automatically acknowledged by line of
code.

Every time I get on a flight, someone say things like, 'In the
unlikely event of a sudden drop in cabin pressure, an oxygen mask will
drop from the overhead compartment. Pull the mask firmly towards you
to release the flow of oxygen etc etc'

My question is, is it at all possible to have this important safety
announcement either suppressed or have it automatically acknowledged
that we've heard it all before?

--

Ron de Bruin
http://www.rondebruin.nl/sendmail.htm
http://msdn.microsoft.com/library/en...odc_xlmail.asp

Ron has sample code for using CDO to send mail. This apparently avoids the
security message. It doesn't use Outlook.

--
Regards,
Tom Ogilvy


"jC!" wrote in message
om...
hi all,

currently i am creating a macro in Excel 2003 which will create an
Outlook Task which is assigned and send to the recipient. the issue is
that Outlook 2003 displays a dialog box asking if this access is
allowed. my question is it at all possible to have this dialog box
either suppressed or have it automatically acknowledged by line of
code.

the code so far:
Sub CreateTask()

Dim olApp As Outlook.Application
Dim olTsk As TaskItem
Dim objRecipient As Outlook.Recipient

Set olApp = New Outlook.Application
Set olTsk = olApp.CreateItem(olTaskItem)

With olTsk
.Assign
Set objRecipient = ")
.Subject = "Test Task1"
'.Status = olTaskInProgress
.Importance = olImportanceHigh
.DueDate = DateValue("06/26/03")
.TotalWork = 40
.ActualWork = 20
.Save
.Send
End With

Set olTsk = Nothing
Set olApp = Nothing

End Sub

any help is mostly appreciated - cheers....


....jurgenC!

<smirk fair point (if you are the passenger of that flight), however
as you are the pilot this same procedure does not apply!

....thanks for pointing me in the right direction!

regards...

....jC!

anyone who is interested here is a related link:
http://groups.google.com/groups?hl=e...T K2MSFTNGP11