Depois de receber várias dúvidas via E-Mail, e selecionar algumas dúvidas dos Fóruns que participo, resolvi escrever este artigo colocando diversas funcionalidades que precisamos no dia-à-dia que muitas das vezes não lembramos como se faz.

Nos baseando em ambiente Web, criarei uma WebApplication para dar exemplos dessas funcionalidades. Os tópicos estarão separados, analisando caso por caso.

---

1 – Como fazer para resgatar valores do arquivo Web.Config

Primeiramente devemos importar o Namespace Configuraton. Depois utilizamos o Propriedade AppSettings da classe ConfigurationSettings passando como parâmetro o nome da Key à ser resgatada.

1 2

Imports System.Configuration Response.Write(ConfigurationSettings.AppSettings(“NomeKEY”))

Código 1 – Resgatando valores do WebConfig.

---

2 – Percorrendo itens de um controle

Algumas vezes precisamos percorrer os itens de algum controle. Quando não podemos utilizar os eventos que façam isso, como o ItemDataBound dos controles DataGrid, DataList ou Repeater, devemos criar uma variável do tipo DataGridItem, DataListItem ou RepeaterItem e juntamente com ela percorremos todos os itens de alguns desses controles através de um laço For…Each. No exemplo abaixo, utilizaremos o evento Click de um Button para percorremos os items de um DataGrid.

1 2 3 4

Dim item As DataGridItem For Each item in Me.dgItens.Items     ‘Aqui você utiliza as proriedades e métodos de cada item. Next

Código 2 – Percorrendo Itens de um Controle.

---

3 – Trabalhando com DropDownList

Quando carregamos controles do tipo DropDownList as vezes precisamos definir quais os valores que aparecerão para o Usuário visualizar e quais ficarão como valores para resgatarmos e fazermos comparações ou até mesmo, gravar na Base de Dados. Além disso, precisamos colocar valores Defaults, exemplo: “Selecione…”. Abaixo veremos como podemos fazer isso:

1 2 3 4 5 6

Me.cboVeiculos.DataValueField = “VeiculoID” Me.cboVeiculos.DataTextField = “Nome” Me.cboVeiculos.DataSource = cmd.ExecuteReader(CommandBehavior.CloseConnection) Me.cboVeiculos.DataBind() Me.cboVeiculos.Items.Insert(0, “Selecione…”) Me.cboVeiculos.SelectedIndex = Me.cboVeiculos.Items.IndexOf(Me.cboVeiculos.Items.FindByText(“Golf”))

Código 3 – Percorrendo Itens de um Controle.

OBS.: Nas propriedades DataValueField e DataTextField recebem os campos da Tabela da Base de Dados ou as Propriedades de uma Coleção. Utilizando o método Insert da Propriedade Items passamos a posição qual queremos que seja inserida. No caso acima, coloquei-o na primeira posição à aparecer no DropDownList. Além de tudo isso, ainda podemos posicionar o DropDownList em alguma posição qualquer, deixando à vista um determinado item. Para isso utilize o método FindByText e passe como parâmetro o texto que deseja que fique à mostra. Se você não tiver o valor do Texto, pode utilizar o outro método chamado FindByValue, que faz a mesma coisa, mas baseia a busca nos valores internos do DropDownList.

---

4 – Limpando todos os valores dos TextBox do WebForm

Para que seja possível limpar todos os valores dos controles do tipo TextBox do WebForm, é necessário a construção de uma função Recursiva, pois temos que levar em consideração que há controles que também podem ter mais controles dentro. Vejamos:

1 2 3 4 5 6 7 8 9 10 11 12 13

Public Sub Limpar(ByVal controlP As Control)     Dim ctl As Control     For Each ctl In controlP.Controls         If TypeOf ctl Is TextBox Then             DirectCast(ctl, TextBox).Text = String.Empty         ElseIf ctl.Controls.Count > 0 Then             Limpar(ctl)         End If     Next End Sub   ‘Para chamar a função: Call Me.Limpar(Me)

Código 4 – Limpando o conteúdo de controles TextBox de um WebForm.

---

5 – Enumeradores

Enumeradores é uma lista de valores constantes, cuja representação é dada por um valor inteiro, começando por 0 (zero). Abaixo veremos como criar uma Enumerador (Enum):

1 2 3 4 5

Public Enum Prioridades     Alta     Normal     Baixa End Enum

Código 5 – Criando Enumeradores.

Depois disso, o Intellisense já passa a nos ajudar. Isso garante com que o programador seja obrigado à escolher entre as opções que estão dentro do Enumerador.

Figura 1 – Utilizando Enumeradores.

---

6 – Utilizando JavaScript nos WebControls

Para utilizar JavaScript em algum WebControl é bem simples. Utilize o método Add da coleção de Atributos para adicionar um script à um determinado contole. Exemplo:

1

Me.btnJS.Attributes.Add(“onClick”, “javascript:alert(‘Botão Pressionado’);“)

Código 6 – Utilizando JavaScript.

Figura 2 – Botão sendo pressionado.

---

7 – Utilizando ListBox

Em alguns casos precisamos dispor ao Usuário algumas opções onde ele possa selecioná-las e em seguida atualizar alguma coleção, Base de Dados, etc. Uma saída bastante interessante seria termos dois ListBox no WebForm e deixarmos o Usuário selecionar e ao clicar em um determinado Button, os items selecionados vão para outro ListBox e depois disso, finaliza-se o processo no clicar de um outro Button. Vejamos a idéia abaixo:

Figura 3 – Utilizando ListBox para seleção de múltiplas opções.

Observação: Não colocarei o código aqui para economizar espaço. Mas ao fazer o downloads no fim do artigo, ele se encontrará incluso.

---

8 – Resgatando o Nome do Arquivo

Muitas vezes temos o arquivo com o seu “path” completo e precisamos resgatar somente o nome desse arquivo. Agora não precisamos mais ficarmos manipulando a String, apenas utilizamos a classe System.IO.Path. Exemplo:

1 2

Dim fileName As String = “C:Diretorio1Diretorio2Arquivo.txt” Response.Write(System.IO.Path.GetFileName(fileName))

Código 7 – Resgatando o nome do arquivo.

---

Conclusão: Bem, espero nesse artigo poder ajudá-los com essas pequenas funcionalidades que sempre precisamos no dia-à-dia no desenvolvimento de sites e sistemas.