I have an application that I coded to programmatically send emails using
Redemption, on a machine running Outlook 2002. It has been replaced, and the
machine is using Outlook 2003. I installed Redemption as per instructions,
even used regsrvr on it, yet keep getting a "Library Not Registered" error.
Here's the snippet of code before the error:

Dim rMail As Object
Dim rContact As Object
Dim oItem As Object
Dim NS As Object
Dim Sync As Object
Dim Utils As Object
Dim oSent As Object
Dim oSentFolder As Object
Dim Prop As Outlook.UserProperty
'CREATE MAIL ITEM ITEM
Set rMail = New Redemption.SafeMailItem
Set oItem = myApp.CreateItem(olMailItem)

It errors at the Set oItem = myApp.CreateItem(olMailItem) line. Reference
to MSOutlook 11 Object Library is checked, as well as to teh Redemption
Object Library.

Does anyone have any insight, as this has become a major issue.

Thank you

That's not a Redemption error. I don't see any statement to instantiate myApp as an Outlook.Application object.

--
Sue Mosher, Outlook MVP
Author of Microsoft Outlook 2007 Programming:
Jumpstart for Power Users and Administrators
http://www.outlookcode.com/article.aspx?id=54


"Rob" wrote in message ...
I have an application that I coded to programmatically send emails using
Redemption, on a machine running Outlook 2002. It has been replaced, and the
machine is using Outlook 2003. I installed Redemption as per instructions,
even used regsrvr on it, yet keep getting a "Library Not Registered" error.
Here's the snippet of code before the error:

Dim rMail As Object
Dim rContact As Object
Dim oItem As Object
Dim NS As Object
Dim Sync As Object
Dim Utils As Object
Dim oSent As Object
Dim oSentFolder As Object
Dim Prop As Outlook.UserProperty
'CREATE MAIL ITEM ITEM
Set rMail = New Redemption.SafeMailItem
Set oItem = myApp.CreateItem(olMailItem)

It errors at the Set oItem = myApp.CreateItem(olMailItem) line. Reference
to MSOutlook 11 Object Library is checked, as well as to teh Redemption
Object Library.

Does anyone have any insight, as this has become a major issue.

Thank you

My appologies for not clarifying mo

The application that is calling the email is written in Access 97 (yes,
ouch, I know). Due to the complexity of the app and time, it has not been
converted yet.

The code I pasted here works perfectly fine when Outlook is Outlook 2002.

"Sue Mosher [MVP-Outlook]" wrote:

That's not a Redemption error. I don't see any statement to instantiate myApp as an Outlook.Application object.

--
Sue Mosher, Outlook MVP
Author of Microsoft Outlook 2007 Programming:
Jumpstart for Power Users and Administrators
http://www.outlookcode.com/article.aspx?id=54


"Rob" wrote in message ...
I have an application that I coded to programmatically send emails using
Redemption, on a machine running Outlook 2002. It has been replaced, and the
machine is using Outlook 2003. I installed Redemption as per instructions,
even used regsrvr on it, yet keep getting a "Library Not Registered" error.
Here's the snippet of code before the error:

Dim rMail As Object
Dim rContact As Object
Dim oItem As Object
Dim NS As Object
Dim Sync As Object
Dim Utils As Object
Dim oSent As Object
Dim oSentFolder As Object
Dim Prop As Outlook.UserProperty
'CREATE MAIL ITEM ITEM
Set rMail = New Redemption.SafeMailItem
Set oItem = myApp.CreateItem(olMailItem)

It errors at the Set oItem = myApp.CreateItem(olMailItem) line. Reference
to MSOutlook 11 Object Library is checked, as well as to teh Redemption
Object Library.

Does anyone have any insight, as this has become a major issue.

Thank you

That still doesn't explain how you are instantiating the myApp object. Since it is involved in the statement that raises an error, that's where your troubleshooting should be focused.

