Enable Disable the To textbox

[jeff.riley]

All,

I know how to get custom textboxes,

Set m_TestText =
Item.GetInspector.ModifiedFormPages("Message").Controls("TextBox4")

But how do I get the standard "To" textbox? I need to enable it and disable
it on my form for a given condition.

 

[jeff.riley]

All,

Never mind I found it. Page 368. I fixed my code as below.

Dim objPage
Dim objControl
ForwardItem.To = ""
Set objPage = ForwardItem.GetInspector.ModifiedFormPages("Message")
Set objControl = objPage.Controls("To")
objControl.Enabled = 1
objControl.ReadOnly = 0
objControl.BackColor = &h80000005
Set objPage = Nothing
Set objControl = Nothing

Thank you,
Jeff Riley