“多步操作产生错误 ！”，不知道是什么意思？

[junguo]

strSql = "select distinct omfid,omfname,omfvid,null as omfpath from acmomf "


Set rec = CreateObject("ADODB.Recordset")
rec.Open strSql, conn, adOpenDynamic, adLockBatchOptimistic, -1

While Not rec.EOF
'getviewpath()为一个我定义的vb函数，程序到此处，报“多步操作产生错误，请检查每步的状态”
rec.Fields("omfpath")= GetViewPath(tt.Fields("omfvid"))

rec.MoveNext
Wend

请帮忙看看是什么原因？

[ywildfox]

我觉得你的SQL语句是不是有问题？NULL是关键字，你先到SQL分析器中看看该语句能否正确执行。

[junguo]

我自己都调过了，错误的地方就是我指出的哪儿！

[free7090]

是不是你打开了多个记录集合引起的，或者是不是你连接没有关闭又新打开连接和记录集合。

[palmkey]

错误在定义的vb函数，可能是函数有问题，或函数与当前语句有冲突，贴出函数代码让大伙给瞧瞧