我将几个大表从 AccessDB 分离到后端数据库,没有出现任何问题。
接下来,我需要打开一个记录集来替换各种麻烦的字符。当表位于本地时,以下代码段工作正常,但 Access 现在抱怨该表已链接,但未提供详细信息。
Dim rs3 As DAO.Recordset
'Step thru the Item table fix ' & " characters
Set rs3 = db.OpenRecordset("Item", dbOpenTable)
Do While Not rs3.EOF
strDesc = Replace(Nz(rs3!DESC), Chr(39), Chr(39) & Chr(39))
strDesc = Replace(Nz(rs3!DESC), Chr(34), "")
rs3.MoveNext
Loop
Set rs3 = Nothing
Run Code Online (Sandbox Code Playgroud)
对于使用链接表完成此任务有什么建议吗?
dbOpenTable只能与本地表一起使用;它不能与链接表一起使用。
'Set rs3 = db.OpenRecordset("Item", dbOpenTable)
Set rs3 = db.OpenRecordset("Item")
Run Code Online (Sandbox Code Playgroud)
| 归档时间: |
|
| 查看次数: |
3162 次 |
| 最近记录: |