MOVIMENTAR-SE ENTRE OS REGISTROS DA TABELA
Desta forma os valores do primeiro registro da tabela projetos aparecem nos controles do Form, mas e agora como passar para o 2º registro 3º ...etc, qual o comando a colocar no botão proximo ? (o metodo é o movenext, mas já morri tentando, não sei como usa-lo)
Mais uma vez agradeço antecipadamente a atenção de todos colegas.
Mais uma vez agradeço antecipadamente a atenção de todos colegas.
Private Sub Form_load()
Dim cnncomando As New ADODB.Command
Dim rs_Pronaf As New ADODB.Recordset
With cnncomando
.ActiveConnection = cnnProjetos
.CommandType = adCmdText
.CommandText = " select * from projetos "
Set rs_Pronaf = .Execute
End With
With rs_Pronaf
text_nome = !nome
text_cod = !cod
text_mun = !municipio
End With
Set cnncomando = Nothing
Set rs_Pronaf = Nothing
End Sub
Pra frente
rs_pronaf.movenext
text_nome = !nome
text_cod = !cod
text_mun = !municipio
Pra tras
rs_pronaf.Moveprevious
text_nome = !nome
text_cod = !cod
text_mun = !municipio
isso n funciona?
boa sorte
Valeu SINKERTEC! brigado.
Tópico encerrado , respostas não são mais permitidas