kennyman
-
Total de itens
6 -
Registro em
-
Última visita
Posts postados por kennyman
-
-
Ola, como faço para repassar a informação de um campo num form para outro campo noutro form, usando o evento Após Atualizar? Qual é a sintaxe?Sei que para copiar para um campo no mesmo form basta colocar no evento after update a seguinte expressão me!campotal = me!outrocampo. Mas como fazer para copiar em outro campo, noutro form?
Obrigado.
Ola cara!
então você qr copia informação que esta no formulario ou informação que já foi gravada na tabela?
c for direto do formulario e os 2 forms tiver aberto ... você pode fazer assim!
me.txt_nome_do_campo = [forms]![nome_do_form]![nome_do_campo]
-
Você faz um select antes com o login do usuário, correto?! então você coloca um if antes do loop ficando assim
if not rsUsuario.eof then ' se ele achar alguém, ele entra no loop rsUsuario.moveFirst ' joga ele para o primeiro cara que encontrou Do While not rsUsuario.EOF ' enquanto tiver algum usuario do RecordSet ' If Me.txt_login = rsUsuario!login Then ' Essa tela não precisa pois se a pesquisa está sendo feita a partir do login rsUsuario.moveNext ' end if loop MsgBox "Login em Uso" call Limpar else ' Caso não encontre ninguém ele cria um novo cadastro Call Cadastro End If
Opa vlw brother!
deuu certo para o que eu estava precisando!
vlw mesmo!
-
Galera eu to fazendo um cadastro do login ... quando eu vou cadastrar um usuario q já existi ele da a msg, limpa os campos do formulario e saii ... o meu problema é que quando eu vou tentar cadastrar outro usuario ele não faz nada ... sera q eu tenho q atualizar o form ou o bd ... algo assim?
eu aperto pra cadastrar não faz nada "/
Do While rsUsuario.EOF
If Me.txt_login = rsUsuario!login Then
MsgBox "Login em Uso"
Call limpar
Exit Do
Exit Sub
End If
rsUsuario.MoveNext
Loop
c alguém poder ajudar !
to no aguarde mais preciso com URGENCIA!
-
Você tem que fazer um loop pra ir percorrendo os registros !
Ou, apenas utilizar a seguinte instrução: "Select * from tbl_usuarios where usuario='" & login & "' and senha='" & senha & "'"
Aí depois é só verificar a propriedade EOF, pra ver se existe algum usuário com essas informações !
Opa valeu brother!
fiz com loop ... fico assim
Do While Not rsUsuario.EOF
If Me.txt_login <> rsUsuario!login And Me.txt_senha <> rsUsuario!senha Then
Else
DoCmd.OpenForm "frm_principal"
DoCmd.Close acForm, "frm_login"
End If
rsUsuario.MoveNext
Loop
-
eu tenho uma tabela tbl_usuarios ... campos ... cod_usuario, login e senha
nela tem 2 registros cadastrados
admin e o outro teste
mais quando eu vou logar com o teste ele não reconhece sempre pega o primeiro registro q é o admin!
como eu faço pra q ele consiga ler o proximo registeo sendo no caso o teste...
eu fiz o seguindo no botao logar no evento click
On Error Resume Next
If Me.txt_login <> rsUsuario!login And Me.txt_senha <> rsUsuario!senha Then
MsgBox "Usuario ou Senha invalida"
Else
DoCmd.OpenForm "frm_principal"
DoCmd.Close acForm, "frm_login"
End If
c alguém poder ajudar ficarei Grato!
Enviar relatorio por email (AJUDEM)
em Access
Postado
então galera eu to com uma duvida!
tem como eu mandar um relatorio por email?
tipo eu faço uma consulta e nela gera o relatorio tem como eu mandar esse relatorio por email?
como anexo ?
ajudem ae c alguém souber!