请大侠帮我看看哪有问题，总是没有把表删除

Question

  Set RecLiumaBred = CnnLiuMaBred.OpenSchema(adSchemaTables, Array(Empty, Empty, Empty, "brdfarrow"))
   While Not RecLiumaBred.EOF
        CnnLiuMaBred.Execute ("drop table brdfarrow")
        Text1.Text = "BRDFARROW 表删除"
    Wend

Answer 1

看了XMXOXO的博客，觉得这样写才对，
Set RecLiumaBred = CnnLiuMaBred.OpenSchema(adSchemaTables, Array(Empty, Empty, "brdfarrow", "TABLE"))
  IF Not RecLiumaBred.EOF THEN
     CnnLiuMaBred.Execute ("drop table brdfarrow")
      Text1.Text = "BRDFARROW 表删除"
  END IF
谢谢大家

Answer 2

CnnLiuMaBred 只要有写权限，完全可以删除啊
要看你打开的时候设置的什么权限了