当前位置:编程学习 > VB >>

求助了!一个数据库的问题!

错误报告:实时错误-2147217865(80040e37)
Microsoft Jet数据库引擎找不到输入表或查询“book”。确定它是否存在,以及他的名称和拼写是否正确


代码如下
Private Sub Form_Load()
Dim rs_find As New ADODB.Recordset
Dim sql As String
sql = "select * from Book Style"
rs_find.Open sql, conn, adOpenKeyset, adLockPessimistic(这行显示错误了)
rs_find.MoveFirst
If Not rs_find.EOF Then
   Do While Not rs_find.EOF
      Combo1.AddItem rs_find.Fields(0)
      rs_find.MoveNext
   Loop
   Combo1.ListIndex = 0
End If
rs_find.Close
End Sub


因为之前数据库是中文的,sql = "select * from Book Style"以前是sql = "select * from 图书类别"我把数据库里的 图书类别”改成“Book Style”之后在程序里改了,就出错了……求教!谢谢了! --------------------编程问答-------------------- Book Style不能作为TABLE的NAME,表名中不允许有空格

建议把表名改为 Book_Style

--------------------编程问答-------------------- 修改为
sql = "select * from [Book Style]" --------------------编程问答-------------------- sql = "select * from [Book Style]"
命名表名时最好不要有空格,不要使用保留关键字,建议楼主修改表名
补充:VB ,  数据库(包含打印,安装,报表)
CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,