25-12-18, 08:00 PM
هذا اللي فهمته من طلبك ،، وهي فكرة تحديد عدد مستخدمين البرنامج وتكون كالتالي :
في جدول المستخدمين تعمل حقل إضافي وليكن اسمه (userstate) نوعه رقمي يحمل القيم التالية (1 ، 0)
0 = غير متصل بالبرنامج (بمعنى لم يدخل بياناته في شاشة دخول البرنامج أو ان المستخدم خرج من البرنامج)
1 = المستخدم مازال داخل البرنامج .
وعند عملية دخول المستخدم تعمل استعلام .
في جدول المستخدمين تعمل حقل إضافي وليكن اسمه (userstate) نوعه رقمي يحمل القيم التالية (1 ، 0)
0 = غير متصل بالبرنامج (بمعنى لم يدخل بياناته في شاشة دخول البرنامج أو ان المستخدم خرج من البرنامج)
1 = المستخدم مازال داخل البرنامج .
وعند عملية دخول المستخدم تعمل استعلام .
كود :
Dim cmd As New SqlCommand("Select SUM(userstate) From usertable", conn)
conn.Open()
If cmd.ExecuteScalar > 4 Then
msgbox("المتصلين بالبرنامج عدد خمسة مستخدمين لا يمكنك استخدام التطبيق حالياً")
Application.Exit()
End If
conn.Close()
يا رحمن الدنيا والآخرة ورحيمهما

