用visual foxpro 8.0编写医院管理程序时,在设置用户登录时总是编译不过去。。。老报错。求大神帮助啊!
具体代码:
StrName=thisform.CombName.SelText
StrPwd=thisform.txtPwd.Value
CLOSE TABLES ALL
USE"c:\users\hsc\documents\visual foxpro projects\用户信息.dbf
SET EXACT ON
DIMENSION s(10)
FOR i=1 TO 10 STEP 1
S(i)=""
ENDFOR
SELECT * from 用户信息
WHERE(用户信息.用户名称=StrName AND 用户信息.用户口令=StrPwd)INTO ARRAY s
IF s(1)="" then
MESSAGEBOX("非法用户登录",48,"登陆错误")
thisform.txtPwd.Value=""
thisfrom.Refresh
ELSE
DO FORM "c:\users\hsc\documents\visual foxpro projects\管理界面.scx"
Thisform.Release
CLOSE TABLES ALL
ENDIF
程序报:WHERE(用户信息.用户名称=StrName AND 用户信息.用户口令=StrPwd)INTO ARRAY s 这一语句错误。想了半天想不出错在哪里。。是不是与前面的表有关系?
答案:上面一句的末尾少了续行符号: ;
SELECT * from 用户信息 ;
WHERE 用户信息.用户名称=StrName AND 用户信息.用户口令=StrPwd INTO ARRAY s
上一个:visual foxpro 6.0下载win7
下一个:visual foxpro 为什么不能新建菜单的时候出现文件不存在而不能建立,要怎么办?重新下地也还是同样的问题