[hannileo]

السلام عليكم ورحمة الله وبركاته 

اخواني الكرام 
عندي جدول فيه سيارات محددة بعض السيارات موجودة (stock in) والبعض الاخر غير موجود او متلف (stock out)

الموضوع انني اريد اظهار عدد السيارات الموجودة وذلك بخاصية Record count

عندي هذا الكود :

كود :

Public Sub NoCarAvail()

If RS.State = 1 Then RS.Close


sql = "Select count from Car where AvailStatus='" & "Stock in" & "'"



RS.Open sql, CN, adOpenForwardOnly, adLockPessimistic


frmCars.Label27.Caption = RS.Fields(0)
RS.Close
Set RS = Nothing
End Sub

يظهر عندي رسالة خطأ 

كيف يمكن اصلاح الكود لكي يظهر عدد السيارات الموجودة في  Label27.Caption


وشكرا لكم