Foxtable(狐表)用户栏目专家坐堂 → 使用更改用户时出现问题


  共有2663人关注过本帖树形打印复制链接

主题:使用更改用户时出现问题

帅哥哟,离线,有人找我吗?
douglas738888
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1172 积分:8772 威望:0 精华:0 注册:2012/4/18 16:28:00
使用更改用户时出现问题  发帖心情 Post By:2015/5/27 12:52:00 [只看该作者]

报错情况:
按照自定义用户与权限管理一设计的登录系统应用正常,但是在用户管理窗口中应用更改用户按钮时,报错(未将对象引用设置到对象的实例,错误所在事件:窗口,更改用户,AfterLoad),接下来关闭报错窗口后,更改用户窗口自动跳出,可正常执行更改用户的操作,其他都正常。

AfterLoad中的代码与自定义用户与权限管理一的示例是一致的。

请教问题出在哪里??

是否是没有执行“最后修改菜单中的"用户管理"和"切换用户"按钮的代码”(我没有修改示例中该项的内容)

[此贴子已经被作者于2015/5/27 13:06:08编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/5/27 13:41:00 [只看该作者]

ALterLoad代码或者例子发出来

 回到顶部
帅哥哟,离线,有人找我吗?
douglas738888
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1172 积分:8772 威望:0 精华:0 注册:2012/4/18 16:28:00
  发帖心情 Post By:2015/5/27 14:13:00 [只看该作者]

版主,代码粘贴过来,发不上来,论坛显示错误!(提交参数错误)

[此贴子已经被作者于2015/5/27 14:16:36编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/5/27 14:18:00 [只看该作者]

 如果提示错误,把这句代码去掉看看

 

UserName = Forms("管理").Controls("ListBox1").SelectedItem


 回到顶部
帅哥哟,离线,有人找我吗?
douglas738888
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1172 积分:8772 威望:0 精华:0 注册:2012/4/18 16:28:00
  发帖心情 Post By:2015/5/27 14:28:00 [只看该作者]

删除还是不行,我没有办法把代码发上来,论坛报错,发不上来是什么原因?

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/5/27 14:36:00 [只看该作者]

如果还报错,就是这段代码有问题,要么数据源user写错了,要么sql语句的表名写错了。

 

cmd.ConnectionName = "User"
cmd.CommandText = "Select * F rom {Users} Where [Name] = '" & UserName & "'"
dt = cmd.ExecuteReader

[此贴子已经被作者于2015/5/27 14:36:27编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
douglas738888
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1172 积分:8772 威望:0 精华:0 注册:2012/4/18 16:28:00
  发帖心情 Post By:2015/5/27 14:47:00 [只看该作者]

谢谢老师们!!我重启电脑后又正常了,我再测试看看。


 回到顶部