Olá. Sou novo no uso do access. Tenho um formulário de entrada no sistema com usuário e senha. Se estiver correta a senha abre um formulário para lançamento de dados. Consegui passar os dados do primeiro para o segundo formulário desta forma:
Private Sub Bt_login_Click()
If Txt_Senha_Confirma.Value = txt_senha.Value And Txt_Tecnico_Confirma.Value = Txt_Tecnico.Value Then
If Txt_Tecnico_Confirma.Value = "KLADANN" Then
DoCmd.Close
DoCmd.OpenForm "FrmMenuKladannNovo"
Else
If Txt_Tecnico_Confirma.Value = "ESTOQUE" Then
DoCmd.Close
DoCmd.OpenForm "Frm_cadPeças"
Else
DoCmd.OpenForm "Frm_Lançamento de Ordens de Serviço", acNormal
Forms![Frm_Lançamento de Ordens de Serviço].LANÇADOPOR = UCase(Me.Txt_Senha_Confirma)
DoCmd.Close acForm, "Frm_AcessoAoSistema", acSaveYes
End If
End If
Else
MsgBox ("Senha inválida")
End If
End Sub
Ao abrir o formulário "Frm_lançamento de Ordens de serviço" o campo LANÇADOPOR (do formulário) está preenchido de forma correta e ao gravar o registro esse valor é passado para a tabela.
O problema acontece no próximo registro novo onde o campo é limpo.
O Campo da TABELA é "LANÇADO POR".
Já tentei :
Private Sub Form_Load()
DoCmd.GoToRecord , , acNewRec
Me.[LANÇADOPOR].Enabled = False
Me.[LANÇADO POR] = Me.LANÇADOPOR
End Sub
O campo do formulário [LANÇADOPOR] ao chamar o formulário no novo registro fica AZUL mas vazio.
Pensei em fazer uma variável mas, não sei como fazer com variável
Alguma sugestão?
Gratidão
Private Sub Bt_login_Click()
If Txt_Senha_Confirma.Value = txt_senha.Value And Txt_Tecnico_Confirma.Value = Txt_Tecnico.Value Then
If Txt_Tecnico_Confirma.Value = "KLADANN" Then
DoCmd.Close
DoCmd.OpenForm "FrmMenuKladannNovo"
Else
If Txt_Tecnico_Confirma.Value = "ESTOQUE" Then
DoCmd.Close
DoCmd.OpenForm "Frm_cadPeças"
Else
DoCmd.OpenForm "Frm_Lançamento de Ordens de Serviço", acNormal
Forms![Frm_Lançamento de Ordens de Serviço].LANÇADOPOR = UCase(Me.Txt_Senha_Confirma)
DoCmd.Close acForm, "Frm_AcessoAoSistema", acSaveYes
End If
End If
Else
MsgBox ("Senha inválida")
End If
End Sub
Ao abrir o formulário "Frm_lançamento de Ordens de serviço" o campo LANÇADOPOR (do formulário) está preenchido de forma correta e ao gravar o registro esse valor é passado para a tabela.
O problema acontece no próximo registro novo onde o campo é limpo.
O Campo da TABELA é "LANÇADO POR".
Já tentei :
Private Sub Form_Load()
DoCmd.GoToRecord , , acNewRec
Me.[LANÇADOPOR].Enabled = False
Me.[LANÇADO POR] = Me.LANÇADOPOR
End Sub
O campo do formulário [LANÇADOPOR] ao chamar o formulário no novo registro fica AZUL mas vazio.
Pensei em fazer uma variável mas, não sei como fazer com variável
Alguma sugestão?
Gratidão