不知道行密码功能能否实现 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 不知道行密码功能能否实现

共有2632人关注过本帖树形打印复制链接主题：不知道行密码功能能否实现

tuyage

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：155 积分：1096 威望：0 精华：0 注册：2014/8/14 8:38:00

不知道行密码功能能否实现 发帖心情

Post By：2014/9/24 23:16:00 [只看该作者]

下面附件是我的设想，大家打开看下，我是想，每个行都可以通过设置独立密码，使得每次通过输入密码后才可以确定扣减次数，不知道可以实现不

下载信息 [文件大小：下载次数： ]
点击浏览该文件:行密码案例.zip

不倒的翁

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：一尾狐帖子：476 积分：3523 威望：0 精华：0 注册：2012/12/13 14:23:00

Post By：2014/9/24 23:51:00 [只看该作者]

加个密码列。隐藏掉。然后就是帮助中有的密码解锁。

tuyage

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：155 积分：1096 威望：0 精华：0 注册：2014/8/14 8:38:00

Post By：2014/9/25 7:52:00 [只看该作者]

能在我上面的文件中做一下看看嘛，我试了好久还是不能做到

tuyage

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：155 积分：1096 威望：0 精华：0 注册：2014/8/14 8:38:00

Post By：2014/9/25 8:17:00 [只看该作者]

这是最新实现的，智能做到双击行，弹出扣减窗口，但我是想实现扣减窗口有个输入密码栏，只有正确输入该客人的密码才能扣减成功，否则提示密码错误，无法扣减。。。

谁帮忙给个方法，，不胜感激

下载信息 [文件大小：下载次数： ]
点击浏览该文件:行密码案例.zip

Bin

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2014/9/25 8:31:00 [只看该作者]

参考帮助http://www.foxtable.com/help/topics/2435.htm

http://www.foxtable.com/help/topics/2617.htm

tuyage

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：155 积分：1096 威望：0 精华：0 注册：2014/8/14 8:38:00

Post By：2014/9/25 8:38:00 [只看该作者]

If e.col.Name = "某列" Then '如果编辑的是某列
    Dim psd As String
    InputValue(psd,"验证","请输入密码") '输入密码
    If psd = "正确的密码" Then '如果密码正确
        e.Table.StartEditing '强行进入编辑状态
    Else
        Messagebox.Show("密码错误","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    End If
End If

就是这段代码搞了半天，他这个是整个这一列的密码都是一样的，我是每一行对应一个客户，每个客户后面有一个密码列，用于记录该客户的密码，需要双击该客户的这一行，弹出的这段代码输入的密码必须是该客户后面记录密码列的内容，才是正确密码，如何做

Dim pwd As String
If InputPassWord(pwd,"提示","请输入密码:") Then
Messagebox.Show("您输入的密码是:" & pwd)
End If