Prezados boa tarde a todos.
Estou com um pequeno " rolo " aqui.
Preciso gerar um determinado numero de senha e código de barras para um cliente. Como vai ser uma grande quantidade estou desenvolvendo a seguinte rotina:
Dim x As Integer
For x = Me.txt_inicio To Me.txt_final 'repete do inicial até final
DoCmd.RunSQL "INSERT INTO TblSenha ( NumeroBloco, senha) SELECT " & Me.txt_bloco & " , " & x & ";" 'consulta acrescentar
Next
MsgBox "Concluído", vbInformation, Me.Caption
Funciona perfeitamente, mas.....preciso acrescentar da mesma forma o código de barras e aí que mora e reside o problema.
Preciso que seja inserido tanto a senha, como o código de barras ao mesmo tempo.
Segue uma parte do sistema para melhor compreensão dos colegas.
Estou com um pequeno " rolo " aqui.
Preciso gerar um determinado numero de senha e código de barras para um cliente. Como vai ser uma grande quantidade estou desenvolvendo a seguinte rotina:
Dim x As Integer
For x = Me.txt_inicio To Me.txt_final 'repete do inicial até final
DoCmd.RunSQL "INSERT INTO TblSenha ( NumeroBloco, senha) SELECT " & Me.txt_bloco & " , " & x & ";" 'consulta acrescentar
Next
MsgBox "Concluído", vbInformation, Me.Caption
Funciona perfeitamente, mas.....preciso acrescentar da mesma forma o código de barras e aí que mora e reside o problema.
Preciso que seja inserido tanto a senha, como o código de barras ao mesmo tempo.
Segue uma parte do sistema para melhor compreensão dos colegas.
- Anexos
- forum.zip
- Você não tem permissão para fazer download dos arquivos anexados.
- (41 Kb) Baixado 11 vez(es)