Office中国论坛/Access中国论坛

标题: 一个酷毙了的用户登陆例子[给大家的第一份礼物] [打印本页]

作者: huanghai 时间: 2002-4-1 17:55
标题: 一个酷毙了的用户登陆例子[给大家的第一份礼物]
这是我照WIN2的用户登陆样式做的，大家可以作一些修改用到自己的作品中去。文件下载
http://www.office-cn.net/vvb/uploadimages/2002419541733441.rar

作者: tmtony 时间: 2002-4-1 17:57
真的很酷，把我吓坏啦
我以为改了我的系统啦

作者: tmtony 时间: 2002-4-1 18:29
stDocName = ChrW(20027) & ChrW(25511) & ChrW(-26782) & ChrW(26495)
为何要如此用，有何深意？

作者: 大熊 时间: 2002-4-1 18:42
主控面板？

作者: tmtony 时间: 2002-4-1 18:59
是啊，但不明白为何不直接引用

作者: 大熊 时间: 2002-4-1 19:32
莫非是故做高深？：）

作者: tmtony 时间: 2002-4-1 19:33
且听黄海道来。。。。

作者: cnwang 时间: 2002-4-1 19:39
stDocName = ChrW(20027) & ChrW(25511) & ChrW(-26782) & ChrW(26495)

如果用的是XP版，向导会自动将中文进行转换，我想是为了兼容不同的OS吧。

作者: tmtony 时间: 2002-4-1 19:40
明白，又学了一招：）

作者: huanghai 时间: 2002-4-1 20:29
cnwang说得对，而且还可以兼容不同语言操作系统

作者: huanghai 时间: 2002-4-1 20:31
大熊，主控面板就是指控制面板。

作者: make 时间: 2002-4-1 20:50
不错，不错
很有新意

作者: huanghai 时间: 2002-4-1 21:34
忘了去掉启动项中的启动窗体，不去掉会出错啦：）

作者: CY 时间: 2002-6-1 18:38
斑竹，在哪了可以找到这个列子？可否给我发一个？
我的妹儿：ayong7118@163.net

作者: scgao 时间: 2002-6-1 22:54
我也想用这个，请问这段代码应该放到哪里啊？我刚入门，请告诉我。

作者: whiky 时间: 2002-6-2 00:15
想下载看看，怎么下载。

作者: huanghai 时间: 2002-6-2 06:34
如果例子的话，我可以发给大家，告诉你邮件地址即可。

作者: zhuerw 时间: 2002-6-2 07:34

以下是引用whiky在2002-6-1 16:14:42的发言：
想下载看看，怎么下载。

这样下载：
http://www.office-cn.net/bbs/http://www.office-cn.net/vvb/uploadimages/2002419541733441.rar

作者: 阿笨 时间: 2002-6-2 19:39
这个菜单是怎么做的啊？

作者: lclc 时间: 2002-6-3 00:34
怎么不能下载？能把地址写清楚吗？

作者: zhuerw 时间: 2002-6-3 01:32
直接点击我粘贴的网址就行了。

作者: binbow_z 时间: 2002-6-3 04:20
标题: 我来回答这个问题

以下是引用cnwang在2002-4-1 11:39:14的发言：
stDocName = ChrW(20027) & ChrW(25511) & ChrW(-26782) & ChrW(26495)

如果用的是XP版，向导会自动将中文进行转换，我想是为了兼容不同的OS吧。

在VBA帮助中查找一下CHRW()就明白了

自己动手,丰衣足食

作者: 阿笨 时间: 2002-6-3 07:28
一不小心点了蓝底，就退不出来了

作者: 李寻欢 时间: 2002-6-4 18:46
大熊说话干嘛总是酸溜溜的？

作者: goodidea 时间: 2002-9-25 03:02

一不小心点了蓝底，就退不出来了！！
我也是，bug。

作者: WTM1 时间: 2002-9-25 17:36
厉害！！
佩服！！
谢谢！！
值得学习！

作者: WTM1 时间: 2002-9-25 17:38
标题: 偷了笨小漆的进度条！！改造了一下！看看！！
文件下载

作者: WTM1 时间: 2002-9-28 18:28

一不小心点了蓝底，就退不出来了！！
我也是，bug。很严重！！如果鼠标离开登陆窗体！
在背景-点就出不来！改一改！！

作者: redcat 时间: 2002-10-31 00:43
标题: 请问要怎么才能看到源代码
[em12]

作者: huanghai 时间: 2002-10-31 16:36
标题: [重复]除错报告

以下是引用huanghai在2002-4-1 13:33:54的发言：
忘了去掉启动项中的启动窗体，不去掉会出错啦：）

作者: WTM1 时间: 2002-10-31 17:03
标题: ！！

以下是引用redcat在2002-10-30 16:43:23的发言：
[em12]

直接看就可以了！没有加密的！

作者: 文子 时间: 2003-4-16 17:52
真可惜，打开是EXCEL的乱码文件

作者: zhanghl 时间: 2003-4-16 18:33
标题: 我下载了,真是酷！！
送一份漂亮的图片给你吧

