Nothing is wrong as I can see. The problem may be in the main program. Can you post it? Is your Logo form Visible property set to .T.? Was is ShowWindow set to?
>The logo screen still does not appear, even with the code change of adding a second read events. Anything wrong with my code behind the Login button on the login screen (see below):
>
>oVar.UserIdText = ALLTRIM(ThisForm.TxtUserName.Value)
>oVar.UserPwdText = oPro.Encrypt(ALLTRIM(ThisForm.TxtPassword.Value))
>
>&&Now Check for valid user id/password
>
>IF !USED('V_sold_log')
> USE ALLTRIM(ovar.sysdatapath) + 'ULAS!V_sold_log' IN 0 SHARED
>ENDIF
>
>SELECT V_sold_log
>=REQUERY()
>
>IF _tally > 0
> oVar.LoginOk = .T.
> thisform.release()
>ELSE
>
>ENDIF
>
>RETURN
Précédent
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement