(Resolvido) Access para VB 2010

[carolprogramadora]

Olá Galera, estou precisando de uma ajudinha urgente!

eu estou fazendo um projeto em vb 2010 e o banco de dados é o access, ´já montei os fomrs no vb e montei os cadastros, como que eu faço agora pra fazer a codificação unindo os dois? é a mesma coisa que o sql?

estou perdidaça!! :wacko:

[kuroi]

carol, vb2010 é vb.net, vou mover pro local certo.

mas deve ser basicamente a mesma coisa q o sql. so q se você usava os objetos do namespace System.Data.SqlClient, vai ter q trocar pelos do System.Data.OleDb.

se você não sabe fazer a connection string com o access, olhe em http://www.connectionstrings.com

[carolprogramadora]

Ok Obrigada Kuroi, essa parte já resolvi!!!

Agora estou com outro problema... uHAuhauhuah

eu preciso fazer o botão excluir funcionar, quero excluir um registro do access, mas que fosse atraves do vb 2010.

Saberia me passar alguma codificação para access?

Obrigada!!

[kuroi]

carol, veja se é isso q você precisa: http://www.w3schools.com/sql/sql_delete.asp

[carolprogramadora]

Consegui!!!

ae está:

Sub ExcluirDados()

        If txtId.Text <> "" Then

            Sql = "DELETE FROM BDFeriado WHERE ID=" & txtId.Text

            Dim Conn As New OleDbConnection(connString)
            Dim Cmd As New OleDbCommand(Sql, Conn)

            Try

                Conn.Open()
                Cmd.ExecuteNonQuery()
                MsgBox("Dados Excluídos !", MsgBoxStyle.Information, Me.Text)

            Catch ex As OleDbException

                Throw New Exception("Erro Banco de Dados : " + ex.Message)

            Catch ex As Exception

                Throw New Exception("Erro Run Time : " + ex.Message)

            Finally

                Conn.Close()
                Conn.Dispose()
                Cmd.Dispose()

            End Try

        End If

        Call LimpaCampos()
        BindingNavigator1.BindingSource = Bs

    End Sub



Private Sub btnExcluir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExcluir.Click


        If MsgBox("Excluir Dados ?", MsgBoxStyle.Question + MsgBoxStyle.YesNo, Me.Text) = MsgBoxResult.No Then

            Exit Sub

        End If

        Call ExcluirDados()

    End Sub

Obrigada a todos q me ajudaram!!

saudações!!!