26-10-12, 03:44 AM
شوف التعديل اللي انا سويت اضف قاعدة بيانات ووضعته بها عدد من السجلات وكتبت الكود
ثم العدد الكلي all اسندت له المتغير ومشى الامر على مايرام
بصراحة المثال قمة بالروعة احتاج اعدل بحيث يكون الارتباط لصفحة حسب الاي دي من السجل ثم بعد ذلك اضيفها للنسخة عندي من المنتدى.
كود :
'*******************
Dim cm As New OleDbCommand("select count (tid) from tb", conn)
If conn.State = System.Data.ConnectionState.Closed Then
conn.Open()
End If
Dim xcount As Integer = cm.ExecuteScalarكود :
Dim All As Integer = xcount 'العدد الكلي للعناصربصراحة المثال قمة بالروعة احتاج اعدل بحيث يكون الارتباط لصفحة حسب الاي دي من السجل ثم بعد ذلك اضيفها للنسخة عندي من المنتدى.
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير

