problem iterating through controls on a web form.

[Milsnips]

hi there,

i have a strange problem. I want to programatically loop through each
control on a page, but am having issues.

my test example:

1. header.ascx - the ascx control finds all the child controls no problems

2. default.aspx - i dont find any controls that are placed directly on the
form.

i call the function as follows

AddControlsToDa tabase(Me) - this is placed on every page_ for both ASPX
pages and ASCX pages.
my function is as follows:
Sub AddControlsToDa tabase(ByVal mypage As Object)
For Each c As Control In mypage.controls
'hyperlink
If TypeOf c Is HyperLink Then
Dim l As HyperLink = CType(c, HyperLink)
'...my code goes here...
End If
'Button
If TypeOf c Is Button Then
Dim l As Button = CType(c, Button)
'...my code goes here...
End If
Next
End Sub

Any help is appreciated in why this doesnt pickup the ASPX page controls
within the Controls collection.

thanks,

Paul.

[Scott M.]

For Each Control In Me.Controls

Next
"Milsnips" <mi******@hotma il.com> wrote in message
news:ej******** ******@TK2MSFTN GP09.phx.gbl...

hi there,

i have a strange problem. I want to programatically loop through each
control on a page, but am having issues.

my test example:

1. header.ascx - the ascx control finds all the child controls no
problems

2. default.aspx - i dont find any controls that are placed directly on
the
form.

i call the function as follows

AddControlsToDa tabase(Me) - this is placed on every page_ for both ASPX
pages and ASCX pages.
my function is as follows:
Sub AddControlsToDa tabase(ByVal mypage As Object)
For Each c As Control In mypage.controls
'hyperlink
If TypeOf c Is HyperLink Then
Dim l As HyperLink = CType(c, HyperLink)
'...my code goes here...
End If
'Button
If TypeOf c Is Button Then
Dim l As Button = CType(c, Button)
'...my code goes here...
End If
Next
End Sub

Any help is appreciated in why this doesnt pickup the ASPX page controls
within the Controls collection.

thanks,

Paul.

[Milsnips]

thanks.. problem solved.

"Scott M." <s-***@nospam.nosp am> wrote in message
news:OE******** *****@TK2MSFTNG P10.phx.gbl...

For Each Control In Me.Controls

Next
"Milsnips" <mi******@hotma il.com> wrote in message
news:ej******** ******@TK2MSFTN GP09.phx.gbl...

hi there,

i have a strange problem. I want to programatically loop through each
control on a page, but am having issues.

my test example:

1. header.ascx - the ascx control finds all the child controls no
problems

2. default.aspx - i dont find any controls that are placed directly on
the
form.

i call the function as follows

AddControlsToDa tabase(Me) - this is placed on every page_ for both ASPX
pages and ASCX pages.
my function is as follows:
Sub AddControlsToDa tabase(ByVal mypage As Object)
For Each c As Control In mypage.controls
'hyperlink
If TypeOf c Is HyperLink Then
Dim l As HyperLink = CType(c, HyperLink)
'...my code goes here...
End If
'Button
If TypeOf c Is Button Then
Dim l As Button = CType(c, Button)
'...my code goes here...
End If
Next
End Sub

Any help is appreciated in why this doesnt pickup the ASPX page controls
within the Controls collection.

thanks,

Paul.

[Shiva]

For .aspx pages, the controls are placed inside the form (<form> tag), not
at the page level itself. So, you have to loop through the Controls
collection of the form control instance.

Dim f As HtmlForm = Me.FindControl (<form tag id>)
For Each c As Control in f.Controls
....
If TypeOf c Is Button Then
End If
....
Next

As discussed earlier in the group, you may have to use recursion to
loop-through controls inside a container control which could be a member of
a Controls collection.

HTH

"Milsnips" <mi******@hotma il.com> wrote in message
news:ej******** ******@TK2MSFTN GP09.phx.gbl...
hi there,

i have a strange problem. I want to programatically loop through each
control on a page, but am having issues.

my test example:

1. header.ascx - the ascx control finds all the child controls no problems

2. default.aspx - i dont find any controls that are placed directly on the
form.

i call the function as follows

AddControlsToDa tabase(Me) - this is placed on every page_ for both ASPX
pages and ASCX pages.
my function is as follows:
Sub AddControlsToDa tabase(ByVal mypage As Object)
For Each c As Control In mypage.controls
'hyperlink
If TypeOf c Is HyperLink Then
Dim l As HyperLink = CType(c, HyperLink)
'...my code goes here...
End If
'Button
If TypeOf c Is Button Then
Dim l As Button = CType(c, Button)
'...my code goes here...
End If
Next
End Sub

Any help is appreciated in why this doesnt pickup the ASPX page controls
within the Controls collection.

thanks,

Paul.

[Scott M.]

Your welcome...Good luck!

"Milsnips" <mi******@hotma il.com> wrote in message
news:%2******** ********@TK2MSF TNGP09.phx.gbl. ..

thanks.. problem solved.

"Scott M." <s-***@nospam.nosp am> wrote in message
news:OE******** *****@TK2MSFTNG P10.phx.gbl...

For Each Control In Me.Controls

Next
"Milsnips" <mi******@hotma il.com> wrote in message
news:ej******** ******@TK2MSFTN GP09.phx.gbl...

> hi there,
>
> i have a strange problem. I want to programatically loop through each
> control on a page, but am having issues.
>
> my test example:
>
> 1. header.ascx - the ascx control finds all the child controls no
> problems
>
> 2. default.aspx - i dont find any controls that are placed directly
> on
> the
> form.
>
> i call the function as follows
>
> AddControlsToDa tabase(Me) - this is placed on every page_ for both
> ASPX
> pages and ASCX pages.
>
>
> my function is as follows:
> Sub AddControlsToDa tabase(ByVal mypage As Object)
> For Each c As Control In mypage.controls
> 'hyperlink
> If TypeOf c Is HyperLink Then
> Dim l As HyperLink = CType(c, HyperLink)
> '...my code goes here...
> End If
>
>
> 'Button
> If TypeOf c Is Button Then
> Dim l As Button = CType(c, Button)
> '...my code goes here...
> End If
> Next
> End Sub
>
>
>
> Any help is appreciated in why this doesnt pickup the ASPX page
> controls
> within the Controls collection.
>
> thanks,
>
> Paul.
>
>