2016-10-09 2 views
0

코드에 어떤 문제가 있습니까? 나는 왜 내가이 오류를 계속 알아낼 수 없습니다.액세스 런타임 오류 3464 데이터 형식이 조건 식에 일치하지 않습니다.

Sub renttt() 
Dim rent_list As Recordset 
Dim query As String 

query = "SELECT * FROM (Rent INNER JOIN Movies ON Rent.Movie_ID = Movies.ID) INNER JOIN Customers ON Rent.Customer_ID = Customers.ID WHERE Rent.Movie_ID = '" & txtbxmovieID.Value & "' AND Rent.Date_Returned is Null;" 
Set rent_list = CurrentDb.OpenRecordset(query) 

If rent_list.RecordCount = 1 Then 
     rent_List.MoveFirst 
     txtbxname.Value = (rent_list![CusName]) 
     txtbxsurname.Value = (rent_list![Surname]) 
     txtbxcardID.Value = (rent_list![Id_Card_number]) 
     txtbxaddress.Value = (rent_list![Address]) 
     txtbxrented.Value = (rent_list![Date_Rent]) 
End If 


End Sub 

답변

1

MovieId가 숫자가 아니겠습니까? 그렇다면 따옴표가 없습니다 :

WHERE Rent.Movie_ID = " & txtbxmovieID.Value & " AND ... 
+0

아니요. 그것은 두 번째 눈의 힘입니다. – Gustav

관련 문제