作者: fjlygdw 时间: 2003-4-21 00:59
我发现了一个大的BUG呀..任意输入字符用户名..不要任何密码,,即可进入 .......嘻.

一定要改....不然黑客就来了.........

作者: 一品 时间: 2003-5-1 03:48
后来加了进度条的那个登录窗口真是爽死了~~~
斗胆问一句，进去之后怎么查看原代码~~~也就是说想知道是怎么编出来的~~
多谢~~

作者: 阿丰 时间: 2003-5-11 22:09
但对不同的用户能否进行分级赋给权限呢，如分成只读用户和读写用户。

作者: amain 时间: 2003-5-12 22:13
标题: 请求高手指教，感激不尽！！
我用的繁体WINDOWS98，我改成繁体后背景、登陆窗口及用户名都显示正常，但一按确定或取消就出错，请求高手指教，感激不尽！！

作者: cyprince888 时间: 2003-5-20 04:43
标题: [讨论]
“一不小心点了蓝底，就退不出来了！！"的问题解决办法：
在登记窗口的lostfocus事件中加docmd.cancelevent即可。

作者: 屋顶上的轻骑兵 时间: 2003-5-21 18:21
呵呵，我昨天才开始学access,要如何修改？菜单不是已经锁定了吗？

作者: starer 时间: 2003-5-21 19:27
好！努力学！

作者: 佳佳 时间: 2003-5-25 22:33
任意输入字符用户名..不要任何密码,,即可进入？？怎样解决啊

Private Sub Cmd确定_Click()
On Error GoTo Err_Cmd确定_Click

If Nz([Txt密码]) = Nz(DLookup("[密码]", "用户密码表", "[用户名]=" & "'" & Combo用户名 & "'")) _
And Me.Combo用户名 <> "" Then '验证用户和密码)

DoCmd.Close
DoCmd.Close acForm, "登陆背景", acSaveYes

Dim stDocName As String
Dim stLinkCriteria As String
stDocName = ChrW(20027) & ChrW(25511) & ChrW(-26782) & ChrW(26495)
DoCmd.OpenForm stDocName, , , stLinkCriteria

Else

MsgBox "用户名和密码错误", , "请重新输入"

Me.Combo用户名.SetFocus

End If
Exit_Cmd确定_Click:
Exit Sub

Err_Cmd确定_Click:
MsgBox Err.Description
Resume Exit_Cmd确定_Click

End Sub

作者: MikeYi 时间: 2003-6-4 19:10
1、如何解决不同用户授权问题，即关联到ACCESS自带的用户与组的权限？
2、密码表如何加密不被非管理员看见？

作者: 你是风儿我是沙 时间: 2003-6-8 20:34
历害，做的真好

作者: accessfun 时间: 2003-6-10 06:30
很棒！

作者: jl 时间: 2003-6-10 08:01
在窗体设计视图--〉限于列表---〉将否改为是。

作者: 悲回风 时间: 2003-6-12 22:04
学习ing

作者: 悲回风 时间: 2003-6-14 00:50
这个东东好炫滴说!,8好意思,我改了改标签用在自己的小玩艺上了,有版权吗?

作者: yzt88000 时间: 2003-6-23 08:20
我问的问题是：登入后输入数据的同时如何自动记录登入者的身份。也就是以后可以知道哪一条数据是谁输入的。

[此贴子已经被作者于2003-6-23 0:25:10编辑过]

作者: jcls 时间: 2003-6-23 17:47
有创意，斑竹就是斑竹.

作者: bluesky2003 时间: 2003-6-28 08:08
很不错的例子，有源码吗ahtcwhb@163.com

作者: dqdjm 时间: 2003-7-4 18:05
高手，高手，高高手！！！

作者: woodandwood 时间: 2003-7-4 21:03
标题: 界面是不错拉,可是没有什么安全性
公开源码把

作者: joe 时间: 2003-7-14 00:01
标题: 我要界面
我的伊妹兒bstzou_xiao@163.net

作者: yahai 时间: 2003-7-19 03:50
不错………………………………………………

作者: Airin 时间: 2003-7-20 01:53
斑主您好﹗

我想要一份界面和源碼。謝謝﹗

我的妹兒是﹕57789883@elong.com

作者: huanghai 时间: 2003-7-20 07:46
按住SHIFT启动（说过多次）

作者: dengxiaojun 时间: 2003-7-24 22:10
下载下来怎么看不了？

需要帮助的人！！

作者: amzm 时间: 2003-7-26 17:19
才刚学很好很酷谢谢

作者: hellohotmail 时间: 2003-7-30 20:51
哪位朋友能否给一份Access97的版本?
friendzlr@hotmail.com

作者: qylx 时间: 2003-7-31 06:58
真的很酷！

作者: qpzm 时间: 2003-8-23 22:06
怎么看不到原代码？

作者: woodandwood 时间: 2003-8-30 22:36
呵呵,很不错,回去烟酒烟酒

作者: 靖然 时间: 2003-8-31 16:57
太好拉

作者: ykl 时间: 2003-9-3 19:19
对于初学者如果没有源代码，根本不叫例子，叫人如何学习。

作者: wzxl 时间: 2003-9-6 17:40
GOOD

