Office中国论坛/Access中国论坛

标题: 我是新手，请各位高手指点，谢谢 [打印本页]

作者: tzjj 时间: 2005-6-9 17:21
标题: 我是新手，请各位高手指点，谢谢
[attach]11094[/attach]

我想在输入“表1”窗体中自动记录“录入人”(系统当时登陆人员)和“录入日期时间”(系统当时日期时间)，不随记录修改而变。而“最后修改人”和“最后修改日期时间”为最后修改时的人员和时间。谢谢!

作者: 海狸先生 时间: 2005-6-9 17:31
请注意　本站的提问规定　（在标题中写明问题简介）

Private Sub Form_Load()

Me.录入人.DefaultValue = "'录入人姓名'" '这里不知道你的录入人姓名从何而来，就只好这样写了

Me.录入日期时间.DefaultValue = " #" & Date & "#"

End Sub

注：对已有数据不会更改，只对新记录

[此贴子已经被作者于2005-6-9 9:39:36编辑过]

作者: tzjj 时间: 2005-6-9 18:31
管理员,你好!我有点不明白，请指教：1、“录入人”是指进入ACCESS的用户名(我的附件中没设置)2、“录入日期时间”我想为“日期”+“时间”格式，如“2005-5-1 15:26:25”3、“最后修改人”和“最后修改日期时间”随修改记录而变？如何设置？

作者: 海狸先生 时间: 2005-6-9 19:07
既然你没有设置录人，就不管他了，下面是日期方面的修改Private Sub Form_Dirty(Cancel As Integer)

Me.最后修改日期时间.Value = Now

End SubPrivate Sub Form_Load()

Me.录入日期时间.DefaultValue = " #" & Now() & "#"

End Sub

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