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

No, no code behind the field. I couldn't see the Business Phone as I was
designing a message, i found it when i opened a contact in design mode but
it wouldn't let me drag it to my message. (Im creating a telephone msg form)

I double checked and its not read only (atleast the tick is not on).

With VBSCRIPT, do you know how i can empty a variable? eg, i have strPhone
set to equal a number typed it and i would then like to empty that variable
to reuse.

I tried Set strPhone = Nothing

I just cant see another way of enabling this phone number to allow change ?

Thank you so much for the guidance.


"Sue Mosher [MVP-Outlook]" wrote in message
...
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?

Hi

Im using IPM.Note ?
Could this be my problem?


"Hollis D. Paul" wrote in message
...
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

No, no code behind the field. I couldn't see the Business Phone as I was
designing a message, i found it when i opened a contact in design mode but
it wouldn't let me drag it to my message. (Im creating a telephone msg form)

Do you mean that you're trying to add a contact field to a message form? That generally won't work. Use a custom property instead.

However, custom message forms are usually a bad idea, too, unless they're destined for use only within your own organization where everyone uses Outlook.

With VBSCRIPT, do you know how i can empty a variable? eg, i have strPhone
set to equal a number typed it and i would then like to empty that variable
to reuse.

I tried Set strPhone = Nothing

You use Set obj = Nothing only with objects. If strPhone is a string variable, just set it to a blank string:

strPhone = ""

--
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 ...


I double checked and its not read only (atleast the tick is not on).



I just cant see another way of enabling this phone number to allow change ?

Thank you so much for the guidance.


"Sue Mosher [MVP-Outlook]" wrote in message
...
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.

"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.

"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?