A97的DAO特性？

本文介绍了A97的DAO特性？的处理方法，对大家解决问题具有一定的参考价值，需要的朋友们下面随着小编来一起学习吧！ 问题描述 我注意到，在下面的代码片段中，如果 tblCorrespondence中没有记录，我会在处理过程中收到错误 91。它抱怨没有设置对象 变量或With块变量。我已经仔细检查了代码，我不认为这是 就是这种情况。我想知道我的第231行中的代码是否因为qdfType17CorrespRecs 没有返回记录而有缺陷？ 140使用MyDB 170设置qdfType17CorrespRecs = .CreateQueryDef（""，" Select * FROM tblCorrespondence;"） 180使用qdfType17CorrespRecs 210''从QueryDef打开Recordset。 220设置rstType17CorrespRecs = ..OpenRecordset（dbOpenSnapshot） 230''使用rstType17CorrespRecs 231''如果.BOF = True则GoTo NoRecs 240''。移动首页 250''直到rstType17CorrespRecs.EOF I have noticed, in the following code snippet, that iftblCorrespondence has no records in it, I get an error91 later during processing. It complains that an objectvariable or a With block variable has not been set. Ihave checked the code carefully and I don''t think thisis the case. I''m wondering if my code in line 231 mightbe flawed in light of the fact that qdfType17CorrespRecsreturns no records? 140 With MyDB170 Set qdfType17CorrespRecs = .CreateQueryDef("", "Select *FROM tblCorrespondence;")180 With qdfType17CorrespRecs210 '' Open Recordset from QueryDef.220 Set rstType17CorrespRecs =..OpenRecordset(dbOpenSnapshot)230 '' With rstType17CorrespRecs231 '' If .BOF = True Then GoTo NoRecs240 '' .MoveFirst250 '' Do Until rstType17CorrespRecs.EOF 推荐答案 ********************** JA ************** @ telusTELUS.net 删除真实电子邮件的大写字母 http：// www .geocities.com / jackso有关MS Access安全性信息的nmacd / 这篇关于A97的DAO特性？的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！