Hi

I have an outlook form with a Contacts button to bring in the phone number
(BusinessTelephoneNumber ) from the selected contact into the txtPhoneNumber
Text Box.

This works ok but it doesnt allow me to have the choice of changing the
phone number brought into txtPHoneNumber. It keeps reverting to the
BusinessTelephoneNumber .

Now i sadly have no coding skills and grabbed the information i have from
the net and altered it my way:

Sub Item_PropertyChange(ByVal strName)

' Remember business phone number
Item.BillingInformation = objContactItem.BusinessTelephoneNumber 'puts
the No. in the txtPhoneNumber

' Set phone number
strPhoneNumber = objContactItem.BusinessTelephoneNumber 'holds it in string


' Remove phone number
'Item.BillingInformation = ""

'Item.GetInspector.ModifiedFormPages("Message").Co ntrols("txtPhoneNumber").V
alue = ""

'test
msgbox strPhoneNumber

Any ideas?

Tell us more about txtPhoneNumber. Is it an unbound text box? Is it bound to an Outlook property? What is it that you're actually trying to accomplish with this control?

--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003
http://www.turtleflock.com/olconfig/index.htm
and Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers
http://www.outlookcode.com/jumpstart.aspx

"Sydney" wrote in message ...
Hi

I have an outlook form with a Contacts button to bring in the phone number
(BusinessTelephoneNumber ) from the selected contact into the txtPhoneNumber
Text Box.

This works ok but it doesnt allow me to have the choice of changing the
phone number brought into txtPHoneNumber. It keeps reverting to the
BusinessTelephoneNumber .

Now i sadly have no coding skills and grabbed the information i have from
the net and altered it my way:

Sub Item_PropertyChange(ByVal strName)

' Remember business phone number
Item.BillingInformation = objContactItem.BusinessTelephoneNumber 'puts
the No. in the txtPhoneNumber

' Set phone number
strPhoneNumber = objContactItem.BusinessTelephoneNumber 'holds it in string


' Remove phone number
'Item.BillingInformation = ""

'Item.GetInspector.ModifiedFormPages("Message").Co ntrols("txtPhoneNumber").V
alue = ""

'test
msgbox strPhoneNumber

Any ideas?

No its not bound to an outlook property. The txtPhoneNumber text box
automatically populates the BusinessTelephoneNumber based on the contact
chosen, this is done via the vbscript. I would then like to give users the
option to overtype this number.

Hope this makes sense


"Sue Mosher [MVP-Outlook]" wrote in message

Tell us more about txtPhoneNumber. Is it an unbound text box? Is it bound to
an Outlook property? What is it that you're actually trying to accomplish
with this control?

--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003
http://www.turtleflock.com/olconfig/index.htm
and Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers
http://www.outlookcode.com/jumpstart.aspx

"Sydney" wrote in message
...
Hi

I have an outlook form with a Contacts button to bring in the phone number
(BusinessTelephoneNumber ) from the selected contact into the
txtPhoneNumber
Text Box.

This works ok but it doesnt allow me to have the choice of changing the
phone number brought into txtPHoneNumber. It keeps reverting to the
BusinessTelephoneNumber .

Now i sadly have no coding skills and grabbed the information i have from
the net and altered it my way:

Sub Item_PropertyChange(ByVal strName)

' Remember business phone number
Item.BillingInformation = objContactItem.BusinessTelephoneNumber
'puts
the No. in the txtPhoneNumber

' Set phone number
strPhoneNumber = objContactItem.BusinessTelephoneNumber 'holds it in
string


' Remove phone number
'Item.BillingInformation = ""


'Item.GetInspector.ModifiedFormPages("Message").Co ntrols("txtPhoneNumber").V
alue = ""

'test
msgbox strPhoneNumber

Any ideas?

If your real goal is to populate the BusinessTelephoneNumber field, the easiest way to do that is to bind the txtPhoneNumber text box to that property.

--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003
http://www.turtleflock.com/olconfig/index.htm
and Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers
http://www.outlookcode.com/jumpstart.aspx

"Sydney" wrote in message ...
No its not bound to an outlook property. The txtPhoneNumber text box
automatically populates the BusinessTelephoneNumber based on the contact
chosen, this is done via the vbscript. I would then like to give users the
option to overtype this number.

Hope this makes sense


"Sue Mosher [MVP-Outlook]" wrote in message

Tell us more about txtPhoneNumber. Is it an unbound text box? Is it bound to
an Outlook property? What is it that you're actually trying to accomplish
with this control?


"Sydney" wrote in message
...
Hi

I have an outlook form with a Contacts button to bring in the phone number
(BusinessTelephoneNumber ) from the selected contact into the
txtPhoneNumber
Text Box.

This works ok but it doesnt allow me to have the choice of changing the
phone number brought into txtPHoneNumber. It keeps reverting to the
BusinessTelephoneNumber .

Now i sadly have no coding skills and grabbed the information i have from
the net and altered it my way:

Sub Item_PropertyChange(ByVal strName)

' Remember business phone number
Item.BillingInformation = objContactItem.BusinessTelephoneNumber
'puts
the No. in the txtPhoneNumber

' Set phone number
strPhoneNumber = objContactItem.BusinessTelephoneNumber 'holds it in
string


