Outlook Redemption

gselliott

Registered User.
Local time
Today, 10:09
Joined
May 17, 2002
Messages
106
Help! Outlook Redemption

I have got a helpdesk database that emails tasks via Outlook (2000), using Citrix. This has been working fine until we installed the latest office service pack and then we got all of the security messages from Outlook when trying to send the email.

I know that we can use Outlook Redemption and we have installed this onto our server but i'm not sure how I tie this in with my Database, I have read a few of the other posts about this but i'm getting a bit lost can anyone help?

here is the code I am using at the moment to send the Task from my Database:

Code:
Private Sub CmdSend_Click()
    On Error GoTo Err_Handler

    Dim NameSpace As Object
    Dim EmailSend As TaskItem 'for the task item add outlook reference
    Dim EmailApp As Object

    stCallNo = [RefNo]
    stUser = [User]

    Set EmailApp = CreateObject("Outlook.Application") 'Outlook object
    Set NameSpace = EmailApp.getNameSpace("MAPI")
    Set EmailSend = EmailApp.CreateItem(3) ' CreateItem(3) Task Item

    EmailSend.Subject = "Call"

    EmailSend.Body = "Message goes here"
    EmailSend.DueDate = [FixByDate]
    EmailSend.Recipients.Add Me![Engineer]
    EmailSend.Assign 'to the recipient

    Exit Sub

Err_Handler:
    MsgBox Err.Description

End Sub
 
Last edited by a moderator:
I have managed to get this working with a standard email message but I still can't get it to work with a Task properly. It will send the Task but it will just not assign it to the recipient.

Anyone any ideas as I am going round and round in circles now!

Any help would be most appreciated!
 
gelliott, i 'd like to ask u something.
if you have an access db on a citrix server, and the application has to send emails via outlook. Should i install outlook on citrix? can users use their own outlook installed in their computers?

thx, max.
 

Users who are viewing this thread

Back
Top Bottom