链接到Sharepoint表的Access数据库

Question

我一直在为工作中的小组开发一个相当复杂的访问数据库。 该数据库是完全在Access 2010中设计的，并且运行良好。 然后，我将所有表推送到SharePoint 2013，并将它们链接回数据库。 使用更新查询运行一段代码时，现在出现错误。 据说由于锁冲突，它无法更新更新查询中的所有记录。 我已经检查过，并且在SharePoint中关闭了版本控制。 建立数据库是为了使用户可以在表中搜索与他们需要输入的记录匹配的记录，并将旧记录“复制”到他们正在创建的新记录中。 通过这种设计，表单和子表单都从同一张表中提取，我认为这可能是问题所在，但是在将表推送到SharePoint之前，它在Access中工作正常。 有人对我该如何解决有任何想法吗？ 谢谢！

这是我认为导致此问题的代码。 该特定错误不会给我提供调试选项，因此我不确定。 私人子命令165_Click（）

Dim SQL As String

Me.Dirty = False

SQL = "UPDATE [Cross_Border_Grid_Table]" _
          & "SET [Export Country]='" & Me.[Export Country] & "', [Export State]='" & Me.[Export State] & "', [Export City and/or Providence]='" & Me.[Export City and/or Providence] & "', [Import Country]='" & Me.[Import Country] & "', [Import State]='" & Me.[Import State] & "', [Import City and/or Providence]='" & Me.[Import City and/or Providence] & "', " _
          & "[Shipment Type]='" & Me.[Shipment Type] & "', [Material Category]='" & Me.[Material Category] & "', [Sub Category]='" & Me.[Sub Category] & "', [Specific Material]='" & Me.[Specific Material] & "', [Transgenic/ Conventional]='" & Me.[Transgenic/ Conventional] & "', [Intended Use]='" & Me.[Intended Use] & "', " _
          & "[Specific Use]='" & Me.[Specific Use] & "', [Material Common Name]='" & Me.[Material Common Name] & "', [Scientific Name]='" & Me.[Scientific Name] & "', [Event]='" & Me.[Event] & "', [Material Condition]='" & Me.[Material Condition] & "', [Permit Required]='" & Me.[Permit Required] & "', " _
          & "[Phytosanitary Certificate Required]='" & Me.[Phytosanitary Certificate Required] & "', [Agency Labels]='" & Me.[Agency Labels] & "',  [Other Requirements]='" & Me.[Other Requirements] & "', [Data Modified]='" &  Me.[Data Modified] & "', [RegCode]='" & Me.[RegCode] & "' WHERE [ID] = " &  [Forms]![New_Shipment_Home_frm]![Text105]

DoCmd.RunSQL SQL

Answer 1

如果其他任何人都有类似的问题，我可以重写代码以创建一个记录集，并且使用记录集可以将recordset属性设置为.LockEdits = False。

我希望这会在某个时候对其他人有所帮助，因为似乎有很多人遇到了问题并且没有解决方案！