ASP.Net - Usando o ADO.Net (parte 4) Raphael Ribeiro é Microsoft Certified Professional, técnico em VB e ASP. Vem estudando a plataforma .Net desde o seu lançamento. Falará para nós, toda semana, sobre ASP.Net. 03/09/2001 - Coluna nº 12 ASP.Net - Usando o ADO.Net (parte 4) Bom, já estamos na penúltima parte da nossa série sobre o ADO.NET. Nesta semana iremos falar sobre o vínculo de dados. Começaremos usando arrays para vincular dados, pois é a forma mais fácil e prática. Veja o exemplo onde vicularemos os dados a uma lista, ele será analisado através dos comentários nele próprio: 'Escolhemos a linguagem que usaremos Sub Page_Load(Sender as Object, E as EventArgs) 'Criaremos o código que será executado quando a pagina for carregada Dim ListaProdutos as new arraylist 'Criamos a variável para armazenar a lista de produtos como uma Array ListaProdutos.ADD("CD") ListaProdutos.ADD("Fitas de Vídeo") ListaProdutos.ADD("Livros") 'Agora adicionamos os produtos na lista Categorias.DataSource = ListaProdutos Categorias.DataBind( ) 'Ai vinculamos a lista com a array End Sub 'Agora adicionamos a ListBox com as Categorias que são os da ListaProdutos Bom, em array, vocês viram como foi fácil. Agora vamos ver como vincularemos dados do banco de dados, a partir de um armazenamento de dados. Veja abaixo o exemplo com uma simples ListBox e com a análise feita a partir de comentários: <%@Import NameSpaces="System.Data.ADO" %> 'Importando os espaços de nome que usaremos 'Escolhemos a linguagem que usaremos Sub Page_Load(Source as Objects, E as EventArgs) 'Agora colocaremos o commando que será executado quando a página for carregada Dim minhaConexão as AdoConnection Dim meuComando as AdoDataSetCommand Dim ConnStr as String Dim CmdStr as String Dim ds as New DataSet 'Ai definimos as variaveis que usaremos ConnStr="Provider=SqlOLEdb; DataSource=(local) ; "& _ "Initial Catalog=Produtos; UserID=sa" 'Aqui definimos o datasource e o catalogo inicial CmdStr="Select * from Produtos" 'Aqui definimos o comando que será usado minhaConexão=NewAdoConnection(ConnStr) meuComando= new AdoDataSet command(CmdStr, minhaConexão) 'È ai que criamos a conexão 'Aqui definimos o comando que será executado meuComando.FillDataSet(ds, "Products") 'Agora executamos o comando, o que ocorrerá será que ele identificará 'o dataSet e depois identifica onde os dados serão armazenados ListBox1.DataSource = ds.Tables("Products").DefaultView ListBox1.DataBind() 'Agora o mais importante, a partir dos dois comandos acima vinculamos 'a propriedade DefaultView no DataSet, como um dataset tem diversas tabelas 'teremos que usar as propriedades Data TextField e DataValueField para identificar 'quais colunas estão vinculadas as propriedades text e value de cada elemento