Eu trabalhava com vba mas o pessoal aqui sismou de usar o novo vb.net para o frontend das aplicações... E eu precsava criar botões de navegação entre os registros.
PARA ACESSAR O BANCO CRIEI ESTE CODIGO
Sub Form_Load(Src As Object, E As EventArgs)
Dim StringConn as string ="PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE='banco.mdb');"
Dim objConn as New OleDBConnection(StringConn)
ObjConn.Open()
Dim StrSql as string = "SELECT * FROM tabela"
Dim objComd as New OleDBCommand(strSql, objconn)
Dim objReader as OleDbDataReader
ObjReader = objComd.ExecuteReader
ObjReader.Read()
Txtcampo1.text = objReader(0)
Txtcampo1.text = objReader(1)
objConn.Close()
End Sub
Será que alguém pode me dizer como ficaria o codigo para mover para o proximo registro... Pois não encontrei nenhum metodo pra isso.
Pergunta
Alam-bique
Olá.
Eu trabalhava com vba mas o pessoal aqui sismou de usar o novo vb.net para o frontend das aplicações... E eu precsava criar botões de navegação entre os registros.
PARA ACESSAR O BANCO CRIEI ESTE CODIGO
Sub Form_Load(Src As Object, E As EventArgs)
Dim StringConn as string ="PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE='banco.mdb');"
Dim objConn as New OleDBConnection(StringConn)
ObjConn.Open()
Dim StrSql as string = "SELECT * FROM tabela"
Dim objComd as New OleDBCommand(strSql, objconn)
Dim objReader as OleDbDataReader
ObjReader = objComd.ExecuteReader
ObjReader.Read()
Txtcampo1.text = objReader(0)
Txtcampo1.text = objReader(1)
objConn.Close()
End Sub
Será que alguém pode me dizer como ficaria o codigo para mover para o proximo registro... Pois não encontrei nenhum metodo pra isso.
Link para o comentário
Compartilhar em outros sites
2 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.