' Remove phone number
'Item.BillingInformation = ""


'Item.GetInspector.ModifiedFormPages("Message").Co ntrols("txtPhoneNumber").V
alue = ""

'test
msgbox strPhoneNumber

Any ideas?

Thanks, that is alot easier.
I bound the txtPhoneNumber to the BillingInformation field (I couldnt see
BusinessTelephoneNumber in the list).

However I run into the same problem, once txtPhoneNumber is bound, the value
cannot be changed by the user. Is there a way I can do this ? Users would
like an option to change the phone number.

Many thanks


"Sue Mosher [MVP-Outlook]" wrote in message
...
If your real goal is to populate the BusinessTelephoneNumber field, the
easiest way to do that is to bind the txtPhoneNumber text box to that
property.

--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003
http://www.turtleflock.com/olconfig/index.htm
and Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers
http://www.outlookcode.com/jumpstart.aspx

"Sydney" wrote in message
...
No its not bound to an outlook property. The txtPhoneNumber text box
automatically populates the BusinessTelephoneNumber based on the contact
chosen, this is done via the vbscript. I would then like to give users
the
option to overtype this number.

Hope this makes sense


"Sue Mosher [MVP-Outlook]" wrote in message

Tell us more about txtPhoneNumber. Is it an unbound text box? Is it bound
to
an Outlook property? What is it that you're actually trying to accomplish
with this control?


"Sydney" wrote in message
...
Hi

I have an outlook form with a Contacts button to bring in the phone
number
(BusinessTelephoneNumber ) from the selected contact into the
txtPhoneNumber
Text Box.

This works ok but it doesnt allow me to have the choice of changing the
phone number brought into txtPHoneNumber. It keeps reverting to the
BusinessTelephoneNumber .

Now i sadly have no coding skills and grabbed the information i have from
the net and altered it my way:

Sub Item_PropertyChange(ByVal strName)

' Remember business phone number
Item.BillingInformation = objContactItem.BusinessTelephoneNumber
'puts
the No. in the txtPhoneNumber

' Set phone number
strPhoneNumber = objContactItem.BusinessTelephoneNumber 'holds it in
string


' Remove phone number
'Item.BillingInformation = ""



'Item.GetInspector.ModifiedFormPages("Message").Co ntrols("txtPhoneNumber").V
alue = ""

'test
msgbox strPhoneNumber

Any ideas?

You didn't set a formula on that field's control, did you? That's one of two ways to make a control read-only, the other being to check the read-only box directly.

The BusinessTelephoneNumber property is listed under Phone Number fields in the field chooser as Business Phone.

--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003
http://www.turtleflock.com/olconfig/index.htm
and Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers
http://www.outlookcode.com/jumpstart.aspx

"Sydney" wrote in message ...
Thanks, that is alot easier.
I bound the txtPhoneNumber to the BillingInformation field (I couldnt see
BusinessTelephoneNumber in the list).

However I run into the same problem, once txtPhoneNumber is bound, the value
cannot be changed by the user. Is there a way I can do this ? Users would
like an option to change the phone number.

Many thanks


"Sue Mosher [MVP-Outlook]" wrote in message
...
If your real goal is to populate the BusinessTelephoneNumber field, the
easiest way to do that is to bind the txtPhoneNumber text box to that
property.

--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003
http://www.turtleflock.com/olconfig/index.htm
and Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers
http://www.outlookcode.com/jumpstart.aspx

"Sydney" wrote in message
...
No its not bound to an outlook property. The txtPhoneNumber text box
automatically populates the BusinessTelephoneNumber based on the contact
chosen, this is done via the vbscript. I would then like to give users
the
option to overtype this number.

Hope this makes sense


"Sue Mosher [MVP-Outlook]" wrote in message

Tell us more about txtPhoneNumber. Is it an unbound text box? Is it bound
to
an Outlook property? What is it that you're actually trying to accomplish
with this control?


"Sydney" wrote in message
...
Hi

I have an outlook form with a Contacts button to bring in the phone
number
(BusinessTelephoneNumber ) from the selected contact into the
txtPhoneNumber
Text Box.

This works ok but it doesnt allow me to have the choice of changing the
phone number brought into txtPHoneNumber. It keeps reverting to the
BusinessTelephoneNumber .

Now i sadly have no coding skills and grabbed the information i have from
the net and altered it my way:

Sub Item_PropertyChange(ByVal strName)

' Remember business phone number
Item.BillingInformation = objContactItem.BusinessTelephoneNumber
'puts
the No. in the txtPhoneNumber

' Set phone number
strPhoneNumber = objContactItem.BusinessTelephoneNumber 'holds it in
string


' Remove phone number
'Item.BillingInformation = ""



'Item.GetInspector.ModifiedFormPages("Message").Co ntrols("txtPhoneNumber").V
alue = ""

'test
msgbox strPhoneNumber

Any ideas?

In article , Sydney wrote:
Thanks, that is alot easier.
I bound the txtPhoneNumber to the BillingInformation field (I couldnt see
BusinessTelephoneNumber in the list).

What is the MessageClass of your custom form?

Hollis D. Paul [MVP - Outlook]
Mukilteo, WA USA