ADO.NET NA PRÁTICA
Veja abaixo um exemplo da ut ilização dos objetos SqlConnect ion,
SqlDataAdapter, SqlCommand e DataSet :
'objeto Connection para conexão com a fonte dos dados
Dim cnxNorth As New SqlConnection("integrated security=SSPI;" & _
" data source=(local);persist security info=False;initial" & _
"catalog=Northwind")
’objeto Command para pesquisa no banco de dados
Dim comSelProd As New SqlCommand("SELECT * FROM Products")
'o comando é do tipo texto, usado para instruções SQL
comSelProd.CommandType = CommandType.Text
'devemos também definir a conexão a ser utilizada pelo comando
comSelProd.Connection = cnxNorth
'objeto DataAdapter que conterá o comando para pesquisa
Dim daProdutos As New SqlDataAdapter(comSelProd)
'objeto DataSet que será preenchido pelo DataAdapter criado acima
Dim dsNorthWind As New DataSet
'abrindo a conexão para comunicação com a fonte
cnxNorth.Open()
'o método Fill do DataAdapter executa o comando de pesquisa e
'preenche o objeto passado como parâmetro
'o segundo parâmetro é um string que determina o nome da DataTable
'que armazenará os registros retornados
daProdutos.Fill(dsNorthWind, "Produtos")
'após executar o comando não é mais necessário manter a conexão
'aberta pois o DataSet mantém os dados em memória
'fechando a conexão
cnxNorth.Close()
'Definindo a fonte de dados e a tabela para o DataGrid
grdProdutos.DataSource = dsNorthWind
grdProdutos.DataMember = "Produtos"
0 comentários:
Postar um comentário