我有一个例程可以在 481 MB 文本文件上导入并执行一些转换。
该例程在一个工作站的此代码块上崩溃(但在我们的其他工作站上工作正常):
' All of the eleven-digit telephone numbers encountered end in 0. If we get rid of the ending 0,
' we may end up with a valid telephone number.
SQLString = "UPDATE " & sTableName & _
" SET [ServAddrPhone] = Int([ServAddrPhone]/10) WHERE [ServAddrPhone] >9999999999 ; "
RoboCallDB.Execute SQLString, dbFailOnError
[ServAddrPhone] 是双重的。代码块扫描大约 800,000 条记录以查找大于 10 位的电话号码,通常会找到大约 3,000 条符合更新条件的记录。
如何优化此代码以避免错误 3035?谢谢!