Hi, I want to write some code for a custom form. I want the user to
click a button and an address book pops up -- the same way an address
book pops up when the user clicks "To...", but I want it to display a
particular set of users/emails, for example "clients."

Is this possible to do with Outlook forms? Any help would be much
appreciated!

Jake

Depending on your Outlook version and configuration, it may be possible to display the Address Book dialog. However, to make it show a specific address list, you would need to use the third-party Redemption library; see http://www.dimastr.com/redemption/rd...ddressbook.htm

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


wrote in message ...
Hi, I want to write some code for a custom form. I want the user to
click a button and an address book pops up -- the same way an address
book pops up when the user clicks "To...", but I want it to display a
particular set of users/emails, for example "clients."

Is this possible to do with Outlook forms? Any help would be much
appreciated!

Jake

Hi Sue, I am getting an error that says "Property is read only" when I
try to execute the code. (It must be obvious I'm not a VB programmer
yet...trying to learn though...sorry if the code is completely off!)

Here is the code:

Sub CommandButton2_Click()

set Session = CreateObject("Redemption.RDOSession")
Session.Logon
set Inbox = Session.GetDefaultFolder(olFolderInbox)
set Msg = Inbox.Items.Add
Msg.CC = "test1"
Msg.Recipients.ResolveAll
Msg.Subject = "test"
set AB = Session.AddressBook
set Recips = AB.ShowAddressBook(Msg.Recipients)
Msg.Recipients = Recips
Msg.Save

End Sub


On Jan 17, 11:30 am, "Sue Mosher [MVP-Outlook]"
wrote:
Depending on your Outlook version and configuration, it may be possible to display the Address Book dialog. However, to make it show a specific address list, you would need to use the third-party Redemption library; seehttp://www.dimastr.com/redemption/rdo/rdoaddressbook.htm

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

wrote in ...
Hi, I want to write some code for a custom form. I want the user to
click a button and an address book pops up -- the same way an address
book pops up when the user clicks "To...", but I want it to display a
particular set of users/emails, for example "clients."

Is this possible to do with Outlook forms? Any help would be much
appreciated!

Jake

Also, by the way, I downloaded and installed the redemption package.

Which statement raises the error?

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


wrote in message ...
Hi Sue, I am getting an error that says "Property is read only" when I
try to execute the code. (It must be obvious I'm not a VB programmer
yet...trying to learn though...sorry if the code is completely off!)

Here is the code:

Sub CommandButton2_Click()

set Session = CreateObject("Redemption.RDOSession")
Session.Logon
set Inbox = Session.GetDefaultFolder(olFolderInbox)
set Msg = Inbox.Items.Add
Msg.CC = "test1"
Msg.Recipients.ResolveAll
Msg.Subject = "test"
set AB = Session.AddressBook
set Recips = AB.ShowAddressBook(Msg.Recipients)
Msg.Recipients = Recips
Msg.Save

End Sub


On Jan 17, 11:30 am, "Sue Mosher [MVP-Outlook]"
wrote:
Depending on your Outlook version and configuration, it may be possible to display the Address Book dialog. However, to make it show a specific address list, you would need to use the third-party Redemption library; see http://www.dimastr.com/redemption/rd...ddressbook.htm


wrote in ...
Hi, I want to write some code for a custom form. I want the user to
click a button and an address book pops up -- the same way an address
book pops up when the user clicks "To...", but I want it to display a
particular set of users/emails, for example "clients."

Is this possible to do with Outlook forms? Any help would be much
appreciated!

Jake

When I publish and then run the form, and click on the button, a popup
appears that says "Property is read-only".

I don't know how to debug the code to find out what statement is doing
it

On Jan 17, 12:02 pm, "Sue Mosher [MVP-Outlook]"
wrote:
Which statement raises the error?

What version of Outlook, on what operating system?

In the meantime, you can add MsgBox statements between each pair of statements to get a sense for which execute before and after the error.

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


wrote in message ...
When I publish and then run the form, and click on the button, a popup
appears that says "Property is read-only".

I don't know how to debug the code to find out what statement is doing
it

On Jan 17, 12:02 pm, "Sue Mosher [MVP-Outlook]"
wrote:
Which statement raises the error?

wrote in message ...
Hi Sue, I am getting an error that says "Property is read only" when I
try to execute the code. (It must be obvious I'm not a VB programmer
yet...trying to learn though...sorry if the code is completely off!)

Here is the code:

Sub CommandButton2_Click()

set Session = CreateObject("Redemption.RDOSession")
Session.Logon
set Inbox = Session.GetDefaultFolder(olFolderInbox)
set Msg = Inbox.Items.Add
Msg.CC = "test1"
Msg.Recipients.ResolveAll
Msg.Subject = "test"
set AB = Session.AddressBook
set Recips = AB.ShowAddressBook(Msg.Recipients)
Msg.Recipients = Recips
Msg.Save

