Create an SQL View from VBA

Hello All;

I'm new to SQL, and developing my first application using SQL 2000 as the back end for my data.

Can anyone tell me if I can create an SQL View from VBA?

I'm trying to create a data view that access various records from a single table, and it has to distribute that data 2 14 different subforms, representing different days in a 2 week period, which is distingiushed by a field called "Day", that is numbered from 1 to 14.

I also have a summary subform that has the weekly summary (days 1 to 7 and 8 to 14) on seperate subforms. In total I have 16 subforms, which actually source from a single table, just split depending on the day in the period.

As I see it now, creating views iis the best way for me to go, but I also have to be able to change the period id on the fly, so I'm think I have to use VBA to generate these views.

Does any of this make sense, and am I on the right track??You might want to consider a more dynamic solution. Do the 14 forms all hold the same data fields? If so, why not use one form and base the contents on the day of a week. Make the day of the week a field in your table and populate your form based on a stored procedure that uses the day of the week as a parameter in the query.

Fixing your schema now will pay you back many fold in the future.

Avoid creating database objects on the fly in end user applications.

To answer your question, yes this is possible. Is it a good idea? No.|||... populate your form based on a stored procedure that uses the day of the week as a parameter in the query.

Fixing your schema now will pay you back many fold in the future.

Avoid creating database objects on the fly in end user applications.

To answer your question, yes this is possible. Is it a good idea? No.

Agreed with all the points here. You might also consider a user defined function that returns a table. I don't generally use these for multi-column result sets, but it is permissible to do so.

Perhaps you could post some ddl and sample data and improve your chance for getting a useable answer...

Regards,

hmscott

coverting conditional statements to sql

hi all

I am building an application where the user enters a conditional statement and then i want to perform some action.

Eg

user input > if customer.name = sandro then send email

My program will read the user input and then constructs an sql statement to retrieve the required info... if the sql returns data then a separate method is invoked.

My problem is to transform this statement into the appropriate SQL...since this need to be constructed at run time and for any type of user input..

The language i am using is java, however i dont expect any code...I was only wondering if someone has any ideas of how this can be done..

Thank you in anticipation.What language are you writing the application in ?|||Originally posted by rnealejr
What language are you writing the application in ?

I am using JAVA...|||What type of user input are you expecting ? - give some examples. What input from the user will the sql statements be based on ?|||Originally posted by rnealejr
What type of user input are you expecting ? - give some examples. What input from the user will the sql statements be based on ?

The users are expected to choose from a form which will display the available table attributes and the conjunctives AND OR and NOT.

eg of the typical input

If customer.name = "sandro" and department.name = "maintence" then send email.

what i need to do is to dynamically generate an sql that extracts the required info (based on the user input)......... if the dataset returned from the generated query contains data then this implies that the conditional part succeeds... and in turn i can invoke a method which sends the email...

Hope this is clear.........

Thank you for your interest

Sandro|||After the user makes the selections just do an executeQuery within java with the string that you create. So you might separate the sql statement into a select, from, where ... strings and combine these and pass to the executeQuery using the parameter selection by the user. By separating the parts of the sql statement you can create reusable components. Do you need to know the contents of the returned result set or just that something exists ? If it is the latter, just do a select count(*) to validate. I am a little unclear as to what your problem is, so I hope this answers your question.|||Originally posted by rnealejr
After the user makes the selections just do an executeQuery within java with the string that you create. So you might separate the sql statement into a select, from, where ... strings and combine these and pass to the executeQuery using the parameter selection by the user. By separating the parts of the sql statement you can create reusable components. Do you need to know the contents of the returned result set or just that something exists ? If it is the latter, just do a select count(*) to validate. I am a little unclear as to what your problem is, so I hope this answers your question.

Thank you very much for your advice...... it s pretty much similar to what i had in mind...

By any chance do u know how i can calculate the genereted query computational complexity? i.e. its order O()

CountrySelector control

Hello all

I am developing a CountrySelector control (which I would like to share
with anyone), but I am quite a newby in this custom control area.

You can find it at:
http://home.kabelfoon.nl/~juliusd/v...ntrySelector.vb

Some questions I have are:
- In what event should the items be added. In this case (PreRender)
items added on every render (duh) and get duplicated when ViewState is
enabled. Best would be if the items show up in the designer already
but only in designmode and not with <ListItem> in the HTML source.
- How can I override ViewState get/set methods to only save the
current selection and not the whole collection? It will also need to
save whether it is the first render (for the use of the DefaultCountry
property)
- What behaviour to expect when an invalid countrycode is selected by
consuming (.net) code (e.g. in the DefaultCountry property)?
- Is it possible to use System.Globalization to populate the
collection with country(code)'s?

Thank you in advance.

Hope to hear from you

Freek Versteijn

Here is the concept code:

Imports System.ComponentModel
Imports System.Web.UI
Imports System.Web.UI.WebControls

