INPUTBOX
faz muito tempo q nao usava o inputbox quando fui usalo nao lembrava mais como que fazia pra usa o que o usuairio digita ..
por exemplo quero que ele digite uma senha, quandso ele digita eu
compare com o que o preogram espera e assim desbloqueie os campos
se alguem souber so a parte do pegua a senha to grato valeu!!
por exemplo quero que ele digite uma senha, quandso ele digita eu
compare com o que o preogram espera e assim desbloqueie os campos
se alguem souber so a parte do pegua a senha to grato valeu!!
Acho que não consegui enteder o que vc quiz diser....
o cara vai digitar essa senha em um textbox certo....
pegue o nome dele e compare no banco...
o cara vai digitar essa senha em um textbox certo....
pegue o nome dele e compare no banco...
o usuario digita a senha no IMPUTBOX ai esa senha e comparada
com acerta ue esta no codigo se estiver certa libera os campos
bloqueados ..... so nao me lembro como pegar o que o usuario digitou no imputbox
com acerta ue esta no codigo se estiver certa libera os campos
bloqueados ..... so nao me lembro como pegar o que o usuario digitou no imputbox
dim sSenha as string
sSenha = InputBox("Entre com a senha:", "Senha de acesso")
if sSenha = tbl!Senha then 'Faça a comparação com o banco
msgbox "Acesso Permitido."
else
msgbox "Acesso Negado."
end if
espero ter ajudado.
sSenha = InputBox("Entre com a senha:", "Senha de acesso")
if sSenha = tbl!Senha then 'Faça a comparação com o banco
msgbox "Acesso Permitido."
else
msgbox "Acesso Negado."
end if
espero ter ajudado.
Tópico encerrado , respostas não são mais permitidas