Office中国论坛/Access中国论坛

标题: 关于向表中查入 "" 的问题[求助] [打印本页]

作者: slbmly    时间: 2003-12-26 22:22
标题: 关于向表中查入 "" 的问题[求助]
怎样能将 "" 插入表中?
如:
   Dim dDb as Database
   DIM rTb AS Recordset
   Dim rTb1 As Recordset
   Dim sSQL as String

    sSQL = "SELECT id,name FROM a;"
   set dDb = currentdb
   set rTb = dDb.openrecordset(sSQL)
   set rTb1 = dDb.openrecordset("b")      ' b 是表名
   rTb.movefirst
   Do while rTb.eof = false
       rTb1.addnew
       rTb1![id] = rTb![id]
       rTb1![name] = rTb![name]         ' 当rTb![name] = "" 时,rTb1.update 时出
                                                      ' 错怎么解决
       rTb.movenext
       rTb1.update
   loop

' 当rTb![name] = "" 时,rTb1.update 时出错,怎么解决?





欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3