R
Rick S.
In the code below I have many "Keys" that will share the same value as the
"Setting" in the Registry.
Example:
ADMCustomerList (Appname), Customers (Section), Number1 (Key), Number1
(Setting).
What I see happening is I am retrieving both "Section" and "Key" values but
I do not know how to separate them in my code.
The variable "sCustomer" is used like "sCustomer(0, 1)" which would report
the first item in the list, "0" is the "Section" and "1" is the "Key". A "0"
should skip the "Section" value and the following numeric value is the
corrosponding "Key" value location, IE, 1 thru 10 or 1 thru some number.
How can I read only the"Key" values?
'===========
With ListBox1
Dim c As Variant
Dim sCustomer As Variant, intSettings As Integer
sCustomer = GetAllSettings(appname:="ADMCustomerList", section:="Customers")
For intSettings = LBound(sCustomer, 1) To UBound(sCustomer, 1)
Debug.Print sCustomer(intSettings, 0), sCustomer(intSettings, 1)
Next intSettings
For Each c In sCustomer
..AddItem c
Next
End With
'=============
--
Regards
Rick
XP Pro
Office 2007
"Setting" in the Registry.
Example:
ADMCustomerList (Appname), Customers (Section), Number1 (Key), Number1
(Setting).
What I see happening is I am retrieving both "Section" and "Key" values but
I do not know how to separate them in my code.
The variable "sCustomer" is used like "sCustomer(0, 1)" which would report
the first item in the list, "0" is the "Section" and "1" is the "Key". A "0"
should skip the "Section" value and the following numeric value is the
corrosponding "Key" value location, IE, 1 thru 10 or 1 thru some number.
How can I read only the"Key" values?
'===========
With ListBox1
Dim c As Variant
Dim sCustomer As Variant, intSettings As Integer
sCustomer = GetAllSettings(appname:="ADMCustomerList", section:="Customers")
For intSettings = LBound(sCustomer, 1) To UBound(sCustomer, 1)
Debug.Print sCustomer(intSettings, 0), sCustomer(intSettings, 1)
Next intSettings
For Each c In sCustomer
..AddItem c
Next
End With
'=============
--
Regards
Rick
XP Pro
Office 2007