Como ligar o vb.net a uma base de dados Access ?

[Lukas S.]

Sou novo nestas ligações a base de dados ... alguém pode ajudar ? gostaria de aceder aos dados de uma base de dados feita em acess e colocar dados lá e guardar ... anyone ? thanks in advance

[acao]

boas

veja este toturial: https://wiki.portugal-a-programar.pt/dev_net/vb.net/access/

cumps

acao

[djbarbas]

Boas,

Segue aqui um exemplo, certifica-te que tens a base de dados na pasta do programa ou muda na CONNECTIONSTRING a localização se necessario.

Imports System.Data.OleDb
Public Class Form1
       Dim cn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "\GparqueBD.mdb")
       Dim query As New OleDbCommand
       Dim dr As OleDbDataReader
       Dim x, y As String

       Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
               Try
                       If cn.State = ConnectionState.Closed Then
                               cn.Open()
                       End If
                       query.Connection = cn
                       If query.Connection.State = ConnectionState.Closed Then
                               query.Connection.Open()
                       End If
                       query.CommandText = "SELECT * FROM Lugares"
                       dr = query.ExecuteReader
                       If dr.HasRows Then
                               While dr.Read
                                       x = dr(0)
                                       y = dr(1)
                               End While
                       End If
                       dr.Close()
                       cn.Close()
               Catch ex As Exception
                       MsgBox(ex.Message)

               End Try
       End Sub
End Class

Qualquer dúvida que tenhas mete aqui.

Espero ter ajudado, dá um feedback depois 🙂