请大侠帮我看看哪有问题，总是没有把表删除
Set RecLiumaBred = CnnLiuMaBred.OpenSchema(adSchemaTables, Array(Empty, Empty, Empty, "brdfarrow"))
While Not RecLiumaBred.EOF
CnnLiuMaBred.Execute ("drop table brdfarrow")
Text1.Text = "BRDFARROW 表删除"
Wend

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