<ToolboxData("<{0}:CountrySelector
runat=server></{0}:CountrySelector>")> Public Class CountrySelector
Inherits System.Web.UI.WebControls.DropDownList
Protected _DefaultCountry As String

<Description("The initial country's code")> _
Public Property DefaultCountry() As String
Get
Return _DefaultCountry
End Get
Set(ByVal Value As String)
_DefaultCountry = ("" & Value).ToUpper()
End Set
End Property

'TODO:
' [ ] Move adding of items to other method?
' [ ] Show DefaultCountry at first render
' [ ] ViewState to only save the selected item
' [ ] Use System.Globalization (RegionInfo.DisplayName or
..EnglishName depending on CurrentCulture) for populating the Items
collection if possible

Protected Overrides Sub OnPreRender(ByVal e As EventArgs)
Items.Add(New ListItem("Albania", "AL"))
Items.Add(New ListItem("Algeria", "DZ"))
Items.Add(New ListItem("American Samoa", "AS"))
Items.Add(New ListItem("Andorra", "AD"))
Items.Add(New ListItem("Angola", "AO"))
Items.Add(New ListItem("Anguilla", "AI"))
Items.Add(New ListItem("Antarctica", "AQ"))
Items.Add(New ListItem("Antigua/Barbuda", "AG"))
Items.Add(New ListItem("Argentina", "AR"))
Items.Add(New ListItem("Armenia", "AM"))
Items.Add(New ListItem("Aruba", "AW"))
Items.Add(New ListItem("Australia", "AU"))
Items.Add(New ListItem("Austria", "AT"))
Items.Add(New ListItem("Azerbaijan", "AZ"))
Items.Add(New ListItem("Bahamas", "BS"))
Items.Add(New ListItem("Bahrain", "BH"))
Items.Add(New ListItem("Bangladesh", "BD"))
Items.Add(New ListItem("Barbados", "BB"))
Items.Add(New ListItem("Belarus", "BY"))
Items.Add(New ListItem("Belgium", "BE"))
Items.Add(New ListItem("Belize", "BZ"))
Items.Add(New ListItem("Benin", "BJ"))
Items.Add(New ListItem("Bermuda", "BM"))
Items.Add(New ListItem("Bhutan", "BT"))
Items.Add(New ListItem("Bolivia", "BO"))
Items.Add(New ListItem("Bosnia", "BA"))
Items.Add(New ListItem("Botswana", "BW"))
Items.Add(New ListItem("Bouvet Island", "BV"))
Items.Add(New ListItem("Brazil", "BR"))
Items.Add(New ListItem("British Indian Ocean Territory",
"IO"))
Items.Add(New ListItem("British West Indies", "WI"))
Items.Add(New ListItem("Brunei Darussalam", "BN"))
Items.Add(New ListItem("Bulgaria", "BG"))
Items.Add(New ListItem("Burkina Faso", "BF"))
Items.Add(New ListItem("Burma", "BU"))
Items.Add(New ListItem("Burundi", "BI"))
Items.Add(New ListItem("Cambodia", "KH"))
Items.Add(New ListItem("Cameroon", "CM"))
Items.Add(New ListItem("Canada", "CA"))
Items.Add(New ListItem("Cape Verde", "CV"))
Items.Add(New ListItem("Cayman Islands", "KY"))
Items.Add(New ListItem("Central Africa", "CF"))
Items.Add(New ListItem("Chad", "TD"))
Items.Add(New ListItem("Chile", "CL"))
Items.Add(New ListItem("China", "CN"))
Items.Add(New ListItem("Christmas Island", "CX"))
Items.Add(New ListItem("Cocos (Keeling) Islands", "CC"))
Items.Add(New ListItem("Colombia", "CO"))
Items.Add(New ListItem("Comoros", "KM"))
Items.Add(New ListItem("Congo", "CG"))
Items.Add(New ListItem("Cook Islands", "CK"))
Items.Add(New ListItem("Costa Rica", "CR"))
Items.Add(New ListItem("Cote D'Ivoire", "CI"))
Items.Add(New ListItem("Croatia", "HR"))
Items.Add(New ListItem("Cuba", "CU"))
Items.Add(New ListItem("Cyprus", "CY"))
Items.Add(New ListItem("Czech Republic", "CZ"))
Items.Add(New ListItem("Denmark", "DK"))
Items.Add(New ListItem("Djibouti", "DJ"))
Items.Add(New ListItem("Dominica", "DM"))
Items.Add(New ListItem("Dominican Republic", "DO"))
Items.Add(New ListItem("East Timor", "TP"))
Items.Add(New ListItem("Ecuador", "EC"))
Items.Add(New ListItem("Egypt", "EG"))
Items.Add(New ListItem("El Salvador", "SV"))
Items.Add(New ListItem("Equatorial Guinea", "GQ"))
Items.Add(New ListItem("Eritrea", "ER"))
Items.Add(New ListItem("Estonia", "EE"))
Items.Add(New ListItem("Ethiopia", "ET"))
Items.Add(New ListItem("Faeroe Islands", "FO"))
Items.Add(New ListItem("Falkland Islands", "FK"))
Items.Add(New ListItem("Fiji", "FJ"))
Items.Add(New ListItem("Finland", "FI"))
Items.Add(New ListItem("France", "FR"))
Items.Add(New ListItem("French Polynesia", "PF"))
Items.Add(New ListItem("French Southern Territories", "TF"))
Items.Add(New ListItem("Gabon", "GA"))
Items.Add(New ListItem("Gambia", "GM"))
Items.Add(New ListItem("Gaza", "XA"))
Items.Add(New ListItem("Georgia", "GE"))
Items.Add(New ListItem("Germany", "DE"))
Items.Add(New ListItem("Ghana", "GH"))
Items.Add(New ListItem("Gibraltar", "GI"))
Items.Add(New ListItem("Greece", "GR"))
Items.Add(New ListItem("Greenland", "GL"))
Items.Add(New ListItem("Grenada", "GD"))
Items.Add(New ListItem("Guadeloupe", "GP"))
Items.Add(New ListItem("Guam", "GU"))
Items.Add(New ListItem("Guatemala", "GT"))
Items.Add(New ListItem("Guiana", "GF"))
Items.Add(New ListItem("Guinea", "GN"))
Items.Add(New ListItem("Guinea-Bissau", "GW"))
Items.Add(New ListItem("Guyana", "GY"))
Items.Add(New ListItem("Haiti", "HT"))
Items.Add(New ListItem("Heard And Mcdonald Islands", "HM"))
Items.Add(New ListItem("Held Territories", "XH"))
Items.Add(New ListItem("Honduras", "HN"))
Items.Add(New ListItem("Hong Kong", "HK"))
Items.Add(New ListItem("Hungary", "HU"))
Items.Add(New ListItem("Iceland", "IS"))
Items.Add(New ListItem("India", "IN"))
Items.Add(New ListItem("Indian Ocean Islands", "XI"))
Items.Add(New ListItem("Indonesia", "ID"))
Items.Add(New ListItem("Iran", "IN"))
Items.Add(New ListItem("Iraq", "IQ"))
Items.Add(New ListItem("Ireland", "IE"))
Items.Add(New ListItem("Israel", "IL"))
Items.Add(New ListItem("Italy", "IT"))
Items.Add(New ListItem("Jamaica", "JM"))
Items.Add(New ListItem("Japan", "JP"))
Items.Add(New ListItem("Jordan", "JO"))
Items.Add(New ListItem("Kazakhstan", "KZ"))
Items.Add(New ListItem("Kenya", "KE"))
Items.Add(New ListItem("Kiribati", "KI"))
Items.Add(New ListItem("Korea", "KR"))
Items.Add(New ListItem("Kuwait", "KW"))
Items.Add(New ListItem("Kyrgyzstan", "KG"))
Items.Add(New ListItem("Laos", "LA"))
Items.Add(New ListItem("Latvia", "LV"))
Items.Add(New ListItem("Lebanon", "LB"))
Items.Add(New ListItem("Lesotho", "LS"))
Items.Add(New ListItem("Liberia", "LR"))
Items.Add(New ListItem("Libya", "LY"))
Items.Add(New ListItem("Liechtenstein", "LI"))
Items.Add(New ListItem("Lithuania", "LT"))
Items.Add(New ListItem("Luxembourg", "LU"))
Items.Add(New ListItem("Macau", "MO"))
Items.Add(New ListItem("Macedonia", "MK"))
Items.Add(New ListItem("Madagascar", "MG"))
Items.Add(New ListItem("Malawi", "MW"))
Items.Add(New ListItem("Malaysia", "MY"))
Items.Add(New ListItem("Maldives", "MV"))
Items.Add(New ListItem("Mali", "ML"))
Items.Add(New ListItem("Malta", "MT"))
Items.Add(New ListItem("Marshall Islands", "MH"))
Items.Add(New ListItem("Martinique", "MQ"))
Items.Add(New ListItem("Mauritania", "MR"))
Items.Add(New ListItem("Mauritius", "MU"))
Items.Add(New ListItem("Mayotte", "YT"))
Items.Add(New ListItem("Mexico", "MX"))
Items.Add(New ListItem("Micronesia", "FM"))
Items.Add(New ListItem("Moldova", "MD"))
Items.Add(New ListItem("Monaco", "MC"))
Items.Add(New ListItem("Mongolia", "MN"))
Items.Add(New ListItem("Montserrat", "MS"))
Items.Add(New ListItem("Morocco", "MA"))
Items.Add(New ListItem("Mozambique", "MZ"))
Items.Add(New ListItem("Myanmar", "MM"))
Items.Add(New ListItem("Namibia", "NA"))
Items.Add(New ListItem("Nauru", "NR"))
Items.Add(New ListItem("Nepal", "NP"))
Items.Add(New ListItem("Netherlands", "NL"))
Items.Add(New ListItem("Netherlands Antilles", "AN"))
Items.Add(New ListItem("New Caledonia", "NC"))
Items.Add(New ListItem("New Zealand", "NZ"))
Items.Add(New ListItem("Nicaragua", "NI"))
Items.Add(New ListItem("Niger", "NE"))
Items.Add(New ListItem("Nigeria", "NG"))
Items.Add(New ListItem("Niue", "NU"))
Items.Add(New ListItem("Norfolk Island", "NF"))
Items.Add(New ListItem("North Korea", "KP"))
Items.Add(New ListItem("Northern Ireland", "XB"))
Items.Add(New ListItem("Northern Mariana Islands", "MP"))
Items.Add(New ListItem("Norway", "NO"))
Items.Add(New ListItem("Oman", "OM"))
Items.Add(New ListItem("Pakistan", "PK"))
Items.Add(New ListItem("Palau", "PW"))
Items.Add(New ListItem("Panama", "PA"))
Items.Add(New ListItem("Papua New Guinea", "PG"))
Items.Add(New ListItem("Paraguay", "PY"))
Items.Add(New ListItem("Peru", "PE"))
Items.Add(New ListItem("Philippines", "PH"))
Items.Add(New ListItem("Pitcairn", "PN"))
Items.Add(New ListItem("Poland", "PL"))
Items.Add(New ListItem("Portugal", "PT"))
Items.Add(New ListItem("Puerto Rico", "PR"))
Items.Add(New ListItem("Qatar", "QA"))
Items.Add(New ListItem("Reunion", "RE"))
Items.Add(New ListItem("Romania", "RO"))
Items.Add(New ListItem("Russia", "RU"))
Items.Add(New ListItem("Rwanda", "RW"))
Items.Add(New ListItem("Saint Lucia", "LC"))
Items.Add(New ListItem("San Marino", "SM"))
Items.Add(New ListItem("Sao Tome And Principe", "ST"))
Items.Add(New ListItem("Saudi Arabia", "SA"))
Items.Add(New ListItem("Scotland", "WY"))
Items.Add(New ListItem("Senegal", "SN"))
Items.Add(New ListItem("Seychelles", "SC"))
Items.Add(New ListItem("Sierra Leone", "SL"))
Items.Add(New ListItem("Singapore", "SG"))
Items.Add(New ListItem("Slovak Republic", "SK"))
Items.Add(New ListItem("Slovenia", "SI"))
Items.Add(New ListItem("Solomon Islands", "SB"))
Items.Add(New ListItem("Somalia", "SO"))
Items.Add(New ListItem("South Africa", "ZA"))
Items.Add(New ListItem("South Georgia", "GS"))
Items.Add(New ListItem("Spain", "ES"))
Items.Add(New ListItem("Sri Lanka", "LK"))
Items.Add(New ListItem("St. Helena", "SH"))
Items.Add(New ListItem("St. Kitts & Nevis", "KN"))
Items.Add(New ListItem("St. Pierre", "PM"))
Items.Add(New ListItem("St. Vincent & The Grenadines", "VC"))
Items.Add(New ListItem("Sudan", "SD"))
Items.Add(New ListItem("Suriname", "SR"))
Items.Add(New ListItem("Svalbard And Jan Mayen Islands",
"SJ"))
Items.Add(New ListItem("Swaziland", "SZ"))
Items.Add(New ListItem("Sweden", "SE"))
Items.Add(New ListItem("Switzerland", "CH"))
Items.Add(New ListItem("Syria", "SY"))
Items.Add(New ListItem("Taiwan", "TW"))
Items.Add(New ListItem("Tajikistan", "TJ"))
Items.Add(New ListItem("Tanzania", "TZ"))
Items.Add(New ListItem("Thailand", "TH"))
Items.Add(New ListItem("Togo", "TG"))
Items.Add(New ListItem("Tokelau", "TK"))
Items.Add(New ListItem("Tonga", "TO"))
Items.Add(New ListItem("Trinidad And Tobago", "TT"))
Items.Add(New ListItem("Tunisia", "TN"))
Items.Add(New ListItem("Turkey", "TR"))
Items.Add(New ListItem("Turkmenistan", "TM"))
Items.Add(New ListItem("Turks And Caicos Islands", "TC"))
Items.Add(New ListItem("Tuvalu", "TV"))
Items.Add(New ListItem("U.S. Minor Outlying Islands", "UM"))
Items.Add(New ListItem("U.S.A.", "US"))
Items.Add(New ListItem("Uganda", "UG"))
Items.Add(New ListItem("Ukraine", "UA"))
Items.Add(New ListItem("United Arab Emirates", "AE"))
Items.Add(New ListItem("United Kingdom", "GB"))
Items.Add(New ListItem("Uruguay", "UY"))
Items.Add(New ListItem("Uzbekistan", "UZ"))
Items.Add(New ListItem("Vanuatu", "VU"))
Items.Add(New ListItem("Vatican City State", "VA"))
Items.Add(New ListItem("Venezuela", "VE"))
Items.Add(New ListItem("Viet Nam", "VN"))
Items.Add(New ListItem("Virgin Islands (British)", "VG"))
Items.Add(New ListItem("Virgin Islands (U.S.)", "VI"))
Items.Add(New ListItem("Wales", "WX"))
Items.Add(New ListItem("Wallis And Futuna Islands", "WF"))
Items.Add(New ListItem("Western Sahara", "EH"))
Items.Add(New ListItem("Western Samoa", "WS"))
Items.Add(New ListItem("Yemen", "YE"))
Items.Add(New ListItem("Yugoslavia", "YU"))
Items.Add(New ListItem("Zambia", "ZM"))
Items.Add(New ListItem("Zimbabwe", "ZW"))
MyBase.OnPreRender(e)
End Sub

