终于弄完一个窗体了,之前我通过查看别人的博客,然后一直在想他们为什么都要用3个mrc,为什么不能用一个?经过多次尝试后发现用3个mrc的用处了。为什么会发现3个mrc的用处呢,我还得感谢这个实时错误。
实时错误3265
问题:首先我要将这些数据存储到worklog工作表中,明明mrc.fields(7)的位置就是要存放我的电脑名称,但是他却报错说没有找到项目。
'查询指定用户名的记录
TxtSql = "select * from User_info where userID='" & TxtUserName & "'"
'执行查询语句
Set mrc = ExecuteSQL(TxtSql, MsgText)
mrc.Fields(1) = Trim(TxtUserName.Text)
mrc.Fields(2) = Trim(mrc.Fields(2)) '判断等级的
mrc.Fields(3) = Trim(Date) 'date为当前系统的日期,time为当前系统的时间
mrc.Fields(4) = Trim(Time)
mrc.Fields(7) = Trim(VBA.Environ("computername"))
mrc.Fields(8) = Trim(True)
mrc.Update
原因:我的mrc是在User_info这个表中进行查询并存放记录的,所以如果让他更新的话,他就只能将数据存放到User_info这个表中了,没有办法存放到另一个表worklog中。
解决方法:我们需要创建一个能够将worklog进行更新的mrc。
解决后:</