Conexão banco de dados access

Question

Prezados,

como faço para conectar meu banco de dados access que está em C:\dados\MeuBanco\MeuBanco.mdb através de uma SQL, e exibir os dados da tabela alunoC, da colunas Nome e Aderencia em um MSChart, mas por codigo ?

---

Att, Estanislau Frade msn: [e-mail] email: [e-mail] [e-mail]

Answer 1

ASP .NET - Usando consultas armazenadas no Access
http://www.macoratti.net/aspn_sp2.htm

Inserindo dados em um banco de dados Access
http://www.macoratti.net/aspn_wm1.htm

---

--
Marque as respostas e ajude a melhorar a busca do fórum.

Answer 2

Fala Estanislau,

Não sei se entendi bem sua pergunta.. mas..

- Você esta com dúvida em fazer a query de consulta ao Acces?

- Você esta com dúvida em fazer a conexão com acces?

- Você esta com dúvida de como passar o resultado a consulta para o MSChart?

 

OK?

---

Francisco Gonçalves
Blog: franciscogoncalves.wordpress.com

Answer 3

Francisco, boa tarde.... Acabei de conseguir, era jogar dados de uma tabela access no grafico. Imports System.IO Imports System.Data.OleDb Imports System.Windows.Forms.DataVisualization.Charting Public Class Form1 Dim cmd As OleDbDataAdapter Dim cnn As New OleDbConnection(My.Settings.ConnectMDB) Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim DS As New DataSet cmd = New OleDbDataAdapter("Select * From alunosC", cnn) Dim Comando As New OleDbDataAdapter("SELECT TOP 5 Nome, Aderencia From alunosC", cnn) cnn.Open() cmd.Fill(DS) cnn.Close() Chart1.DataSource = Comando Chart1.Series("Series1").XValueMember = "Nome" Chart1.Series("Series1").YValueMembers = "Aderencia" Chart1.Series("Series1").ChartType = SeriesChartType.Bar Chart1.Series("Series1").Color = Color.Red 'Chart1.Series("series1"). End Sub

---

Att, Estanislau Frade msn: [e-mail] email: [e-mail] [e-mail]

Answer 4

Pessoal para quem tem dúvida com gráfico, segue modelo de como conseguir apresentar os dados de uma tabela em MSChart.

 

Imports System.IO

Imports System.Data.OleDb

Imports System.Windows.Forms.DataVisualization.Charting

----------------------------------------------------------------------------------------------------------

  Public

Class Form1

 Dim cmd As OleDbDataAdapter

 Dim cnn As New OleDbConnection(My.Settings.ConnectMDB)

------------------------------------------------------------------------------------------------------

 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

 Dim DS As New DataSet

cmd = New OleDbDataAdapter("Select * From alunosC", cnn)

 Dim Comando As New OleDbDataAdapter("SELECT TOP 5 Nome, Aderencia From alunosC", cnn)

cnn.Open()

cmd.Fill(DS)

cnn.Close()

Chart1.DataSource = Comando

Chart1.Series("Series1").XValueMember = "Nome" 

Chart1.Series("Series1").YValueMembers = "Aderencia" 

Chart1.Series("Series1").ChartType = SeriesChartType.Bar

Chart1.Series("Series1").Color = Color.Red

Chart1.Series("Series1").Name = "IAMOT"

  

End Sub

------------------------------------------------------------------------------------------------------

End Class

 

---

Att, Estanislau Frade msn: [e-mail] email: [e-mail] [e-mail]

Answer 5

Legal..

Show de bola...

---

Francisco Gonçalves
Blog: franciscogoncalves.wordpress.com