我是新手，请各位高手指点，谢谢

tzjj

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

海狸先生

请注意　本站的提问规定　（在标题中写明问题简介）

Private Sub Form_Load()

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

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

End Sub

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

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

tzjj

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

海狸先生

既然你没有设置录人，就不管他了，下面是日期方面的修改Private Sub Form_Dirty(Cancel As Integer)

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

End SubPrivate Sub Form_Load()

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

End Sub