domingo, 28 de fevereiro de 2010

Asp.Net Dynamic Data - Ordenando e Definindo os campos para filtros de chave estrangeira

Fala, galera!!

Quando definimos um filtro cuja a origem é uma chave estrangeira o Dynamic Data gera uma combo.
Isto é definido pelo usercontrol ForeignKey.ascx que fica no diretório FilterTemplates.

Por padrão, o campo exibido na propriedade "Text" do dropdown é sempre o primeiro campo logo após a chave primária.

Mas como definir manualmente a propriedade "Text" de cada item da combo e a ordem com que os mesmos aparecerão?

Simples!

Basta adicionar o seguinte código no metadata da tabela origem da chave estrangeira. Ou seja, onde ela é a chave primária.


<DisplayColumn("Descricao", "Descricao", False)> _
    <MetadataType(GetType(Evento_Metadata))> _

O código em negrito é o que deve ser adicionado logo acima da declaração do MetadataType.

Desta forma, seu Dropdownlist ou seu listbox exibirão o campo "Descricao" e serão ordenados pelo mesmo campo por ordem alfabética.

OBS: No exemplo acima utilizei o relacionamento entre uma tabela chamada "Log" e outra chamada "Evento" e inseri um filtro por "Evento" na tabela de Log.


Um abraço e até a próxima!!

sábado, 27 de fevereiro de 2010

ASP.Net Dynamic Data - Inserindo Regras de Negócio

Fala, galera!!

Há alguns meses comecei a estudar o Asp.Net Dynamic Data e escrevi aqui um post sobre como aplicar regras de negócio nos formulários de inclusão/alteração de dados.

Confesso que não era a melhor prática, mas resolvia. :)
Estava no início do estudo da ferramenta e, por ser uma ferramenta nova, ainda não existiam muitos tutoriais na web.

Mas agora, vamos a forma mais correta, rápida e simples de se implementar uma regra de negócio no Asp.Net Dynamic Data.

Como exemplo, vou utilizar uma tabela de parametrização das mensagens de uma ferramenta que desenvolvi.

Ao abrir o arquivo "designer.vb" do meu arquivo dbml, vou até a classe "ParametrosDeSistema" que é o nome da minha tabela e procuro pela Region "Extensibility Method Definitions". Veja a imagem abaixo:



















A imagem acima mostra uma série de métodos parciais que podem ser implementados dentro da classe de metadados.
Para cada propriedade da sua classe existe um método "OnChanging" e "OnChanged".

Vamos agora implementar uma regra onde iremos definir que o atributo TempoDuracaoToken não pode receber valor menor do que 3.

Dentro de nosso arquivo de metadados iremos inserir o código abaixo:

Estou supondo que você já sabe o que é um arquivo de metadados.

Agora veja o que acontece quando tentamos inserir um valor que não atenda nossa regra de negócio:









Simples, não?

Um abraço e até a próxima!!

Utilizando Timer em um Windows Service

Fala, galera!!

Hoje vou postar uma solução para o problema do Timer em um windows service.
O problema é que o Timer simplesmente não funciona. Legal, não? :)

Pois é. Precisei criar um serviço de monitoração e, para isso, utilizei o Timer para que o monitoramento fosse executado no período especificado.

O processo de adição do Timer é o que nós já conhecemos: Arrastar o controle "Timer" da aba "Components" da Toolbox.

O problema é que o serviço ignorava o Timer e a monitoração não era realizada.

Pesquisando na internet, descobri que algumas pessoas passaram pelo mesmo problema.

Das soluções propostas, segue a mais simples e que, de fato, funciona:

Primeiro: Exclua o Timer que você já havia adicionado. :)

Declare o objeto privado oTimer:
Private oTimer As System.Threading.Timer

No envento On_Start do seu serviço adicione o seguinte código:


Dim oCallback As New TimerCallback(AddressOf OnTimedEvent)
oTimer = New System.Threading.Timer(oCallback, Nothing, 60000, 60000)

