verificando a no access

[stugui 0]

Olá pessoal, preciso saber como faço para, que o Visual Basic leia o banco de dados access, preciso tipow assim quando clicar no botão o vb vai la no access em uma tabela criada tipow com o nome dados verifica se o campo caminho está como teste, se estiver exibe uma mensagem dizendo que está aprovado se naum diz que naum foi aprovado.

[luiz humberto 0]

Primeiramente tem que fazer a conexão com o BD, após isso utilize um RecordSet para ler os dados de sua tabela e finalmente uma condição para verificar o que precisa.

[kauebranco 0]

no clique do botão :

 

Dim DSN As StringPublic RS As New ADODB.Recordset 'variavel recordsetPublic CN As New ADODB.Connection 'variavel de conexão com o BD 	   		DSN = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Banco.mdb;Persist Security Info=False"				CN.Open DSN		RS.OPEN "SELECT campo FROM tabela",CN,adOpenDynamic, adLockOptimisticif RS!campo = "teste" then  msgbox " foi aprovado"else msgbox "num foi aprovado"end if rs.closecn.openset rs = nothingset cn = nothing

[stugui 0]

no clique do botão :

Dim DSN As StringPublic RS As New ADODB.Recordset 'variavel recordsetPublic CN As New ADODB.Connection 'variavel de conexão com o BD 	   		DSN = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Banco.mdb;Persist Security Info=False"				CN.Open DSN		RS.OPEN "SELECT campo FROM tabela",CN,adOpenDynamic, adLockOptimisticif RS!campo = "teste" then  msgbox " foi aprovado"else msgbox "num foi aprovado"end if rs.closecn.openset rs = nothingset cn = nothing

Como fazer está conexão com o BD isto está em SQL sou iniciante

[kauebranco 0]

num ta em SQL nada .. ta em ACCESS mesmo !!! copia esse código pra dentro do evento Onclick do seu botão e testa !!!só que precisa alterar os nomes né .. onde eu coloquei "banco.mdb" você coloca o nome do seu banco . . onde eu coloquei "Tabela" você coloca o nome da sua tabela e onde eu coloquei "campo" você coloca o nome do seu campo !!!