在VFP6.0中运行表单时说程序正在使用时这么回事？

来源：百度知道 编辑：UC知道 时间：2024/06/06 00:14:13
*核对用户信息，只有合法的用户才能使用该系统
if (n>2)
*输入超过3次，系统拒绝进入系统
messagebox("密码输入超过3次，不能使用本系统")
thisform.release
else
*打开用户信息库，把输入的信息进行核对
use user.dbf
*收集用户的输入信息
temp1=alltrim(thisform.text1.value)
temp2=alltrim(thisform.text2.value)
locate for alltrim(用户名)=temp1.and.alltrim(密码)=temp2
*如果是合法用户，允许进入系统，否则提示用户重新输入
if found()
thisform.release
*进入系统
do form main
else
*提示用户重新输入
messagebox("密码或用户名输入错误，重新输入!")
thisform.text1.value=""
thisform.text2.value=""
n=n+1
thisform.text1.setfocus
endif
endif

这是服务器设置了相关程序而造成的，如果能改动就去试着改一下，再试

use user.dbf
user.dbf如果已经打开,再次使用USE打开就有可能会报错!
可以设置检查是否已打开表
if not used("user")
use user.dbf
endif