OFFLINE

Panu ung code sa login form na 3 tries at eexit n?

OFFLINE

pwede poh makita ung code na nagawa moh for the login?

OFFLINE

Dim index=0
if txtuser.text= txtuser.tag and txtpass.text=txtpass.tag then
msgbox("Login Successful", MsgBoxStyle.OkOnly)

Else if txtuser.text<>txtuser.tag and txtpass.text<>txtpass.tag then
do until index=3
Msgbox("Login Unsuccessful", MsgBoxStyle.RetryCancel
index=index +1
Loop
End
Endif

OFFLINE

Hi kelvs

Nice work  , you can enhance your code by using database to your username and password

OFFLINE

Originally Posted by Kelvs Ricafort:
Dim index=0
if txtuser.text= txtuser.tag and txtpass.text=txtpass.tag then
msgbox("Login Successful", MsgBoxStyle.OkOnly)

Else if txtuser.text<>txtuser.tag and txtpass.text<>txtpass.tag then
do until index=3
Msgbox("Login Unsuccessful", MsgBoxStyle.RetryCancel
index=index +1
Loop
End
Endif

ung loop poh, medyo misplace poh siya... kasi poh kung doon poh ilalagay ung loop, gagawin niya na ung loop for 3x kaagad ng hindi na humihingi ng second input. try moh poh ilagay ung loop bago mag input ung user.

at ung "elseif" poh, kahit "else" na lang poh, i think it will work pa rin poh. and sa loob poh nung 1st "else" na iyon, puwede poh tayo maglagay ng bagong condition for the trials.

try moh din poh pasok ung username and userpassword in database, magkakaron poh siya ng tighter security.

try moh poh mna baka poh magawa moh na poh siya after this, if may idea ka pa poh na maidadagdag, much better poh. [^_^]

OFFLINE

Thank you

OFFLINE

paano ilalagay sa database ung username at password?

OFFLINE

create a new database for the username and the password or you can integrate it in your own.

just compare the data inputted with the data in the database.

OFFLINE

kunyari sa access aq gagawa pano ko iintegrate dun sa logon imbes sa txtuser at txtpass.tag

OFFLINE

Originally Posted by Kelvs Ricafort:
kunyari sa access aq gagawa pano ko iintegrate dun sa logon imbes sa txtuser at txtpass.tag

Upload ko later, pag nasa school na ako  

OFFLINE

pasensya na poh kung ngayon lang poh ako nagreply, hindi poh kasi ako madalas sa harap ng computer ngayon.
ADODB poh yon. pero ito poh yung code koh sa password. data control pa lang poh ito.

index = 0
If txtuser.text= txtuser.tag and txtpass.text=txtpass.tag then
msgbox "Login Successful", MsgBoxStyle.OkOnly)
Else
If index > 3 then
Msgbox "System Lockdown", MsgBoxStyle.OkOnly
End
Else
Msgbox "Login Unsuccessful", MsgBoxStyle.RetryCancel
index = index +1
Endif
Endif

palitan moh na lang poh yung codes for ADODB.

OFFLINE

sir nellee asan n ung iuupload mo pra maintegrate ko ung access database sa logon?

OFFLINE

hindi gumana pag pangatlong try hindi sya nagteterminate