Em seguida crie o método OnTimedEvent e implemente o código que desejar que seja executada em cada "Tick" do timer.

Private Sub OnTimedEvent(ByVal state As Object)
   'Adicione aqui seu código
End Sub


Um abraço e até a próxima!!

sexta-feira, 26 de fevereiro de 2010

Trabalhando com Threads no Asp.net

Fala, galera!!

Hoje escreverei sobre o uso de Threads no .net.
A grosso modo, uma thread nada mais é do que uma linha de execução de um processo.

Esta semana me deparei com a seguinte situação:
Uma aplicação windows que realiza uma carga grande de dados para uma base SQL Server.
Durante a carga, a janela do aplicativo ficava congelada e no título da janela aparecia o seguinte texto: "Não Respondendo".

A carga continuava sendo feita, mas o usuário tinha a sensação de que o programa tinha travado.
Para acabar com essa sensação era necessário dar um feedback para o usuário sobre o andamento da carga.
Mas nada funcionava, pois a janela ficava congelada.

A solução foi trabalhar com Threads.
Sendo assim, alterei o código para que executasse o método de carga em uma nova Thread.
Enquanto a Thread "principal" apenas monitorava a carga, incrementando um contador e manipulando uma barra de progresso.

Segue o código para a criação da nova Thread:


Dim Thread As New System.Threading.Thread(AddressOf ProcessarCarga)
Thread.Start()

O parâmetro AddressOf recebe o nome do método que será executado na nova Thread.

Desta forma todo o processamento da carga foi executado em "background".
Isto é, em uma thread separada da thread principal que deu origem ao aplicativo.
Isso impediu o congelamento da janela, fazendo com que o feedback para o usuário fosse viável.

Para o feedback, inseri um Timer que monitorava a carga a cada 1 segundo, obtinha o total de registros inseridos para incrementar o contador e ajustava a barra de progresso.

É isso ae!! Um abraço e até a próxima!!

terça-feira, 9 de fevereiro de 2010

Criando Cache de Dados em Asp.net

 Fala, galera!!

Após um longo período de inatividade, hoje estarei postando um código para gerar cache de dados em webservices, serviços criados utilizando o WCF ou aplicações web.

O objetivo é gerar um cache de consultas para evitar acessos constantes ao banco de dados.

Por exemplo:

Imaginemos uma aplicação que possui um método para consultar o CPF de um usuário de acordo com o login do mesmo.

Sabemos que o CPF é uma informação que nunca muda. Portanto, ao invés de acessarmos o banco de dados cada vez que o método for executado, por que não gerarmos um cache dessa informação?

Veja o código:


Public Function ObterCPFUsuario( ByVal Login As String) As String
            'Se houver Cache, a função retorna o valor armazenado no cache.
            If Not IsNothing(HttpContext.Current.Cache("CPF_" & Login)) Then
                Return HttpContext.Current.Cache("CPF_" & Login)
            End If
            'Se não houver Cache, a função realiza a consulta no banco e armazena o resultado no cache
            Dim conn as new Sqlconnection
            Dim cmd as new SqlCommand
            Dim dr as SqlDataReader
            Dim CPF as string
            conn.ConnectionString = "String de conexao"
            conn.open()
            cmd.Connection = conn
            cmd.CommandText = "Select CPF From Usuario Where Login ='" & Login & "'"
            dr = cmd.ExecuteReader()
            if dr.Read() then
               CPF = dr(0)
            end if
            'Armazenando o resultado em um cache que nunca expira
            HttpContext.Current.Cache.Add("CPF_" & Login, CPF, Nothing, DateTime.MaxValue, System.Web.Caching.Cache.NoSlidingExpiration, CacheItemPriority.Normal, Nothing)

            Return CPF
End Function


No exemplo acima, o cache nunca expira pois sabemos que o CPF nunca irá mudar.
Mas você pode estipular um período de validade para o seu cache.

Um abraço e até a próxima!!