Protected Overrides Function SaveViewState() As Object

End Function

Protected Overrides Sub LoadViewState(ByVal savedState As Object)

End Sub
End ClassThis question is better answered in .dotnet.framework.aspnet.

Anyway, take a look at this caching article. It should prove useful.

--
-oj
http://www.rac4sql.net

"Versteijn" <versteijn@.538mail.nl> wrote in message
news:4d19834f.0402290936.79156a16@.posting.google.c om...
> Hello all
> I am developing a CountrySelector control (which I would like to share
> with anyone), but I am quite a newby in this custom control area.
> You can find it at:
> http://home.kabelfoon.nl/~juliusd/v...ntrySelector.vb
> Some questions I have are:
> - In what event should the items be added. In this case (PreRender)
> items added on every render (duh) and get duplicated when ViewState is
> enabled. Best would be if the items show up in the designer already
> but only in designmode and not with <ListItem> in the HTML source.
> - How can I override ViewState get/set methods to only save the
> current selection and not the whole collection? It will also need to
> save whether it is the first render (for the use of the DefaultCountry
> property)
> - What behaviour to expect when an invalid countrycode is selected by
> consuming (.net) code (e.g. in the DefaultCountry property)?
> - Is it possible to use System.Globalization to populate the
> collection with country(code)'s?
> Thank you in advance.
> Hope to hear from you
> Freek Versteijn
>
> Here is the concept code:
>
> Imports System.ComponentModel
> Imports System.Web.UI
> Imports System.Web.UI.WebControls
> <ToolboxData("<{0}:CountrySelector
> runat=server></{0}:CountrySelector>")> Public Class CountrySelector
> Inherits System.Web.UI.WebControls.DropDownList
> Protected _DefaultCountry As String
> <Description("The initial country's code")> _
> Public Property DefaultCountry() As String
> Get
> Return _DefaultCountry
> End Get
> Set(ByVal Value As String)
> _DefaultCountry = ("" & Value).ToUpper()
> End Set
> End Property
> 'TODO:
> ' [ ] Move adding of items to other method?
> ' [ ] Show DefaultCountry at first render
> ' [ ] ViewState to only save the selected item
> ' [ ] Use System.Globalization (RegionInfo.DisplayName or
> .EnglishName depending on CurrentCulture) for populating the Items
> collection if possible
> Protected Overrides Sub OnPreRender(ByVal e As EventArgs)
> Items.Add(New ListItem("Albania", "AL"))
> Items.Add(New ListItem("Algeria", "DZ"))
> Items.Add(New ListItem("American Samoa", "AS"))
> Items.Add(New ListItem("Andorra", "AD"))
> Items.Add(New ListItem("Angola", "AO"))
> Items.Add(New ListItem("Anguilla", "AI"))
> Items.Add(New ListItem("Antarctica", "AQ"))
> Items.Add(New ListItem("Antigua/Barbuda", "AG"))
> Items.Add(New ListItem("Argentina", "AR"))
> Items.Add(New ListItem("Armenia", "AM"))
> Items.Add(New ListItem("Aruba", "AW"))
> Items.Add(New ListItem("Australia", "AU"))
> Items.Add(New ListItem("Austria", "AT"))
> Items.Add(New ListItem("Azerbaijan", "AZ"))
> Items.Add(New ListItem("Bahamas", "BS"))
> Items.Add(New ListItem("Bahrain", "BH"))
> Items.Add(New ListItem("Bangladesh", "BD"))
> Items.Add(New ListItem("Barbados", "BB"))
> Items.Add(New ListItem("Belarus", "BY"))
> Items.Add(New ListItem("Belgium", "BE"))
> Items.Add(New ListItem("Belize", "BZ"))
> Items.Add(New ListItem("Benin", "BJ"))
> Items.Add(New ListItem("Bermuda", "BM"))
> Items.Add(New ListItem("Bhutan", "BT"))
> Items.Add(New ListItem("Bolivia", "BO"))
> Items.Add(New ListItem("Bosnia", "BA"))
> Items.Add(New ListItem("Botswana", "BW"))
> Items.Add(New ListItem("Bouvet Island", "BV"))
> Items.Add(New ListItem("Brazil", "BR"))
> Items.Add(New ListItem("British Indian Ocean Territory",
> "IO"))
> Items.Add(New ListItem("British West Indies", "WI"))
> Items.Add(New ListItem("Brunei Darussalam", "BN"))
> Items.Add(New ListItem("Bulgaria", "BG"))
> Items.Add(New ListItem("Burkina Faso", "BF"))
> Items.Add(New ListItem("Burma", "BU"))
> Items.Add(New ListItem("Burundi", "BI"))
> Items.Add(New ListItem("Cambodia", "KH"))
> Items.Add(New ListItem("Cameroon", "CM"))
> Items.Add(New ListItem("Canada", "CA"))
> Items.Add(New ListItem("Cape Verde", "CV"))
> Items.Add(New ListItem("Cayman Islands", "KY"))
> Items.Add(New ListItem("Central Africa", "CF"))
> Items.Add(New ListItem("Chad", "TD"))
> Items.Add(New ListItem("Chile", "CL"))
> Items.Add(New ListItem("China", "CN"))
> Items.Add(New ListItem("Christmas Island", "CX"))
> Items.Add(New ListItem("Cocos (Keeling) Islands", "CC"))
> Items.Add(New ListItem("Colombia", "CO"))
> Items.Add(New ListItem("Comoros", "KM"))
> Items.Add(New ListItem("Congo", "CG"))
> Items.Add(New ListItem("Cook Islands", "CK"))
> Items.Add(New ListItem("Costa Rica", "CR"))
> Items.Add(New ListItem("Cote D'Ivoire", "CI"))
> Items.Add(New ListItem("Croatia", "HR"))
> Items.Add(New ListItem("Cuba", "CU"))
> Items.Add(New ListItem("Cyprus", "CY"))
> Items.Add(New ListItem("Czech Republic", "CZ"))
> Items.Add(New ListItem("Denmark", "DK"))
> Items.Add(New ListItem("Djibouti", "DJ"))
> Items.Add(New ListItem("Dominica", "DM"))
> Items.Add(New ListItem("Dominican Republic", "DO"))
> Items.Add(New ListItem("East Timor", "TP"))
> Items.Add(New ListItem("Ecuador", "EC"))
> Items.Add(New ListItem("Egypt", "EG"))
> Items.Add(New ListItem("El Salvador", "SV"))
> Items.Add(New ListItem("Equatorial Guinea", "GQ"))
> Items.Add(New ListItem("Eritrea", "ER"))
> Items.Add(New ListItem("Estonia", "EE"))
> Items.Add(New ListItem("Ethiopia", "ET"))
> Items.Add(New ListItem("Faeroe Islands", "FO"))
> Items.Add(New ListItem("Falkland Islands", "FK"))
> Items.Add(New ListItem("Fiji", "FJ"))
> Items.Add(New ListItem("Finland", "FI"))
> Items.Add(New ListItem("France", "FR"))
> Items.Add(New ListItem("French Polynesia", "PF"))
> Items.Add(New ListItem("French Southern Territories", "TF"))
> Items.Add(New ListItem("Gabon", "GA"))
> Items.Add(New ListItem("Gambia", "GM"))
> Items.Add(New ListItem("Gaza", "XA"))
> Items.Add(New ListItem("Georgia", "GE"))
> Items.Add(New ListItem("Germany", "DE"))
> Items.Add(New ListItem("Ghana", "GH"))
> Items.Add(New ListItem("Gibraltar", "GI"))
> Items.Add(New ListItem("Greece", "GR"))
> Items.Add(New ListItem("Greenland", "GL"))
> Items.Add(New ListItem("Grenada", "GD"))
> Items.Add(New ListItem("Guadeloupe", "GP"))
> Items.Add(New ListItem("Guam", "GU"))
> Items.Add(New ListItem("Guatemala", "GT"))
> Items.Add(New ListItem("Guiana", "GF"))
> Items.Add(New ListItem("Guinea", "GN"))
> Items.Add(New ListItem("Guinea-Bissau", "GW"))
> Items.Add(New ListItem("Guyana", "GY"))
> Items.Add(New ListItem("Haiti", "HT"))
> Items.Add(New ListItem("Heard And Mcdonald Islands", "HM"))
> Items.Add(New ListItem("Held Territories", "XH"))
> Items.Add(New ListItem("Honduras", "HN"))
> Items.Add(New ListItem("Hong Kong", "HK"))
> Items.Add(New ListItem("Hungary", "HU"))
> Items.Add(New ListItem("Iceland", "IS"))
> Items.Add(New ListItem("India", "IN"))
> Items.Add(New ListItem("Indian Ocean Islands", "XI"))
> Items.Add(New ListItem("Indonesia", "ID"))
> Items.Add(New ListItem("Iran", "IN"))
> Items.Add(New ListItem("Iraq", "IQ"))
> Items.Add(New ListItem("Ireland", "IE"))
> Items.Add(New ListItem("Israel", "IL"))
> Items.Add(New ListItem("Italy", "IT"))
> Items.Add(New ListItem("Jamaica", "JM"))
> Items.Add(New ListItem("Japan", "JP"))
> Items.Add(New ListItem("Jordan", "JO"))
> Items.Add(New ListItem("Kazakhstan", "KZ"))
> Items.Add(New ListItem("Kenya", "KE"))
> Items.Add(New ListItem("Kiribati", "KI"))
> Items.Add(New ListItem("Korea", "KR"))
> Items.Add(New ListItem("Kuwait", "KW"))
> Items.Add(New ListItem("Kyrgyzstan", "KG"))
> Items.Add(New ListItem("Laos", "LA"))
> Items.Add(New ListItem("Latvia", "LV"))
> Items.Add(New ListItem("Lebanon", "LB"))
> Items.Add(New ListItem("Lesotho", "LS"))
> Items.Add(New ListItem("Liberia", "LR"))
> Items.Add(New ListItem("Libya", "LY"))
> Items.Add(New ListItem("Liechtenstein", "LI"))
> Items.Add(New ListItem("Lithuania", "LT"))
> Items.Add(New ListItem("Luxembourg", "LU"))
> Items.Add(New ListItem("Macau", "MO"))
> Items.Add(New ListItem("Macedonia", "MK"))
> Items.Add(New ListItem("Madagascar", "MG"))
> Items.Add(New ListItem("Malawi", "MW"))
> Items.Add(New ListItem("Malaysia", "MY"))
> Items.Add(New ListItem("Maldives", "MV"))
> Items.Add(New ListItem("Mali", "ML"))
> Items.Add(New ListItem("Malta", "MT"))
> Items.Add(New ListItem("Marshall Islands", "MH"))
> Items.Add(New ListItem("Martinique", "MQ"))
> Items.Add(New ListItem("Mauritania", "MR"))
> Items.Add(New ListItem("Mauritius", "MU"))
> Items.Add(New ListItem("Mayotte", "YT"))
> Items.Add(New ListItem("Mexico", "MX"))
> Items.Add(New ListItem("Micronesia", "FM"))
> Items.Add(New ListItem("Moldova", "MD"))
> Items.Add(New ListItem("Monaco", "MC"))
> Items.Add(New ListItem("Mongolia", "MN"))
> Items.Add(New ListItem("Montserrat", "MS"))
> Items.Add(New ListItem("Morocco", "MA"))
> Items.Add(New ListItem("Mozambique", "MZ"))
> Items.Add(New ListItem("Myanmar", "MM"))
> Items.Add(New ListItem("Namibia", "NA"))
> Items.Add(New ListItem("Nauru", "NR"))
> Items.Add(New ListItem("Nepal", "NP"))
> Items.Add(New ListItem("Netherlands", "NL"))
> Items.Add(New ListItem("Netherlands Antilles", "AN"))
> Items.Add(New ListItem("New Caledonia", "NC"))
> Items.Add(New ListItem("New Zealand", "NZ"))
> Items.Add(New ListItem("Nicaragua", "NI"))
> Items.Add(New ListItem("Niger", "NE"))
> Items.Add(New ListItem("Nigeria", "NG"))
> Items.Add(New ListItem("Niue", "NU"))
> Items.Add(New ListItem("Norfolk Island", "NF"))
> Items.Add(New ListItem("North Korea", "KP"))
> Items.Add(New ListItem("Northern Ireland", "XB"))
> Items.Add(New ListItem("Northern Mariana Islands", "MP"))
> Items.Add(New ListItem("Norway", "NO"))
> Items.Add(New ListItem("Oman", "OM"))
> Items.Add(New ListItem("Pakistan", "PK"))
> Items.Add(New ListItem("Palau", "PW"))
> Items.Add(New ListItem("Panama", "PA"))
> Items.Add(New ListItem("Papua New Guinea", "PG"))
> Items.Add(New ListItem("Paraguay", "PY"))
> Items.Add(New ListItem("Peru", "PE"))
> Items.Add(New ListItem("Philippines", "PH"))
> Items.Add(New ListItem("Pitcairn", "PN"))
> Items.Add(New ListItem("Poland", "PL"))
> Items.Add(New ListItem("Portugal", "PT"))
> Items.Add(New ListItem("Puerto Rico", "PR"))
> Items.Add(New ListItem("Qatar", "QA"))
> Items.Add(New ListItem("Reunion", "RE"))
> Items.Add(New ListItem("Romania", "RO"))
> Items.Add(New ListItem("Russia", "RU"))
> Items.Add(New ListItem("Rwanda", "RW"))
> Items.Add(New ListItem("Saint Lucia", "LC"))
> Items.Add(New ListItem("San Marino", "SM"))
> Items.Add(New ListItem("Sao Tome And Principe", "ST"))
> Items.Add(New ListItem("Saudi Arabia", "SA"))
> Items.Add(New ListItem("Scotland", "WY"))
> Items.Add(New ListItem("Senegal", "SN"))
> Items.Add(New ListItem("Seychelles", "SC"))
> Items.Add(New ListItem("Sierra Leone", "SL"))
> Items.Add(New ListItem("Singapore", "SG"))
> Items.Add(New ListItem("Slovak Republic", "SK"))
> Items.Add(New ListItem("Slovenia", "SI"))
> Items.Add(New ListItem("Solomon Islands", "SB"))
> Items.Add(New ListItem("Somalia", "SO"))
> Items.Add(New ListItem("South Africa", "ZA"))
> Items.Add(New ListItem("South Georgia", "GS"))
> Items.Add(New ListItem("Spain", "ES"))
> Items.Add(New ListItem("Sri Lanka", "LK"))
> Items.Add(New ListItem("St. Helena", "SH"))
> Items.Add(New ListItem("St. Kitts & Nevis", "KN"))
> Items.Add(New ListItem("St. Pierre", "PM"))
> Items.Add(New ListItem("St. Vincent & The Grenadines", "VC"))
> Items.Add(New ListItem("Sudan", "SD"))
> Items.Add(New ListItem("Suriname", "SR"))
> Items.Add(New ListItem("Svalbard And Jan Mayen Islands",
> "SJ"))
> Items.Add(New ListItem("Swaziland", "SZ"))
> Items.Add(New ListItem("Sweden", "SE"))
> Items.Add(New ListItem("Switzerland", "CH"))
> Items.Add(New ListItem("Syria", "SY"))
> Items.Add(New ListItem("Taiwan", "TW"))
> Items.Add(New ListItem("Tajikistan", "TJ"))
> Items.Add(New ListItem("Tanzania", "TZ"))
> Items.Add(New ListItem("Thailand", "TH"))
> Items.Add(New ListItem("Togo", "TG"))
> Items.Add(New ListItem("Tokelau", "TK"))
> Items.Add(New ListItem("Tonga", "TO"))
> Items.Add(New ListItem("Trinidad And Tobago", "TT"))
> Items.Add(New ListItem("Tunisia", "TN"))
> Items.Add(New ListItem("Turkey", "TR"))
> Items.Add(New ListItem("Turkmenistan", "TM"))
> Items.Add(New ListItem("Turks And Caicos Islands", "TC"))
> Items.Add(New ListItem("Tuvalu", "TV"))
> Items.Add(New ListItem("U.S. Minor Outlying Islands", "UM"))
> Items.Add(New ListItem("U.S.A.", "US"))
> Items.Add(New ListItem("Uganda", "UG"))
> Items.Add(New ListItem("Ukraine", "UA"))
> Items.Add(New ListItem("United Arab Emirates", "AE"))
> Items.Add(New ListItem("United Kingdom", "GB"))
> Items.Add(New ListItem("Uruguay", "UY"))
> Items.Add(New ListItem("Uzbekistan", "UZ"))
> Items.Add(New ListItem("Vanuatu", "VU"))
> Items.Add(New ListItem("Vatican City State", "VA"))
> Items.Add(New ListItem("Venezuela", "VE"))
> Items.Add(New ListItem("Viet Nam", "VN"))
> Items.Add(New ListItem("Virgin Islands (British)", "VG"))
> Items.Add(New ListItem("Virgin Islands (U.S.)", "VI"))
> Items.Add(New ListItem("Wales", "WX"))
> Items.Add(New ListItem("Wallis And Futuna Islands", "WF"))
> Items.Add(New ListItem("Western Sahara", "EH"))
> Items.Add(New ListItem("Western Samoa", "WS"))
> Items.Add(New ListItem("Yemen", "YE"))
> Items.Add(New ListItem("Yugoslavia", "YU"))
> Items.Add(New ListItem("Zambia", "ZM"))
> Items.Add(New ListItem("Zimbabwe", "ZW"))
> MyBase.OnPreRender(e)
> End Sub
> Protected Overrides Function SaveViewState() As Object
> End Function
> Protected Overrides Sub LoadViewState(ByVal savedState As Object)
> End Sub
> End Class|||versteijn@.538mail.nl (Versteijn) wrote in message news:<4d19834f.0402290936.79156a16@.posting.google.com>...
> Hello all
> I am developing a CountrySelector control (which I would like to share
> with anyone), but I am quite a newby in this custom control area.
> You can find it at:
> http://home.kabelfoon.nl/~juliusd/v...ntrySelector.vb

This is odd. I swear I posted it to the aspnet and buildingcontrols forums :S

Anyway thank you.

Freek Versteijn