[ahmed201]

(08-01-21, 01:19 AM)سعود كتب : بعد اجراء filldata  أكتب

PHP كود :

If rs.RecordCount > 0 Then
Dim emptycount As Integer
Dim noempty As Integer
emptycount = 0
noempty = 0
rs.MoveFirst
For i = 1 To rs.RecordCount
On Error GoTo nxt
If IsNull(rs!n1) Then
emptycount = emptycount + 1
Else
noempty = noempty + 1
End If

rs.MoveNext
nxt:
Next
Text1.Text = emptycount
Text2.Text = noempty
End If 


---

تعديل بسيط في حلقة for جعلته يبدأ من رقم 1 غيره ليبدأ من رقم 0

---

التعديل مرفق

جزاك الله الف خير وبارك الله فيك