我的Dlookup语法有什么问题?

时间:2018-05-10 23:20:58

标签: access-vba

我有四个表:艺术家,专辑,曲目和导入。我基本上是在制作自己的I-Tunes,这使我无法使用。无论如何,我的问题是许多艺术家发行同名专辑,Greatest Hits等。我通过excel将iTunes带入Access到我的导入表。添加艺术家很容易,相册也是如此。我需要引入曲目/歌曲,但是我需要使用具有多个条件的Dlookup更新我的导入表和新的相册ID。我试过/没有括号,引号,双引号等。我一直收到语法错误?

Private Sub Command88_Click()
Dim Count As Integer
Dim ArtistLookupID As Integer
Dim AlbumTitleName As String

Count = 0
 With Me.Recordset
  .MoveFirst
 Do While Not .EOF
 ArtistLookupID = Me.[Artist ID]
 AlbumTitleName = Me.[Album Title]
 MsgBox "" & ArtistLookupID & " " & AlbumTitleName
 Dlookup("[Album ID]", "[Album Table]", "[Album Title] = AlbumTitleName AND [Artist ID] = 'ArtistLookupID'")
 Count = Count + 1
    .MoveNext
  Loop
End With
MsgBox "records processed=" & Count
End Sub

任何人

0 个答案:

没有答案