Office中国论坛/Access中国论坛

标题: 如何禁止修改、删除表中的指定记录？ [打印本页]

作者: binzhouxc721521 时间: 2006-3-3 20:26
标题: 如何禁止修改、删除表中的指定记录？
表中的指定记录不能被修改、删除，其他记录则可以，请问怎么实现？

作者: pgwq 时间: 2006-3-3 20:44
标题: 一个不能修改指定记录的实例
1.先看附件图片
"报关完成"这个子段只能在其它窗体中修改,在本窗体中锁定.

2.再看下面的语句:

Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim strMsg As String
strMsg = "数据已经改变."
strMsg = strMsg & vbCr & "点击[是]保存，点击[否]放弃保存。"

If Me.报关完成 = True Then
DoCmd.RunCommand acCmdUndo    '报关已完成,就不能修改记录,显示对话框后
就此结束
MsgBox ("报关后记录不能修改!请在XXX窗体中先取消'报关完成'以及'报关单资料
'后再行修改.")
Else
If MsgBox(strMsg, vbQuestion + vbYesNo, "记录保存吗?") = vbYes Then
      ' 什么也不需要做，就会保存记录

   Else
      DoCmd.RunCommand acCmdUndo

End If

End If
End Sub
[attach]16139[/attach]

作者: pgwq 时间: 2006-3-3 21:06
标题: 避免误删除记录的实例
Private Sub Form_BeforeDelConfirm(Cancel As Integer, Response As Integer)

If Me.报关完成 = False Then

??? 我回答了一半的问题，这里怎么做？

请高手！

End If
End Sub

[此贴子已经被作者于2006-3-3 17:36:23编辑过]

作者: binzhouxc721521 时间: 2006-3-5 07:21
看不大懂，请祥告之。

作者: binzhouxc721521 时间: 2006-3-13 05:50
表中的指定记录不能被修改、删除，其他记录则可以，请问怎么实现？

作者: wazi8 时间: 2007-2-15 07:21
怎么能够让数据在输入一定时间后自动锁定阿？

作者: 一点通 时间: 2007-2-15 17:07

以下是引用binzhouxc721521在2006-3-12 21:50:00的发言：
表中的指定记录不能被修改、删除，其他记录则可以，请问怎么实现？

可以选用表中的关键字来实现这些功能

作者: 一点通 时间: 2007-2-15 17:08

以下是引用wazi8在2007-2-14 23:21:00的发言：
怎么能够让数据在输入一定时间后自动锁定阿？

系统时间与记录时间作一个比较,当大于某个值时锁定记录

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