13-12-12, 02:47 PM
أخي الكريم استخدمت هذا الكود لحذف كل الصفوف التي لا يحتوي بها الحقل Num علي أي شئ
Dim AdoCmd As New ADODB.Command
Dim z As Long
For z = 1 To 2
AdoCmd.ActiveConnection = Adodc1.ConnectionString
AdoCmd.CommandText = "DELETE FROM T WHERE (Num IS NULL)"
AdoCmd.Execute
Adodc1.Refresh
Next z
ولكن ماذا افعل عند حذف الصفوف التي يزيد فيها عدد الحقول التي لا تحتوي علي شئ
افيدونا اخواني الكرام
Dim AdoCmd As New ADODB.Command
Dim z As Long
For z = 1 To 2
AdoCmd.ActiveConnection = Adodc1.ConnectionString
AdoCmd.CommandText = "DELETE FROM T WHERE (Num IS NULL)"
AdoCmd.Execute
Adodc1.Refresh
Next z
ولكن ماذا افعل عند حذف الصفوف التي يزيد فيها عدد الحقول التي لا تحتوي علي شئ
افيدونا اخواني الكرام