作者: 棋 时间: 2003-9-8 19:19
咦？？我下载完后，那个登陆的密码上哪找？？
难道就只是一个漂亮的界面？？？

作者: xuchunping 时间: 2003-9-28 23:30
关于点蓝屏无法退出的解决办法：
---- 在“用户登陆”的LOSTFOCUS事件中加入Docmd.cancelevent无效。
1。删去AUTOEXEC宏
2。在数据库的“启动”项中把“登陆背景”窗体设为启动窗体。
3。在“登陆背景”窗体的OPEN事件中加入
      DoCmd.Maximize  （原有）
      DoCmd.OpenForm "用户登陆"
4。保证“登陆背景”窗体为“模式窗体”

另：即使不输入用户名，点“确定”也会出现进度条。解决此问题只需把“确定”
钮的MOUSEDOWN事件的内容移到其CLICK事件的
   IF NZ(...... 行与
   DOCMD.CLOSE之间即可。


EMAIL：CQXCP@163.COM

作者: szx5106 时间: 2003-10-12 16:26
真得很棒

作者: linda0418 时间: 2003-10-18 21:34
大哥:
怎样添加和删除用户名呀!
怎样修改用户密码呀!
难道只能到表中直接修改吗?
谢谢!

作者: zyn 时间: 2003-11-21 18:17
初次等录！

作者: cxhgc 时间: 2003-11-22 06:52

以下是引用linda0418在2003-10-18 13:33:50的发言：
大哥:
怎样添加和删除用户名呀!
怎样修改用户密码呀!
难道只能到表中直接修改吗?
谢谢!

自己再作一个修改密码的窗体不就结了吗?

作者: 笨笨虫 时间: 2003-11-25 05:05
能不能把后面蓝背景去掉?

作者: wzm_wf 时间: 2003-11-27 19:25
怎么看源码,密码是啥

作者: huanghai 时间: 2003-12-3 18:01

以下是引用笨笨虫在2003-11-24 21:05:22的发言：
能不能把后面蓝背景去掉?

直接启动用户登陆就行了。

作者: huanghai 时间: 2003-12-3 18:01

以下是引用wzm_wf在2003-11-27 11:24:57的发言：
怎么看源码,密码是啥

按住SHIFT键启动。

作者: wewyhy 时间: 2003-12-3 18:17

以下是引用huanghai在2003-12-3 10:01:02的发言：
[quote]以下是引用wzm_wf在2003-11-27 11:24:57的发言：
怎么看源码,密码是啥

按住SHIFT键启动。
[/quote]

要是不加 SHIFT键限制会少很多麻烦的。另外希望能推出新版

作者: daniellung 时间: 2003-12-4 05:05
太感謝了，很新奇的登錄畫面
但還是不懂要如何和權限合併

作者: 2015 时间: 2003-12-30 03:20
这个看起来很高深，听你们一说更高深，初学者怎样入门？

作者: 阳光班车 时间: 2004-2-12 17:39
太太好啦！
回去好好瞧瞧！

作者: style 时间: 2004-2-13 03:08
請問在access2003中如何設計多人共同設計專案

作者: xurui 时间: 2004-3-25 16:50
先下，再学学！！！

作者: weiping 时间: 2004-5-20 18:55
xia bu liao

作者: 5258 时间: 2004-6-11 23:27
不能下

作者: wlfh888 时间: 2004-6-14 14:51
为什么不能下？？？？？？？？？？？？？？？

作者: a22 时间: 2004-6-25 23:03
hao!

作者: xxzxsjp 时间: 2004-7-9 04:26
什么也没有啊？晕！[em06]

作者: tszysun 时间: 2004-7-9 04:52
做的真好大家应该好好学

作者: tszysun 时间: 2004-7-9 04:53
应该加三次错误自动退出

作者: wgx333 时间: 2004-8-10 00:57
我加了个3次退出

作者: lains 时间: 2004-10-12 22:27
真的很专业,我已修改后用上了.谢谢!

作者: css2005 时间: 2005-1-27 18:07
太好了,酷毙了.还有我想请救一下那个"确定"和"取消"命令按钮的代码是怎样写的?是什么意思?恳请各位详细解答,多谢!

作者: TerryLee 时间: 2005-3-24 22:35
非常好的东东,小弟早已见过黄海先生的作品,这次很感谢!借用在我的东东上....呵呵....再次衷心感谢!

作者: tzjj 时间: 2005-6-8 23:31
好东东

作者: zerosailing 时间: 2005-11-21 02:13
拼命的学！谢谢！！

作者: hahaxiao 时间: 2005-11-21 02:42
受教了。多谢分享。

作者: rzgt 时间: 2006-1-13 19:38
太厉害了~~~~~~支持！！！

作者: ardis80 时间: 2006-1-16 04:44
很有新意的啊，不错~

作者: chenshi 时间: 2006-1-17 00:42
我连怎么修改都不明白

有没大哥提携？

作者: sun.gd 时间: 2006-1-17 23:58
在2003中运行，鼠标在其他地方点击，用户登陆窗体就不能用

作者: longerth123 时间: 2006-1-22 18:34
OOK

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)