End Sub


On Jan 17, 11:30 am, "Sue Mosher [MVP-Outlook]"
wrote:
Depending on your Outlook version and configuration, it may be possible to display the Address Book dialog. However, to make it show a specific address list, you would need to use the third-party Redemption library; see http://www.dimastr.com/redemption/rd...ddressbook.htm


wrote in ...
Hi, I want to write some code for a custom form. I want the user to
click a button and an address book pops up -- the same way an address
book pops up when the user clicks "To...", but I want it to display a
particular set of users/emails, for example "clients."

Is this possible to do with Outlook forms? Any help would be much
appreciated!

Outlook 2003, Windows XP.

Based on msgBox testing that you suggested, the problem occurs on the
first line:

set Session = CreateObject("Redemption.RDOSession")



On Jan 17, 1:17 pm, "Sue Mosher [MVP-Outlook]"
wrote:
What version of Outlook, on what operating system?

In the meantime, you can add MsgBox statements between each pair of statements to get a sense for which execute before and after the error.

Did you download and install the Redemption library?

The error message doesn't match the code statement. That statement is not setting any properties, read-only or otherwise.

This is a more likely problem statement:

Msg.Recipients = Recips

You cannot set a Recipients collection like that. Instead, you would need to loop through the Recips collection and, for each Recip.Address, call Msg.Recipients.Add to add that recipient to Msg.

To invoke the script debugger from Outlook 2003, open the item and choose Tools | Forms | Script Debugger. Choose New Instance of Microsoft Script Editor. Find your procedure and use the F9 key to place a breakpoint on the first line. When you click the button, code execution should stop at the breakpoint. You can then step through each statement by pressing the F11 key.

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


wrote in message ...
Outlook 2003, Windows XP.

Based on msgBox testing that you suggested, the problem occurs on the
first line:

set Session = CreateObject("Redemption.RDOSession")



On Jan 17, 1:17 pm, "Sue Mosher [MVP-Outlook]"
wrote:
What version of Outlook, on what operating system?

In the meantime, you can add MsgBox statements between each pair of statements to get a sense for which execute before and after the error.


wrote in message ...
When I publish and then run the form, and click on the button, a popup
appears that says "Property is read-only".

I don't know how to debug the code to find out what statement is doing
it

On Jan 17, 12:02 pm, "Sue Mosher [MVP-Outlook]"
wrote:
Which statement raises the error?

wrote in message ...
Hi Sue, I am getting an error that says "Property is read only" when I
try to execute the code. (It must be obvious I'm not a VB programmer
yet...trying to learn though...sorry if the code is completely off!)

Here is the code:

Sub CommandButton2_Click()

set Session = CreateObject("Redemption.RDOSession")
Session.Logon
set Inbox = Session.GetDefaultFolder(olFolderInbox)
set Msg = Inbox.Items.Add
Msg.CC = "test1"
Msg.Recipients.ResolveAll
Msg.Subject = "test"
set AB = Session.AddressBook
set Recips = AB.ShowAddressBook(Msg.Recipients)
Msg.Recipients = Recips
Msg.Save

End Sub


On Jan 17, 11:30 am, "Sue Mosher [MVP-Outlook]"
wrote:
Depending on your Outlook version and configuration, it may be possible to display the Address Book dialog. However, to make it show a specific address list, you would need to use the third-party Redemption library; see http://www.dimastr.com/redemption/rd...ddressbook.htm


wrote in ...
Hi, I want to write some code for a custom form. I want the user to
click a button and an address book pops up -- the same way an address
book pops up when the user clicks "To...", but I want it to display a
particular set of users/emails, for example "clients."

Is this possible to do with Outlook forms? Any help would be much
appreciated!

Hi Sue, thanks for the info. However, I noticed even if I delete all
the other lines of code except for the first line, I still get the
read only error. Could it have something to do with my write
privileges on my computer?

I installed redemption using the registry and everything installed
properly, so I don't think that is the issue.


Jake

On Jan 17, 2:44 pm, "Sue Mosher [MVP-Outlook]"
wrote:
Did you download and install the Redemption library?

The error message doesn't match the code statement. That statement is not setting any properties, read-only or otherwise.

This is a more likely problem statement:

Msg.Recipients = Recips

You cannot set a Recipients collection like that. Instead, you would need to loop through the Recips collection and, for each Recip.Address, call Msg.Recipients.Add to add that recipient to Msg.

To invoke the script debugger from Outlook 2003, open the item and choose Tools | Forms | Script Debugger. Choose New Instance of Microsoft Script Editor. Find your procedure and use the F9 key to place a breakpoint on the first line. When you click the button, code execution should stop at the breakpoint. You can then step through each statement by pressing the F11 key.

--