--
Sue Mosher, Outlook MVP
Author of Microsoft Outlook 2007 Programming:
Jumpstart for Power Users and Administrators
http://www.outlookcode.com/article.aspx?id=54


"Rob" wrote in message ...
My appologies for not clarifying mo

The application that is calling the email is written in Access 97 (yes,
ouch, I know). Due to the complexity of the app and time, it has not been
converted yet.

The code I pasted here works perfectly fine when Outlook is Outlook 2002.

"Sue Mosher [MVP-Outlook]" wrote:

That's not a Redemption error. I don't see any statement to instantiate myApp as an Outlook.Application object.


"Rob" wrote in message ...
I have an application that I coded to programmatically send emails using
Redemption, on a machine running Outlook 2002. It has been replaced, and the
machine is using Outlook 2003. I installed Redemption as per instructions,
even used regsrvr on it, yet keep getting a "Library Not Registered" error.
Here's the snippet of code before the error:

Dim rMail As Object
Dim rContact As Object
Dim oItem As Object
Dim NS As Object
Dim Sync As Object
Dim Utils As Object
Dim oSent As Object
Dim oSentFolder As Object
Dim Prop As Outlook.UserProperty
'CREATE MAIL ITEM ITEM
Set rMail = New Redemption.SafeMailItem
Set oItem = myApp.CreateItem(olMailItem)

It errors at the Set oItem = myApp.CreateItem(olMailItem) line. Reference
to MSOutlook 11 Object Library is checked, as well as to teh Redemption
Object Library.

Does anyone have any insight, as this has become a major issue.

Thank you

Which line causes the error?
If it is
Set rMail = New Redemption.SafeMailItem
try to replace it with
Set rMail = CreateObject("Redemption.SafeMailItem")

Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool

"Rob" wrote in message
...
I have an application that I coded to programmatically send emails using
Redemption, on a machine running Outlook 2002. It has been replaced, and
the
machine is using Outlook 2003. I installed Redemption as per
instructions,
even used regsrvr on it, yet keep getting a "Library Not Registered"
error.
Here's the snippet of code before the error:

Dim rMail As Object
Dim rContact As Object
Dim oItem As Object
Dim NS As Object
Dim Sync As Object
Dim Utils As Object
Dim oSent As Object
Dim oSentFolder As Object
Dim Prop As Outlook.UserProperty
'CREATE MAIL ITEM ITEM
Set rMail = New Redemption.SafeMailItem
Set oItem = myApp.CreateItem(olMailItem)

It errors at the Set oItem = myApp.CreateItem(olMailItem) line. Reference
to MSOutlook 11 Object Library is checked, as well as to teh Redemption
Object Library.

Does anyone have any insight, as this has become a major issue.

Thank you

It is erroring at the following line:

Set oItem = myApp.CreateItem(olMailItem)

In my declarations section I have the following:

Dim myApp As New Outlook.Application
Dim myItem As Outlook.MailItem

If this is an Outlook error, what could be causing it? The machine has been
reverted back to Outlook 2002. It has the exact same setup in terms Access,
Outlook, and the code to run the process, yet it doesn't work here.

"Dmitry Streblechenko" wrote:

Which line causes the error?
If it is
Set rMail = New Redemption.SafeMailItem
try to replace it with
Set rMail = CreateObject("Redemption.SafeMailItem")

Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool

"Rob" wrote in message
...
I have an application that I coded to programmatically send emails using
Redemption, on a machine running Outlook 2002. It has been replaced, and
the
machine is using Outlook 2003. I installed Redemption as per
instructions,
even used regsrvr on it, yet keep getting a "Library Not Registered"
error.
Here's the snippet of code before the error:

Dim rMail As Object
Dim rContact As Object
Dim oItem As Object
Dim NS As Object
Dim Sync As Object
Dim Utils As Object
Dim oSent As Object
Dim oSentFolder As Object
Dim Prop As Outlook.UserProperty
'CREATE MAIL ITEM ITEM
Set rMail = New Redemption.SafeMailItem
Set oItem = myApp.CreateItem(olMailItem)

