主题：[求助]解除锁定状态

表事件

 

安全检查整改单_PrepareEdit

 

If User.Group <> ""  Then

    e.Cancel = True

End If

 

安全检查整改单_DataColChanged

 

If e.DataCol.Name = "审核" Then

    If e.NewValue = True Then

        e.DataRow.Locked = True

    End If

End If

 

安全检查整改单_DataRowLockedChanging

 

If User.Group <> "" Then

    e.Cancel = True

End If

 

If e.DataRow("审核") = False Then  '未审核通过的行

    If e.DataRow.Locked  = False Then '如果此行目前未锁定,也就是准备锁定此行

        Messagebox.show("不能锁定未审核通过的行!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)

        e.Cancel = True

    End If

ElseIf e.DataRow("审核") = True Then '已经审核通过的行

    If e.DataRow.Locked  = True Then '如果此行已锁定,也就是准备取消锁定此行

        If  User.Group <> "" Then

            Messagebox.show("只有经理才能解锁已经审核通过的行!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)

            e.Cancel = True

        End If

    End If

End If

 

安全检查整改单_DataRowLockedChanged

 

For Each dr As DataRow In e.DataRow.GetChildRows("整改反馈")

    dr.Locked = e.DataRow.Locked

Next

这是我现在用的代码      审核锁定正常     但是我不能解锁行   那个√点了没反应    老师给看看哪里代码需要修改

谢谢    行了

看到过忘了这个事了  谢谢   现在还有一个比较麻烦的问题    

这个我弄好了   是想把身份证的复印件留下  保存   

读卡器自带的软件会生成一个这个文件      

那得怎么做    我想要的效果就是     读取身份证信息的时候  照片保存了   然后身份证也这样已图片的形式保存下来    因为需要保留电子版的  以后随时可以打印

这个一点都看不懂   能不能用  piao据打印

我现在已经有人员信息了     如果我现在用读卡器的话  会自动在增加一行  那就重复了

好了谢谢     甜老师给推荐个高拍仪吧   最好有实例直接可以用的