- 2
- 0
- 约1.42千字
- 约 8页
- 2019-10-18 发布于江苏
- 举报
具体操作步骤
(一)表
建立如下各表
基本数据表如下
(二)表单的建立
启动表单
进入界面
登录界面
主界面
维护界面
查询界面1
查询界面2
浏览界面1
浏览界面2
(三)命令代码
启动的登录按钮:
do form 登录.scx
release thisform
启动的退出按钮:
quit
3、进入的登录按钮:
logcount=logcount+1
locate for alltrim(用户.用户名)==alltrim(bo1.value)
if found() and alltrim(用户.密码)==alltrim(thisform.text1.value)
do form 主界面.scx
release thisform
else
if logcount3 then
=messagebox(操作员或密码错误请重新输入!!!,48,严重警告)
thisform.text1.setfocus
else
=messagebox(对不起,您是非法用户,系统将会退出!!!,48,严重警告)
quit
endif
endif
4、进入的退出按钮:
release thisform
5、第一个:
go top
thisform.refresh
this.enabled=.F.
mand3.enabled=.f.
mand4.enabled=.t.
mand5.enabled=.t.
6
您可能关注的文档
最近下载
- 预发泡珠粒的熟化.pptx VIP
- Stylistic Features of News English 论新闻英语的文体特征.doc VIP
- 英语文体学论文Stylistic Analysis of News Report.doc VIP
- 【PPT】-TOYOTA广汽(汽车)员工行为规范培训讲解PPT-汽车.ppt VIP
- 预发泡工艺过程.pptx VIP
- 中华民族的抗日战争(1931——1945)+课件--2027届高三统编版必修中外历史纲要上一轮复习.pptx
- 智能物流 智能物流 第04章.pptx VIP
- (课件1)《有理数及其运算》复习.ppt VIP
- 2019成都熊猫之都总体策划及概念性规划 SASAKI(96P).pdf VIP
- 人教版六年级数学上册(全册)教案教学设计及教学反思.pdf VIP
原创力文档

文档评论(0)