It errors at the Set oItem = myApp.CreateItem(olMailItem) line. Reference
to MSOutlook 11 Object Library is checked, as well as to teh Redemption
Object Library.

Does anyone have any insight, as this has become a major issue.

Thank you

And what is the error? Have you rceently installed any anti virus apps?

Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool

"Rob" wrote in message
...
It is erroring at the following line:

Set oItem = myApp.CreateItem(olMailItem)

In my declarations section I have the following:

Dim myApp As New Outlook.Application
Dim myItem As Outlook.MailItem

If this is an Outlook error, what could be causing it? The machine has
been
reverted back to Outlook 2002. It has the exact same setup in terms
Access,
Outlook, and the code to run the process, yet it doesn't work here.

"Dmitry Streblechenko" wrote:

Which line causes the error?
If it is
Set rMail = New Redemption.SafeMailItem
try to replace it with
Set rMail = CreateObject("Redemption.SafeMailItem")

Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool

"Rob" wrote in message
...
I have an application that I coded to programmatically send emails using
Redemption, on a machine running Outlook 2002. It has been replaced,
and
the
machine is using Outlook 2003. I installed Redemption as per
instructions,
even used regsrvr on it, yet keep getting a "Library Not Registered"
error.
Here's the snippet of code before the error:

Dim rMail As Object
Dim rContact As Object
Dim oItem As Object
Dim NS As Object
Dim Sync As Object
Dim Utils As Object
Dim oSent As Object
Dim oSentFolder As Object
Dim Prop As Outlook.UserProperty
'CREATE MAIL ITEM ITEM
Set rMail = New Redemption.SafeMailItem
Set oItem = myApp.CreateItem(olMailItem)

It errors at the Set oItem = myApp.CreateItem(olMailItem) line.
Reference
to MSOutlook 11 Object Library is checked, as well as to teh Redemption
Object Library.

Does anyone have any insight, as this has become a major issue.

Thank you

The error message is:
"Library Not Registered"

I thought the anti-virus was an issue with only Outlook 2007?

"Dmitry Streblechenko" wrote:

And what is the error? Have you rceently installed any anti virus apps?

Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool

"Rob" wrote in message
...
It is erroring at the following line:

Set oItem = myApp.CreateItem(olMailItem)

In my declarations section I have the following:

Dim myApp As New Outlook.Application
Dim myItem As Outlook.MailItem

If this is an Outlook error, what could be causing it? The machine has
been
reverted back to Outlook 2002. It has the exact same setup in terms
Access,
Outlook, and the code to run the process, yet it doesn't work here.

"Dmitry Streblechenko" wrote:

Which line causes the error?
If it is
Set rMail = New Redemption.SafeMailItem
try to replace it with
Set rMail = CreateObject("Redemption.SafeMailItem")

Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool

"Rob" wrote in message
...
I have an application that I coded to programmatically send emails using
Redemption, on a machine running Outlook 2002. It has been replaced,
and
the
machine is using Outlook 2003. I installed Redemption as per
instructions,
even used regsrvr on it, yet keep getting a "Library Not Registered"
error.
Here's the snippet of code before the error:

Dim rMail As Object
Dim rContact As Object
Dim oItem As Object
Dim NS As Object
Dim Sync As Object
Dim Utils As Object
Dim oSent As Object
Dim oSentFolder As Object
Dim Prop As Outlook.UserProperty
'CREATE MAIL ITEM ITEM
Set rMail = New Redemption.SafeMailItem
Set oItem = myApp.CreateItem(olMailItem)

It errors at the Set oItem = myApp.CreateItem(olMailItem) line.
Reference
to MSOutlook 11 Object Library is checked, as well as to teh Redemption
Object Library.

Does anyone have any insight, as this has become a major issue.

Thank you