标题:如何只能修改查看并显示当前登录用户的数据?
只看楼主
TonyDeng
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:304
帖 子:25859
专家分:48889
注 册:2011-6-22
得分:0 
没有用户数据表,你怎么查找、对比用户帐号和密码呢?一个caozuoyuan变量是不行的,你不会是想把几个人的帐号和密码都硬写在程序中吧?那样是无法增加用户的,连改密码都要改程序。本来就不需要使用这种变量,是你自己坚持要用,非要说怎么定义一个全局可用的变量,我才告诉你用PUBLIC可以做到,至于整个程序怎样设计,你又说很简单不用多说,结果到现在又透露出仍然是设计缺陷。

是的,登录之后,后面根据登录帐号来查找数据就可以了,但登录这个动作本身就要从数据表中查数据,只要定位出当前的用户记录,这条记录就已经起着caozuoyuan那样的作用了,有需要就跟这条记录上的字段进行比对,用不着建立全局变量。

[ 本帖最后由 TonyDeng 于 2013-1-23 19:54 编辑 ]

授人以渔,不授人以鱼。
2013-01-23 19:53
wuyun1981
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2013-1-14
得分:0 
没有用户数据表,你怎么查找、对比用户帐号和密码呢?——我当然知道要建立表,首先建立了个操作员表(用户名,密码)。
登录之后,后面根据登录帐号来查找数据就可以了,但登录这个动作本身就要从数据表中查数据,只要定位出当前的用户记录,这条记录就已经起着caozuoyuan那样的作用了,有需要就跟这条记录上的字段进行比对,用不着建立全局变量。
这个是个好办法,关键是如何定位出当前的用户记录呢?
登陆的确定Click
private zg,mm
zg=alltrim(thisform.Text1.value) &&用户名
mm=alltrim(thisform.Text2.value) &&密码
locate for zg==alltrim(操作员.用户名)
if found() and alltrim(操作员.密码)==mm
   caozuoyuan=alltrim(操作员.用户名)
   thisform.visible=.f.
   do zhumenu.mpr
else
    messagebox('用户名或密码错误,请重新输入!',0+48,'错误!')
    thisform.Text2.value=''
    thisform.Text1.setfocus
endif
set exact off


我这样赋值caozuoyuan,单主程序里面却不认这个变量了,所以我思考用全局变量。
2013-01-23 20:06
TonyDeng
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:304
帖 子:25859
专家分:48889
注 册:2011-6-22
得分:0 
你比较密码正误的时候,表的记录指针已经指在那个用户上了,正确登录成功,不移动那个记录指针、不关闭那个表,怎么找不到帐号、密码、权限等等一切东西?
locate for
if found()
这样的组合,记录指针已经定位在那个用户上了,他的资料都在这条记录上,不需要另外用变量记忆的,除非你一定要关闭这个表。

授人以渔,不授人以鱼。
2013-01-23 20:09
wuyun1981
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2013-1-14
得分:0 
哦,谢谢
2013-01-23 20:12
TonyDeng
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:304
帖 子:25859
专家分:48889
注 册:2011-6-22
得分:0 
如果你怕不保险,就用全局变量记住帐号,万一记录指针不小心移动了,就用这个帐号把记录找回来。其实,我前面说的,用户表可以记录权限,有了这条记录,这个用户能做什么、不能做什么,都可以知道,按照这里设定的权限开关他就是了,这样根本不需要全程记住他的帐号。权限变了、帐号变了,都不是问题,关键是你自己维护住这个用户表,给他什么,不给他什么,一切是你说了算,老板都没你的权力大。

授人以渔,不授人以鱼。
2013-01-23 20:17
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:396
帖 子:11713
专家分:43267
注 册:2006-5-13
得分:3 
T版深入浅出、循序渐进,将基本思路点明了。建议楼主多看看数据结构的基础知识,就不会想用多个相同的表来记录不同分类的数据了。

活到老,学到老! http://www. E-mail:hu-jj@
2013-01-23 21:07



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-397389-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.081483 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved