Foxtable(狐表)用户栏目专家坐堂 → [求助]帮助文件中自定义用户管理之二不能二次添加用户


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

主题:[求助]帮助文件中自定义用户管理之二不能二次添加用户

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111390 积分:567014 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/9/16 15:37:00 [显示全部帖子]

是使用foxtable自带的实例测试的吗?我测试没有问题呀?是不是自己做了什么改动?

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111390 积分:567014 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/9/16 15:54:00 [显示全部帖子]


 回到顶部
帅哥,在线噢!
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111390 积分:567014 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/9/16 16:26:00 [显示全部帖子]

算是实例本身做的不够完美。

删除的时候只删除了后台数据,没有更新_UserTable,删除用户按钮改为:
Dim lst As WinForm.ListBox = e.Form.Controls("ListBox1")
If lst.SelectedIndex >=0 Then
    Dim UserName As String = lst.SelectedItem
    _UserTable.DeleteFor("[Name] = '" & UserName & "'")
    _UserTable.Save
    lst.Items.RemoveAt(lst.SelectedIndex)
    lst.Select()
End If

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111390 积分:567014 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/9/16 17:00:00 [显示全部帖子]

改代码后,重启项目测试

 回到顶部
帅哥,在线噢!
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111390 积分:567014 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/9/16 20:41:00 [显示全部帖子]

我测试没有问题

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:自定义用户管理之二.zip



 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111390 积分:567014 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/9/17 11:03:00 [显示全部帖子]

帮助提供的所有实例,都只是为了配合帮助的某一个功能,不能说也不要期待这个例子在所有场景都是完美的。例子只是为了表示这个功能这样做是可以的,着重于功能的逻辑展示,没有考虑到很多细节性的东西。

如果有需要,可以自行理解代码并改进

 回到顶部