Office中国论坛/Access中国论坛

标题: 更新后事件怎么写啊 [打印本页]

作者: yaoiii 时间: 2007-5-28 18:24
标题: 更新后事件怎么写啊
这个更新后事件怎么写啊,一定要写到更新后事件里.好象是个死循环,[attach]24666[/attach]

作者: Grant 时间: 2007-5-28 18:57
Dim slr As String
slr = CurrentUser()
If slr = "" Then
slr = "非法登陆者"
Exit Sub
End If
DoCmd.SetWarnings False
DoCmd.RunSQL "UPDATE 总配 SET 最后更新时间= '" & Now() & "',受理人='" & slr & "' where 电话号码= " & me.电话号码 & ""
DoCmd.SetWarnings True

[此贴子已经被作者于2007-5-28 10:58:56编辑过]

作者: yaoiii 时间: 2007-5-28 23:20
谢谢Grant,

测试正常,有一点没弄明白,为什么要屏蔽告警呢?

作者: Grant 时间: 2007-5-28 23:27
如果不屏蔽每次都会有提示信息弹出~你希望吗?

作者: yaoiii 时间: 2007-5-29 01:15
哦,对,受教了,特别是提示很多时是很烦人

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