|
if thisform.text1.value=""
messagebox("请输入用户名和密码!!")
thisform.text1.setfocus
endif
use yonghu
locate for yonghuming=alltrim(thisform.text1.value)
if found() and mima=alltrim(thisform.text1.value)
do form main
thisform.release
else
messagebox("你属于非法用户!请从新输入或者注册!")
thisform.release
endif
是属于VFP的程序,我在登陆窗口,不用输用户名和密码,它也能自动登陆! 希望高手门能够帮我修正!谢谢了! |
|