2012-08-26 41 views
0

一位同事在Access 2007中赋值问题有一个小问题。问题在于,它无缘无故地在一夜之间停止了工作。当我的同事给我发送数据库时,它似乎与Access 2010一起工作。Access 2007字段assignmend停止工作

Private Sub BestätigenMieter_Click() 
Dim db As Database, AuswahlNr As Integer, datensatz As Recordset 

Set db = CurrentDb 
Set datensatz = db.OpenRecordset("KostenaufteilungWohnung", DB_OPEN_TABLE) 
AuswahlNr = [AuswahlMieter] 

'This Line does not work in Access 2007 
Forms!MieterProObjekt!UFMieterObjekt.Form![MieterNr] = AuswahlNr 

DoCmd.close acForm, "ZuteilungMieter" 
DoCmd.GoToControl "LFD" 
End Sub 

有没有人看到任何理由,为什么这不应该工作。 访问甚至不在2007年执行此代码,只有当您删除该行时才会执行此功能。

因此,任何暗示为什么这不起作用将被appreacited。

感谢林

---更新----

感谢大家的输入。 :) 虽然看起来数据库中的某些代码由于未知原因而丢失,但我们无法找到问题......这至少解释了为什么它不起作用。我们要求一个备份版本(这就是我应该首先想到的:))。我会更新或关闭,如果问题解决呢:)

--Update-- 问题解决了,备份数据库如预期运作,没有人知道为什么:) 感谢您的输入和帮助球员:)

+0

您的同事是否检查参考以确保它们都不缺失?新的数据库中是否有类似的参考失败? – Fionnuala

+0

谢谢,我会检查,希望我明天可以在原始版本上得到我的手。 – Lim

+0

任何其他猜测仍将不胜感激:) – Lim

回答

0

备份时解决的问题数据库