COM+ Services em ASP.NET

� muito comum o emprego de componentes COM+ como a camada de neg�cios em aplicaç�es n-tiers. Dessa forma, a nosso conhecimento em desenvolver aplicativos que suportem esta estrutura, torna-se proeminente, tamb�m, na arquitetura .NET. Neste artigo, espero passar o m�nimo para que voc� seja capaz de escrever um componente COM e us�-lo em suas aplicaç�es .NET.

A estrutura do componente

O componente que escreveremos � bastante simples: ele acessar� um banco de dados do SQL Server (Northwind) e retornar� os dados solicitados pelo nosso programa. Os campos da tabela que consultaremos podem ser vistos na Figura 1.

Figura 1. Estrutura da tabela Employees usada em nossos exemplos

Escolhemos a tabela de exemplo do banco de dados SQL Server para facilitar o desenvolvimento deste artigo, j� que a criaç�o de um banco mais detalhado estaria fora do escopo deste artigo. Por�m, voc� pode ficar � vontade para desenvolver esta etapa com qualquer outro banco de dados, desde que saiba acess�-lo via ADO.NET.

Com o banco de dados j� pronto podemos iniciar o desenvolvimento do nosso componente COM. No Visual Studio .NET inicie uma nova aplicaç�o do tipo Class Library e salve com o nome pBusinessComp. Para que possamos acessar e incluir as funcionalidades de um componente COM legado em nosso objeto, devemos referenciar o namespace System.EnterpriseServices em nosso projeto, e adicionarmos adicion�-lo em nossa classe:

Imports System.EnterpriseServices
Imports System.Data
Imports System.Data.SqlClient

Altere o nome da classe para BComp e acrescente os seguintes atributos na declaraç�o da classe, listados na Listagem 1.

ObjectPoolingAttribute(5, 20, 30)> _
Public Class BComp

 Inherits ServicedComponent

Listagem 1. Atributos da classe BComp

O atributo TransactionAttribute nos permite configurar o comportamento do nosso objeto transacional. Em nosso exemplo n�o trabalharemos com modificaç�es nos registros (INSERT, UPDATE, DELETE). Sendo assim, poder�amos omitir este atributo de nossa classe sem nenhuma perda de desempenho.

ObjectPoolingAttribute configura a atuaç�o do pooling de objetos - pense no pooling de objetos como uma esp�cie de reposit�rio de objetos j� criados - do COM+ sobre o nosso componente. E por �ltimo, observe que a nossa classe herda de ServicedComponent, que � a classe base para o desenvolvimento de componentes COM transacionais.

Ap�s ter configurado o comportamento da nossa classe implementaremos um m�todo chamado GetEmployeeInfo. Este m�todo recebe como par�metro um Id num�rico e retorna um DataSet com os dados do banco. Implemente o m�todo como descrito na Listagem 2.


Const strSel = "SELECT EmployeeID, LastName, FirstName, Title 
FROM Employees 
WHERE EmployeeID = " 
Const strConn = "Initial Catalog=Northwind;Data Source=SqlServer;
User id=sa;
password=;"
Public Function GetEmployeeInfo(ByVal number As Integer) 
As DataSet 'Criando os objetos
Dim objConn As New SqlConnection(strConn)
Dim objAdap As New SqlDataAdapter(strSel + 
  Convert.ToString(number), objConn)
Dim dsDados As 
New DataSet 'Recuperando os dados do bd
objConn.Open()
objAdap.Fill(dsDados, "Dados")
'Fechando o banco
objConn.Close()
'Enviando o Dataset
GetClientInfo = dsDados
End Function

Listagem 2. M�todo GetEmployeeInfo

Ap�s ter codificado o componente como exibido nas listagens acima, devemos instal�-lo no cat�logo do COM+. Para isso devemos gerar um Strong Name para nosso componente. Este nome forte, serve como uma chave identificadora exclusiva do nosso componente, sendo pr�-requisito para sua instalaç�o no ambiente COM+. Para criar esta chave, usaremos o utilit�rio de linha de comando sn incluso no Framework .NET.

Para facilitar o uso dos utilit�rios de linha de comando citados no artigo, copie-os para o diret�rio da nossa aplicaç�o.

No console de sua m�quina, entre com o seguinte comando: sn -k BusinessCompKey.snk. Este comando criar� uma chave de nome BusinessCompKey em nosso diret�rio.

O pr�ximo passo ser� referenci�-la em nosso componente. No Solution Explorer aplique um clique duplo sobre o arquivo AssemblyInfo.vb e acrescente a seguinte linha:

AssemblyKeyFile("C:\BusinessCompKey.snk")>

Pronto! agora � dar um Build Solution.

Instalando o componente

Para instalarmos o nosso componente utilizaremos outro utilit�rio de linha de comando do Framework, chamado RegSvcs. Volte � janela de console e entre com o comando regsvcs BusinessComp.dll, que efetuar� a instalaç�o (Figura 2) e configuraç�o do nosso componente seguindo as informaç�es descritas em nosso c�digo.

Figura 2. Componente dispon�vel no cat�logo do COM+

Usando o componente

Para avaliar o funcionamento do nosso componente criaremos uma aplicaç�o ASP.NET que receber� os dados do banco Access. No Visual Studio.NET inicie uma nova aplicaç�o do tipo ASP.NET e salve com o nome WebComApp. Para trabalhar com o componente COM+, nossa aplicaç�o dever� referenciar o namespace System.EnterpriseServices e o assembly BusinessComp.dll. Ap�s ter adicionado as refer�ncias pressione F7, para alternar a visualizaç�o para o c�digo do form e insira a seguinte linha:

Public objCOM As BusinessComp.BComp

Abra a regi�o chamada "Web Form Designer Generated Code" da nossa classe e insira o c�digo da Listagem 3 no m�todo Page_Init. Este c�digo instanciar� o nosso objeto.

Private Sub Page_Init(ByVal sender 
  As System.Object, ByVal e As System.EventArgs) 
  Handles MyBase.Init
  InitializeComponent(
  'Instanciando o objeto
   objCOM = New BusinessComp.BComp()
 End Sub

Listagem 3. M�todo Page_Init

Volte para o Form Design (Shift+F7) e inclua os controles como exibido na Figura 3.

Figura 3. WebControls exibidos no IDE do VS.NET

Implemente o manipulador do evento OnClick do bot�o como mostrado na Listagem 4. Neste c�digo faremos uma consulta ao banco de dados, atrav�s do m�todo GetEmployeeInfo passando o conte�do do TextBox como par�metro.


Private Sub Button1_Click(ByVal sender 
As System.Object, ByVal e As System.EventArgs) 
Handles Button1.Click
'DataSet que receber� os dados
Dim myDataSet As DataSet= objCOM.GetEmployeeInfo
(CInt(TextBox1.Text)) 'Ligando o grid aos dados
DataGrid1.DataSource = myDataSet
'Carregando os dados
DataGrid1.DataBind()
End Sub

Listagem 4. Evento OnClick

Pronto! Basta executar a aplicaç�o, informar um par�metro no TextBox e consultar os dados (Figura 4).

Figura 4. Execuç�o da aplicaç�o web

Conclus�o

Vimos neste artigo como tirar proveito do suporte ao COM+ do .NET Framework, e para maiores informaç�es examine o MSDN Library. At� a pr�xima!

COM+ Services em ASP.NET

É muito comum o emprego de componentes COM+ como a camada de negócios em aplicações n-tiers. Veja como desenvolver aplicativos que suportem esta estrutura.

A estrutura do componente

Instalando o componente

Usando o componente

Conclus�o

Artigos relacionados