السلام عليكم
أنا أعمل حاليا على مشروع لشخص مدير مدرسة..
و كل شي عال العال
إلا في شبكة البيانات - أنا أعمل على 2005 -
الموضوع و ما فيه:
صاحبنا - يعني المدير - يريد طريقة تعديل البيانات للحضور و الغياب
تتم من الشبكة مباشرة..
بعد أن قمت بعرض البيانات في الشبكة و عند إعداء أمر الحفظ استخدمت الكود التالي:
Dim DREC As Object
Dim rr As Object
Dim dpth1 As Object = Application.StartupPath & "\data\ab_grd.mdb"
Dim con1 As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & dpth1 & ";Persist Security Info=False"
DREC = DG1.RowCount
rr = 0
Adodc2.ConnectionString = con1
Adodc2.RecordSource = "select * from ab_grd"
Adodc2.Refresh()
Do
Adodc2.Recordset.Find("id= " & DG1.Item(0,rr) & "")
Adodc2.Recordset.Update("ab_tot", DG1.Item(8, rr).Value)
Adodc2.Recordset.MoveFirst()
rr = rr + 1
Loop Until rr >= DREC
الأمر شغال زي الفل... بس في حالة وحدة فقط.. أن التعديل يتم على كي السجلات,,
يعني لو عدلت على سجلين أو واحد فقط يبدأ البرنامج يخبص...
فمثلا لو عدلت على سجلين السجل الثاني يقوم بالتعديل عليه بشكل صحيح أما الأول إما أنه لا يجد أو يعدل على سجل خاطئ...
فما المشكلة...
