BANCO DE DADOS MYSQL
Boa noite,
Por favor, alguém poderia me ajudar!
Estou criando um formulário de cadastro usando o Mysql, estou usando o código abaixo e só funciona no primeiro registro feito no banco, a parti do segundo registro não soma mais um conforme o código abaixo.
[txt-color=#0000f0]
Private Sub Form_Load()
conecta
SQL = [Ô]select id_aluno from Aluno order by id_aluno desc[Ô]
rs.Open SQL, cn, 3, 3
Do Until rs.EOF
lblcodigo.Caption = rs([Ô]id_aluno[Ô])
rs.MoveNext
Loop
txtCodigo = CDbl(lblcodigo.Caption) + 1
desconecta
End Sub[/txt-color]
Por favor, alguém poderia me ajudar!
Estou criando um formulário de cadastro usando o Mysql, estou usando o código abaixo e só funciona no primeiro registro feito no banco, a parti do segundo registro não soma mais um conforme o código abaixo.
[txt-color=#0000f0]
Private Sub Form_Load()
conecta
SQL = [Ô]select id_aluno from Aluno order by id_aluno desc[Ô]
rs.Open SQL, cn, 3, 3
Do Until rs.EOF
lblcodigo.Caption = rs([Ô]id_aluno[Ô])
rs.MoveNext
Loop
txtCodigo = CDbl(lblcodigo.Caption) + 1
desconecta
End Sub[/txt-color]
jeito mais facil, vai no banco de dados, abre para configurar no id, ou em outra table que deveria somar, vc seleciona e marca auto_increment, ai o proprio mysql ira somar, e vc nao tera que fazer isso no vb manualmente... to sem como postar prints agora
Tópico encerrado , respostas não são mais permitidas