Article View: cn.bbs.comp.lang.visual-basic
Article #20867Re: Ȩ���������⣿
From: ������
Date: Tue, 29 Jul 2003 16:24
Date: Tue, 29 Jul 2003 16:24
38 lines
2725 bytes
2725 bytes
�� �� zsjyp (��Ű׳�) �Ĵ������ᵽ: ��
: vb+access���������½�������û�admin adn user
: ������ô����admin�е��command1��Ȩ�ޣ���user���ܵ��command1
: ����˵��ô���ò���ʹadmin��½��ʱ��command1.Enabled =True
: ��user��½��ʱ��command1.Enabled =false?
: thanks!
�����Ҫ�ڳ����еõ��û�
account�ж�,Ȼ��disable or enable
CurrentUser ����
����� Ӧ���� ʾ�� ����
ʹ�� CurrentUser �������Է�����ݿǰ�û�����ơ�String �͡�
expression.CurrentUser
expression ���衣���ء�Applies To���б��е�һ������ı��ʽ��
˵��
���磬�����ڸ��ٶ���ݿ�����ĵ��û��Ĺ����ʹ�� CurrentUser ������
CurrentUser ��������һ����ǰ�û��ʻ���Ƶ��ַ�
�����δ������ȫ�����飬CurrentUser ����������Ĭ�ϵ��û��ʻ�����������Ա��
����ơ�������Ա���û��ʻ����û���������ݿ����ӵ����ȫȨ�ޡ�
����Ѿ����ù�����İ�ȫ���ԣ�CurrentUser ���������ص�ǰ�û��ʻ�����ơ���
�ڡ�����Ա��������û��ʻ�������ָ�����������û�������ݿ�����Ȩ�ޡ�
ʾ��
�����ʾ���õ�ǰ�û�����Ʋ�������ʾ�ڶԻ����С�
MsgBox("The current user is: " & CurrentUser)
--
[m[1;31m�� ��Դ:��BBS ˮľ�廪վ smth.org��[FROM: 211.92.50.98][m
Technical Details
Message-ID:
<000000$388@smth.org>Path:
arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-04!sn-xit-01!sn-xit-09!supernews.com!64.152.100.70.MISMATCH!sjc70.webusenet.com!news.webusenet.com!maily.cic.tsinghua.edu.cn!SMTHShow Full Headers
Complete Article Headers
X-Google-Language: Chinese,GB X-Google-Thread: 109fdd,e6715cccd3a95a72,start X-Google-Attributes: gid109fdd,public X-Google-ArrivalTime: 2003-07-29 09:25:01 PST Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-04!sn-xit-01!sn-xit-09!supernews.com!64.152.100.70.MISMATCH!sjc70.webusenet.com!news.webusenet.com!maily.cic.tsinghua.edu.cn!SMTH From: henryl@smth.org (������) Newsgroups: cn.bbs.comp.lang.visual-basic Subject: Re: Ȩ���������⣿ Date: 29 Jul 2003 16:24:52 GMT Organization: BBS ˮľ�廪վ Message-ID: <000000$388@smth.org> Mime-Version: 1.0 Content-Type: text/plain; charset="gb2312" Content-Transfer-Encoding: 8bit X-Filename: VisualBasic/S/M.1059495683.A0 Lines: 38