【发布时间】:2020-07-13 22:43:51
【问题描述】:
我必须从word 2010 in vba 的访问中选择一些行,现在我想选择一些东西,但我收到一个错误,说我的选择有误,你能帮帮我吗?
Private Sub CommandButton1_Click()
Dim jahr As String
Dim LfdNummer As Integer
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim strSql As String
jahr = TextBox1
LfdNummer = TextBox2
Private Sub CommandButton1_Click()
Dim jahr As String
Dim LfdNummer As Integer
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim strSql As String
jahr = TextBox1
LfdNummer = TextBox2
Set db = CreateObject("DAO.DBEngine.120").OpenDatabase("C:\User/012886\Documents\Hendrik\trilux\EMV\Beispiel_EMV.accdb")
' Daten lesen und weiterverwenden -> über Recordset
Set rs = db.OpenRecordset("SELECT * FROM ITZ-EMV-Messungen")
Do While Not rs.EOF
rs.MoveNext
Loop
rs.Close
db.Close
End Sub
【问题讨论】:
-
您得到的确切错误信息是什么?此外,您的循环似乎只是在打开记录集的记录中移动而不使用任何数据..
-
另外,您是否应该在
db地址中使用正斜杠?OpenDatabase("C:\User/012886\... -
嗨,我收到消息:From 条件中的语法错误
-
在 Access 中运行查询
SELECT * FROM ITZ-EMV-Messungen时会发生什么?运行正常吗? -
尝试包围:[ITZ-EMV-Messungen] 我认为它是破折号。